diff options
Diffstat (limited to '3537/CH1/EX1.46/Ex1_46.sce')
-rw-r--r-- | 3537/CH1/EX1.46/Ex1_46.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/3537/CH1/EX1.46/Ex1_46.sce b/3537/CH1/EX1.46/Ex1_46.sce new file mode 100644 index 000000000..340e1c019 --- /dev/null +++ b/3537/CH1/EX1.46/Ex1_46.sce @@ -0,0 +1,11 @@ +//Example 1_46
+clc();
+clear;
+//To find the least thickness of the glass plate
+lemda=6000 //units in angstroam
+lemda=6000*10^-8 //units in cm
+u=1.5
+r=50 //units in degree
+n=1 //n=1 for least thickness
+t=(n*lemda)/(2*u*cos(r*%pi/180))
+printf("Least Thickness of the glass plate is %.7f cm",t)
|