summaryrefslogtreecommitdiff
path: root/3020/CH8/EX8.3/ex8_3.sce
blob: 4aebb6e507d35554e5e738ecf7cab7a5f740b6b0 (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
lambda = 6e-7; // Wavelength of light in meters
t = lambda/(4*(uo-ue));
disp('m',t,'The thickness of the quarter wave plate is') 
//rounding off value due to scilab