summaryrefslogtreecommitdiff
path: root/3869/CH2/EX2.6/Ex2_6.sce
blob: 11a6cbc6b18f08f5c7b66ba2f01e388cf6dcb091 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
clear
//
//
//

//Variable declaration
n=4000                //number of lines/cm
lamda=5000*10**-8     //wavelength(cm)
k=3                   //order

//Calculation
e=1/n                
sintheta=k*lamda/e  
costheta=sqrt(1-sintheta**2)
dthetabydlamda=k*n/costheta         //dispersive power of grating

//Result
printf("\n dispersive power of grating is %0.3f  ",dthetabydlamda)