summaryrefslogtreecommitdiff
path: root/1847/CH2/EX2.25/Ch02Ex25.sce
diff options
context:
space:
mode:
Diffstat (limited to '1847/CH2/EX2.25/Ch02Ex25.sce')
-rwxr-xr-x1847/CH2/EX2.25/Ch02Ex25.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/1847/CH2/EX2.25/Ch02Ex25.sce b/1847/CH2/EX2.25/Ch02Ex25.sce
new file mode 100755
index 000000000..42eb8f303
--- /dev/null
+++ b/1847/CH2/EX2.25/Ch02Ex25.sce
@@ -0,0 +1,10 @@
+// Scilab Code Ex2.25:: Page-2.19 (2009)
+clc; clear;
+lambda = 5890e-008; // Wavelength of light used, cm
+mu = 1.5; // Refractive index of material sheet
+// As shift = 9*lambda*D/d = D/d*(mu - 1)*t, solving for t
+t = 9*lambda/(mu - 1); // Thickness of the glass sheet, cm
+printf("\nThe thickness of the glass sheet = %4.2e cm", t);
+
+// Result
+// The thickness of the glass sheet = 1.06e-003 cm