summaryrefslogtreecommitdiff
path: root/273/CH7/EX7.1/ex7_1sce.sce
blob: 3498b6db40b0e896858a15029fd074f4c1d8a4d8 (plain)
1
2
3
4
5
6
7
8
9
10
11
clc;clear;
//Example 7.1
//plane parallel thin film

//given values
x=5890*10^-10;//wavelength of light in metre
n=1.5;//refractive index
r=60*%pi/180;//angle of refraction in degree
 //calculation
t=x/(2*n*cos(r));
disp(t*10^6,'thickness of plate (in micrometre) is:');