diff options
Diffstat (limited to '1847/CH4/EX4.16/Ch04Ex16.sce')
| -rwxr-xr-x | 1847/CH4/EX4.16/Ch04Ex16.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/1847/CH4/EX4.16/Ch04Ex16.sce b/1847/CH4/EX4.16/Ch04Ex16.sce new file mode 100755 index 000000000..84d9dee7d --- /dev/null +++ b/1847/CH4/EX4.16/Ch04Ex16.sce @@ -0,0 +1,12 @@ +// Scilab Code Ex4.16:: Page-4.24 (2009)
+clc; clear;
+lambda = 5890e-008; // Wavelength of light used, m
+t = 7.5e-004; // Thickness of the crystal, cm
+// As for quarter wave plate, mu_diff*t = (mu_e - mu_o)*t = lambda/4, solving for mu_diff
+mu_diff = lambda/(4*t); // The difference in refractive indices of rays, cm
+printf("\nThe difference between refractive indices = %6.4f cm", mu_diff);
+
+// Result
+// The difference between refractive indices = 0.0196 cm
+
+
|