summaryrefslogtreecommitdiff
path: root/2453/CH10/EX10.3/10_3.sce
blob: 6c9228f8e1b6b982bfd9288e65ff21d022b57a2d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//To calculate the spot size
n = 1;     //for air
lamda = 650;     //wavelength, nm
lamda = lamda*10^-9;    //wavelength, m
bs = 1;     //beam size, mm
bs = bs*10^-3;    //beam size, m
fl = 1;    //focal length of lens, mm
fl = fl*10^-3;     //focal length of lens, m
tan_theta = fl/(2*bs);     //value of tan_theta
theta = atand(tan_theta);
NA = n*sind(theta);
ss = 0.6*lamda/NA;       //spot size, m
ss = ss*10^6;       //spot size, micro metre
printf("spot size is %5.3f micro metre",ss);

//answer given in the book is wrong