diff options
Diffstat (limited to '3875/CH5/EX5.4/Ex5_4.sce')
| -rw-r--r-- | 3875/CH5/EX5.4/Ex5_4.sce | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/3875/CH5/EX5.4/Ex5_4.sce b/3875/CH5/EX5.4/Ex5_4.sce index 559e5b52a..d7ea9e484 100644 --- a/3875/CH5/EX5.4/Ex5_4.sce +++ b/3875/CH5/EX5.4/Ex5_4.sce @@ -1,13 +1,15 @@ clc;
clear;
lambda=5890*10^-8 //wavelength in cm
-k1=1
-k2=2
+k1=1 //first order of wavelength
+k2=2 //second order of wavelength
N=425 // grating lines per cm
d_lambda=(5896 - 5890)*10^-8 //grating width in cm
d=2 //grating width in cm
//calculation
+Total_lines = N*2 //Total no. of lines on the grating
+
//for the first order
N1=ceil(lambda/(k1*d_lambda)) //No. of grating lines
@@ -15,5 +17,5 @@ N1=ceil(lambda/(k1*d_lambda)) //No. of grating lines N2=ceil(lambda/(k2*d_lambda)) //No. of grating lines
-printf("\nAs the total number of lines required for the just resolution in the first order is %d and the total number of lines on the grating is 850, the lines will not be resolved\n",N1)
-printf("\nAs the total number of lines required for the just resolution in the first order is %d and the total number of lines on the grating is 850, the lines will appear resolved in second order\n",N2)
+printf("\nAs the total number of lines required for the just resolution in the first order is %d and the total number of lines on the grating is %d, the lines will not be resolved\n",N1,Total_lines)
+printf("\nAs the total number of lines required is %d and the given grating has a total of %d lines, the lines will appear resolved in second order\n",N2,Total_lines)
|