summaryrefslogtreecommitdiff
path: root/3875/CH4/EX4.13/Ex4_13.sce
blob: 697284dfdbf5647aa893f593f44582a1b5cd6b85 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clc;
clear;
vol=0.2 //volume of a drop of oil in cubic centimeter
area=100*100 //area in cm^2 
lambda=5.5*10^-5 //wavelength in m
r=0 //angle of incidence in degree
n=1 //number of dark band

//calculation
d=vol/area //thickness of the film of oil in cm
myu=(n*lambda)/(2*d*cosd(0))

mprintf("The refractive index of oil is = %1.3f",myu)