summaryrefslogtreecommitdiff
path: root/1847/CH2/EX2.63/Ch02Ex63.sce
diff options
context:
space:
mode:
Diffstat (limited to '1847/CH2/EX2.63/Ch02Ex63.sce')
-rwxr-xr-x1847/CH2/EX2.63/Ch02Ex63.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/1847/CH2/EX2.63/Ch02Ex63.sce b/1847/CH2/EX2.63/Ch02Ex63.sce
new file mode 100755
index 000000000..03b413bf6
--- /dev/null
+++ b/1847/CH2/EX2.63/Ch02Ex63.sce
@@ -0,0 +1,14 @@
+// Scilab Code Ex2.63:: Page-2.49(2009)
+clc; clear;
+R1 = 4; // Radius of curvature of the convex surface, m
+R2 = 5; // Radius of curvature of the concave surface, m
+lambda = 6600e-010; // Wavelength of light used, cm
+n = 15; // Order of Newton ring
+// As D_n^2*(1/R1-1/R2) = 4*n*lambda, solving for D_n
+D_15 = sqrt(4*n*lambda/(1/R1-1/R2)); // Diameter of 15th dark ring, cm
+
+printf("\nThe diameter of %dth dark ring = %4.2e m", n, D_15);
+
+// Result
+// The diameter of 15th dark ring = 2.81e-002 m
+// The answer is given wrong in the textbook (the square root is not solved)