summaryrefslogtreecommitdiff
path: root/3020/CH8/EX8.4/ex8_4.sce
blob: 2544da9466f1d23edf0b39804d85aa0333d8ee4f (plain)
1
2
3
4
5
6
7
8
clc;
clear all;
ue = 1.486; // Refractive index of extraordinary ray
uo = 1.658; // Refractive index of the ordinary ray
t = 1.64e-6; // Thickness
lambda = t*2*(uo-ue);
disp('m',lambda,'The wavelength of light is')
//rounding off due to scilab