summaryrefslogtreecommitdiff
path: root/1271/CH1/EX1.26/example1_26.sce
diff options
context:
space:
mode:
Diffstat (limited to '1271/CH1/EX1.26/example1_26.sce')
-rwxr-xr-x1271/CH1/EX1.26/example1_26.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/1271/CH1/EX1.26/example1_26.sce b/1271/CH1/EX1.26/example1_26.sce
new file mode 100755
index 000000000..3ea4cc0a2
--- /dev/null
+++ b/1271/CH1/EX1.26/example1_26.sce
@@ -0,0 +1,12 @@
+clc
+// Given That
+lambda = 6e-7 // wavelength of light in meter
+Mu = 1.463 // refractive index of soap film
+i = 0 // incidence angle in radian
+r = 0 // refracted angle in radian
+// Sample Problem 26 on page no. 1.49
+printf("\n # PROBLEM 26 # \n")
+n = 1 // for smallest thickness
+t = ((2 * n - 1) * lambda) / (4 * Mu * cos(r)) // calculation for thickness of soap film
+printf("\n Standard formula used \n 2*mu*t*cos(r)=(2n-1)*lambda/2. \n")
+printf("\n Least thickness of soap film for bright fringe = %e meter. ",t)