blob: 9a875c93b46a51701409607db2f66fe97af3fcdb (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
//Chapter 3 : Polarization
clear;
//Variable declaration
lamda=6000*10**-8 //wavelength
no=1.54 //refractive index of O-ray
ne=1.55 //refractive index of E-ray
//Calculations
t=lamda/(2*(ne-no))
//Result
mprintf("Thickness of a quarterwave plate= %f cm",t)
|
