summaryrefslogtreecommitdiff
path: root/1949/CH1/EX1.26/1_26.sce
blob: fd819fab34ca840f388f118600550e2da53c27d7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Chapter-1,Example 1_26,Page 1-48
clc()

//Given Data:
i=45*%pi/180        //angle of incidence
u=4/3               //Refractive index of soap film
lam=5*10^-7         //wavelength of light
t=1.5*10^-6         //thickness of film

//Calculations:
//u=sin i/sin r      //Snell's law   .So,
r=asin(sin(i)/u)     //angle of reflection

//Now, condition for dark band is
//2ut*cos r=n*lam
n=2*u*t*cos(r)/lam   //order of band
printf('order of dark band is =%.1f \n',n)