1 files changed, 11 insertions, 0 deletions
diff --git a/2780/CH3/EX3.15/Ex3_15.sce b/2780/CH3/EX3.15/Ex3_15.sce
new file mode 100755
index 000000000..457c2fcbc
--- /dev/null
+++ b/2780/CH3/EX3.15/Ex3_15.sce
@@ -0,0 +1,11 @@
+clc
+//to calculate order when visible light of wavelength in the range 4000 to 7500 angstrom
+//let E=(e+d)
+E=1/4000 //in cm
+lambda1=4*10^-5 
+                        //wavelength in cm
+lambda2=7.5*10^-5
+n1=E*sin(%pi/2)/lambda1
+n2=E*sin(%pi/2)/lambda2
+disp("order when wavelength of 4000 angstrom is n1="+string(n1)+"unitless")
+disp("order when wavelength of 7500 angstrom is n2="+string(n2)+"unitless")