diff options
Diffstat (limited to '1847/CH4/EX4.9')
| -rwxr-xr-x | 1847/CH4/EX4.9/Ch04Ex9.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/1847/CH4/EX4.9/Ch04Ex9.sce b/1847/CH4/EX4.9/Ch04Ex9.sce new file mode 100755 index 000000000..679814534 --- /dev/null +++ b/1847/CH4/EX4.9/Ch04Ex9.sce @@ -0,0 +1,12 @@ +// Scilab Code Ex4.9:: Page-4.9 (2009)
+clc; clear;
+theta = 30; // Angle which the plane of vibration makes with the incident beam, degrees
+// As intensity of ordinary and extraordinary ray are
+// E_E = A^2*cosd(theta)^2 and E_O = A^2*sind(theta)^2, solving for E_E/E_O
+EE_ratio_EO = cotd(30)^2; // Ratio of ordinary and extraordinary ray intensities
+
+printf("\nThe ratio of ordinary to extraordinary ray intensities = %d", EE_ratio_EO);
+
+// Result
+// The ratio of ordinary to extraordinary ray intensities = 3
+
|