diff options
Diffstat (limited to '3411/CH2/EX2.8/Ex2_8.sce')
-rw-r--r-- | 3411/CH2/EX2.8/Ex2_8.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3411/CH2/EX2.8/Ex2_8.sce b/3411/CH2/EX2.8/Ex2_8.sce new file mode 100644 index 000000000..8549f9f24 --- /dev/null +++ b/3411/CH2/EX2.8/Ex2_8.sce @@ -0,0 +1,14 @@ +//Example 2_8
+clc();
+clear;
+//To calculate the wavelength
+k=2
+theta1=10 //units in degrees
+dtheta=3 //units in degrees
+dlamda=5*10^-9 //units in cm
+lamda=(sin((theta1*%pi)/180)*dlamda*60*60)/(cos((theta1*%pi)/180)*dtheta*(%pi/180)) //units in cm
+printf("Wavelength of the lines is %.7f cms",lamda)
+lamda_dlamda=lamda+dlamda //units in cm
+N=6063
+Ne=(N*k*lamda)/sin((theta1*%pi)/180) //units in cm
+printf("\nMinimum grating width required is %.1fcm",Ne)
|