diff options
Diffstat (limited to '3537/CH3/EX3.4/Ex3_4.sce')
-rw-r--r-- | 3537/CH3/EX3.4/Ex3_4.sce | 12 |
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)
|