summaryrefslogtreecommitdiff
path: root/1883/CH1/EX1.2.6/Example1_21.sce
blob: 81624a89c5f4eb97f07dda79e8a890cf7e0c5ab4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Chapter-1,Example1_2_6,pg 1-15

n=8                               

wavelength=5890*10^-8                      //wavelength of light 

u=1.46                               //refractive index of oil

i=30                         //angle of incidence

r=asind(sind(i)/u)                     //by Snell's law

t=n*wavelength/(2*u*cosd(r))

printf("\n the thickness of an oil film is t =%.7f cm",t)