1 files changed, 16 insertions, 0 deletions
diff --git a/3828/CH2/EX2.7/Ex2_7.sce b/3828/CH2/EX2.7/Ex2_7.sce
new file mode 100644
index 000000000..fc48e35f7
--- /dev/null
+++ b/3828/CH2/EX2.7/Ex2_7.sce
@@ -0,0 +1,16 @@
+
+//Chapter 2 : Diffraction
+
+clear;
+
+//Variable declaration
+lamda=5000*10**-8          //wavelength
+N=4000                     //number of lines for diffraction grating
+n=3                        //third order 
+
+//Calculations
+theta=((asin(n*lamda*N))*180/%pi)
+
+//Result
+mprintf("Dispersive power in third order spectum= %.2f degrees",theta)
+