diff options
Diffstat (limited to '2780/CH4/EX4.4/Ex4_4.sce')
| -rwxr-xr-x | 2780/CH4/EX4.4/Ex4_4.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/2780/CH4/EX4.4/Ex4_4.sce b/2780/CH4/EX4.4/Ex4_4.sce new file mode 100755 index 000000000..c9516f04a --- /dev/null +++ b/2780/CH4/EX4.4/Ex4_4.sce @@ -0,0 +1,9 @@ +clc
+//to calculate thickness of a half wave plate of quartz
+lambda=5*10^-5 //wavelength in cm
+mue=1.553
+ //refractive index (unitless)
+muo=1.544
+//for a half plate of positive crystal
+t=lambda/(2*(mue-muo))
+disp("thickness of a half wave plate of quartz is t="+string(t)+"cm")
|