summaryrefslogtreecommitdiff
path: root/2780/CH3/EX3.22/Ex3_22.sce
blob: 1b56e2b6256fe991b1d9be9ff487a870ac5b1695 (plain)
1
2
3
4
5
6
7
8
9
10
clc
//to calculate difference in the two wavelengths
//grating equation for principal maxima is (e+d)*sintheta=n*lambda...............eq(1)
//differentiate both sides ,we get dtheta=n*dlambda/((e+d)*costheta)...........eq(2)
lambda=5000           //mean value of wavelengths in angstrom
cottheta=1.732       //cot30degree=1.732
dtheta=0.01 //in radian
//put the value of n from eq(2),we can write eq(2)  
dlambda=lambda*dtheta*cottheta
disp("difference in two wavelengths is dlambda="+string(dlambda)+"angstrom")