blob: 4b13f89cc1119a34a2d036e9f182c5a2ff88ce98 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
clc
//to calculate thickness of the film
mu=1.33 //refractive index of soap film (unitless)
i=45*%pi/180
//the formula is mu=sini/sinr
sinr=0.5317
cosr=sqrt(1-(sinr)^2)
//for destructive interference
lambda=5890*10^-10 //wavelength in m
n=1
t=n*lambda/(2*mu*cosr)
disp("the thickness of the film is t="+string(t)+"m")
|
