diff options
Diffstat (limited to '1026/CH8/EX8.4/Example8_4.sce')
-rwxr-xr-x | 1026/CH8/EX8.4/Example8_4.sce | 40 |
1 files changed, 20 insertions, 20 deletions
diff --git a/1026/CH8/EX8.4/Example8_4.sce b/1026/CH8/EX8.4/Example8_4.sce index 1adc7876f..0415b7c32 100755 --- a/1026/CH8/EX8.4/Example8_4.sce +++ b/1026/CH8/EX8.4/Example8_4.sce @@ -1,21 +1,21 @@ -//chapter8,Example8_4,pg 182
-
-i=45*(%pi/180)
-
-u=1.33
-
-r=asin(sin(i)/u)
-
-r=r*(180/%pi)
-
-//for bright fringe 2*u*t*cos(r)=(2*n+1)(lam/2)
-
-//for minimum thickness n=0
-
-lam=5000*10^-8
-
-t=lam/(4*u*t*cos(r))
-
-printf("min. thickness of film\n")
-
+//chapter8,Example8_4,pg 182 + +i=45*(%pi/180) + +u=1.33 + +r=asin(sin(i)/u) + +r=r*(180/%pi) + +//for bright fringe 2*u*t*cos(r)=(2*n+1)(lam/2) + +//for minimum thickness n=0 + +lam=5000*10^-8 + +t=lam/(4*u*cos(r)) + +printf("min. thickness of film\n") + disp(t)
\ No newline at end of file |