diff options
Diffstat (limited to '2780/CH2/EX2.17')
-rwxr-xr-x | 2780/CH2/EX2.17/Ex2_17.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/2780/CH2/EX2.17/Ex2_17.sce b/2780/CH2/EX2.17/Ex2_17.sce new file mode 100755 index 000000000..e49b73e16 --- /dev/null +++ b/2780/CH2/EX2.17/Ex2_17.sce @@ -0,0 +1,9 @@ +clc
+//to calculate the smallest thickness of the plate
+mu=1.5 //refractive index(unitless)
+r=60*%pi/180 //angle of refraction in radians
+lambda=5890*10^-10 //wavelength in m
+n=1
+//formula is t=n*lambda/(2*mu*cosr) where cosr=0.5
+t=n*lambda/(2*mu*0.5)
+disp("the smallest thickness of the plate which will appear dark by reflection is t="+string(t)+"m")
|