summaryrefslogtreecommitdiff
path: root/2780/CH3/EX3.39/Ex3_39.sce
blob: 68015b87ea67dd327896195fcbfcfb2a1fc759a8 (plain)
1
2
3
4
5
6
7
8
9
10
11
clc
//to calculate resolving power in the second order
N=6*10^4 //N=total number of lines on grating
n=2 //order of spectrum
RP=n*N //RP=resoling power
disp("the resolving power is RP="+string(RP)+"unitless")
//to calculate smallest wavelength
lambda=6000*10^-8 //wavelength in cm
n=3 //order of spectrum
dlambda=lambda/(n*N)
disp("smallest wavelength that can be resolved in the third order in 6000angstrom wavelength region is dlambda="+string(dlambda)+"cm")