summaryrefslogtreecommitdiff
path: root/3828/CH1/EX1.10/Ex1_10.sce
diff options
context:
space:
mode:
Diffstat (limited to '3828/CH1/EX1.10/Ex1_10.sce')
-rw-r--r--3828/CH1/EX1.10/Ex1_10.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3828/CH1/EX1.10/Ex1_10.sce b/3828/CH1/EX1.10/Ex1_10.sce
new file mode 100644
index 000000000..c2638745e
--- /dev/null
+++ b/3828/CH1/EX1.10/Ex1_10.sce
@@ -0,0 +1,17 @@
+//Chapter 1 : Wave Optics
+
+clear;
+
+//Variable declaration
+Dm=0.590 //diameter of ring 15
+Dn=0.336 //diameter of ring 5
+lamda=5890*10**-8
+m=15
+n=5
+
+//Calculation
+R=(Dm**2-Dn**2)/(4*lamda*(m-n))
+
+//Result
+mprintf("Radius of curvature= %0.1f cm",R)
+