summaryrefslogtreecommitdiff
path: root/1949/CH1/EX1.5/1_5.sce
blob: 0695065130eae317f8b397b6a942b65b6ef660a5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Chapter-1,Example 1_5,Page 1-18
clc()

//Given Data:
t=0.2/(100)^2*10^-2   //thickness of film in meter
lam=5.5*10^-7         //wavelength of light in meter
r=0                   //normal incidence
n=1                   //first band

//Calculations:

//Condition for dark fringe is
//2ut*cos r =n*lam
u=n*lam/(2*t*cos(r))   //Refractive index of a oil
printf('Refractive index of a oil is =%.3f ',u)