summaryrefslogtreecommitdiff
path: root/3537/CH3/EX3.4/Ex3_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '3537/CH3/EX3.4/Ex3_4.sce')
-rw-r--r--3537/CH3/EX3.4/Ex3_4.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/3537/CH3/EX3.4/Ex3_4.sce b/3537/CH3/EX3.4/Ex3_4.sce
new file mode 100644
index 000000000..f9920c896
--- /dev/null
+++ b/3537/CH3/EX3.4/Ex3_4.sce
@@ -0,0 +1,12 @@
+//Example 3_4
+clc();
+clear;
+//To find the minimum thickness of half wave and quarter wave plates
+lemda=589.3*10^-9 //units in meters
+u0=1.65833
+ue=1.48640
+t1=lemda/(2*(u0-ue))
+printf("thickness of half wave plate is %.7f mm",t1)
+t2=lemda/(4*(u0-ue))
+printf("\n thickness of quarter wave plate is %.8f mm",t2)
+printf("\n \n the minimum thickness of wave plate is %.7f mm",t1)