summaryrefslogtreecommitdiff
path: root/1026/CH8/EX8.4/Example8_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '1026/CH8/EX8.4/Example8_4.sce')
-rwxr-xr-x1026/CH8/EX8.4/Example8_4.sce40
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