5 files changed, 79 insertions, 0 deletions
diff --git a/3869/CH3/EX3.1/Ex3_1.sce b/3869/CH3/EX3.1/Ex3_1.sce
new file mode 100644
index 000000000..b0c5324df
--- /dev/null
+++ b/3869/CH3/EX3.1/Ex3_1.sce
@@ -0,0 +1,15 @@
+clear
+//
+//
+//
+
+//Variable declaration
+lamda=500*10**-9      //wavelength(m)
+mewe=1.553            //refractive index of e-ray
+mew0=1.544            //refractive index of o-ray
+
+//Calculation
+t=lamda/(2*(mewe-mew0))     //thickness of quartz half wave plate(m)
+
+//Result
+printf("\n thickness of quartz half wave plate is %0.4f  mm",t/10**-3)
diff --git a/3869/CH3/EX3.2/Ex3_2.sce b/3869/CH3/EX3.2/Ex3_2.sce
new file mode 100644
index 000000000..d10be7090
--- /dev/null
+++ b/3869/CH3/EX3.2/Ex3_2.sce
@@ -0,0 +1,15 @@
+clear
+//
+//
+//
+
+//Variable declaration
+lamda=589*10**-9      //wavelength(m)
+mewe=1.553            //refractive index of e-ray
+mew0=1.544            //refractive index of o-ray
+
+//Calculation
+t=lamda/(4*(mewe-mew0))     //thickness of quartz half wave plate(m)
+
+//Result
+printf("\n thickness of quartz half wave plate is %0.4f  mm",t/10**-3)
diff --git a/3869/CH3/EX3.3/Ex3_3.sce b/3869/CH3/EX3.3/Ex3_3.sce
new file mode 100644
index 000000000..d60cd5daf
--- /dev/null
+++ b/3869/CH3/EX3.3/Ex3_3.sce
@@ -0,0 +1,15 @@
+clear
+//
+//
+//
+
+//Variable declaration
+lamda=600*10**-9      //wavelength(m)
+mewe=1.5533            //refractive index of e-ray
+mew0=1.5442            //refractive index of o-ray
+
+//Calculation
+t=lamda/(4*(mewe-mew0))     //thickness of quartz half wave plate(m)
+
+//Result
+printf("\n thickness of quartz half wave plate is %0.4f  mm",t/10**-3)
diff --git a/3869/CH3/EX3.4/Ex3_4.sce b/3869/CH3/EX3.4/Ex3_4.sce
new file mode 100644
index 000000000..c17850f82
--- /dev/null
+++ b/3869/CH3/EX3.4/Ex3_4.sce
@@ -0,0 +1,17 @@
+clear
+//
+//
+//
+
+//Variable declaration
+lamda=589.3*10**-9      //wavelength(m)
+mewe=1.65833            //refractive index of e-ray
+mew0=1.48640            //refractive index of o-ray
+
+//Calculation
+t1=lamda/(2*(mewe-mew0))     //thickness of half wave plate(m)
+t2=lamda/(4*(mewe-mew0))     //thickness of quarter wave plate(m)
+
+//Result
+printf("\n thickness of half wave plate is %0.7f  mm",t1/10**-3)
+printf("\n thickness of quarter wave plate is %0.6f  mm",t2/10**-3)
diff --git a/3869/CH3/EX3.5/Ex3_5.sce b/3869/CH3/EX3.5/Ex3_5.sce
new file mode 100644
index 000000000..8c18e93a2
--- /dev/null
+++ b/3869/CH3/EX3.5/Ex3_5.sce
@@ -0,0 +1,17 @@
+clear
+//
+//
+//
+
+//Variable declaration
+t=0.9*10**-6      //thickness(m)
+mewe=1.486            //refractive index of e-ray
+mew0=1.658            //refractive index of o-ray
+
+//Calculation
+lamda1=4*t*(mew0-mewe)      //wavelength for half wave plate(m)
+lamda2=2*t*(mew0-mewe)      //wavelength for quarter wave plate(m)
+
+//Result
+printf("\n wavelength for half wave plate is %0.3f  m",lamda1*10**9)
+printf("\n wavelength for quarter wave plate is %0.3f  mm",lamda2*10**9)