1 files changed, 15 insertions, 0 deletions
diff --git a/1949/CH1/EX1.12/1_12.sce b/1949/CH1/EX1.12/1_12.sce
new file mode 100755
index 000000000..6f23e5dbc
--- /dev/null
+++ b/1949/CH1/EX1.12/1_12.sce
@@ -0,0 +1,15 @@
+//Chapter-1,Example 1_12,Page 1-40
+clc()
+
+//Given Data:
+n=10             //10th dark ring
+Dn=0.5*10^-2     //Diameter of ring
+lam=6*10^-7      //wavelength of light
+
+//Calculations:
+//As Dn^2=4*n*R*lam
+R=Dn^2/(4*n*lam)    //Radius of curvature of the lens
+printf('Radius of curvature of the lens is =%.2f m \n \n',R)
+
+t=Dn^2/(8*R)        //thickness of air  film
+printf(' Thickness of air  film is =%.7f m \n',t)