blob: 60ac942c6f00d13bc218ce98e77e711f17cc5d6f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
//Example 2.8 //angular separtion
clc;
clear;
//part a
c=1/5000;//grating element
w1=5890D-8;// in first case first wavelength used in cm
n=2;//order of spectrum
theta=asin((n*w1)/c);//angular separton in radian
theta=theta*180/%pi;//to convert in degree
disp(theta,"angular width in degree")
//part b
w2=5896D-8;// in second case second wavelength used in cm
n=2;//order of spectrum
theta1=asin((n*w2)/c);//angular separton in radian
theta1=theta1*180/%pi;//to convert in degree
disp(theta1,"angular width in degree")
a=theta1-theta;//angular separation in degree
disp(a,"angular separation in degree")
//part c
w=5893D-8;// mid wavelength
dw=w2-w1;// change in wavelength
n=2;//order of spectrum
N=w/(dw*n);//no. of lines in grating
N=floor(N);//N should be integer
disp(N,"no. of lines in grating")
|
