initial commit / add all books

1 files changed, 20 insertions, 0 deletions

diff --git a/1871/CH3/EX3.12/Ch03Ex12.sce b/1871/CH3/EX3.12/Ch03Ex12.sce
new file mode 100755
index 000000000..d9dd3a3ce
--- /dev/null
+++ b/1871/CH3/EX3.12/Ch03Ex12.sce
@@ -0,0 +1,20 @@
+// Scilab code Ex3.12 : Pg:114 (2008)

+clc;clear;

+omega1 = 0.017;    // Dispersive power of the crown glass lens

+omega2 = 0.034;    // Dispersive power of flint glass lens

+F = 40;    // Focal length of the combination of lenses, cm

+f1 = (omega2 - omega1)/omega2*F;    // Focal length of crown glass lens, cm

+f2 = (omega1 - omega2)/omega1*F;    // Focal length of flint glass lens, cm

+mu = 1.5;    // Refractive index of crown glass

+R2 = -25;    // Radius of curvature of the first surface of convex lens, cm

+// Now from lens maker's formula

+R1 = (mu - 1)/(1/f1+(mu-1)/R2);    // Radius of curvature of second surface of convex lens, cm

+printf("\nThe radius of curvature of the second surface of convex lens = %5.2f cm", R1);

+mu = 1.7;    // Refractive index of flint glass

+R1 = -25;    // Radius of curvature of the first surface of concave lens, cm

+R2 = (mu - 1)/(1/f2-(mu-1)/R1);    // Radius of curvature of second surface of concave lens, cm

+printf("\nThe radius of curvature of the second surface of concave lens = %6.2f cm", R2);

+

+// Result 

+// The radius of curvature of the second surface of convex lens = 16.67 cm

+// The radius of curvature of the second surface of concave lens = 233.33 cm