summaryrefslogtreecommitdiff
path: root/1949/CH1/EX1.31/1_31.sce
blob: 1718ed1ad2421e53306a3988c0cb43c8cf0b5d78 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Chapter-1,Example 1_31,Page 1-51
clc()


//Condition for bright band is
//2ut*cos r = (2n-1)*lam1

//for consecutive bands, 2n=(lam1+lam2)/(lam1-lam2).
//thus, 2ut*cos r = lam2*lam1/(lam1-lam2)

//And, thicknessof film 
//t= lam2*lam1/((2*u*cosr)(lam1-lam2))
printf('Hence expression for thickness of film is obtained.')