summaryrefslogtreecommitdiff
path: root/3828/CH3/EX3.4/Ex3_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '3828/CH3/EX3.4/Ex3_4.sce')
-rw-r--r--3828/CH3/EX3.4/Ex3_4.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3828/CH3/EX3.4/Ex3_4.sce b/3828/CH3/EX3.4/Ex3_4.sce
new file mode 100644
index 000000000..ae1564404
--- /dev/null
+++ b/3828/CH3/EX3.4/Ex3_4.sce
@@ -0,0 +1,15 @@
+//Chapter 3 : Polarization
+
+clear;
+
+//Variable declaration
+lamda=6000*10**-8 //wavelength
+no=1.544 //refractive index of O-ray
+ne=1.553 //refractive index of E-ray
+
+//Calculations
+t=lamda/(4*(ne-no))/10**-3
+
+//Result
+mprintf("Thickness of a quarterwave plate= %.2f*10**-5 m",t)
+