diff options
Diffstat (limited to '2411/CH3/EX3.b.105/Ex3b_5.sce')
-rwxr-xr-x | 2411/CH3/EX3.b.105/Ex3b_5.sce | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/2411/CH3/EX3.b.105/Ex3b_5.sce b/2411/CH3/EX3.b.105/Ex3b_5.sce new file mode 100755 index 000000000..0036b4b49 --- /dev/null +++ b/2411/CH3/EX3.b.105/Ex3b_5.sce @@ -0,0 +1,10 @@ +// Scilab Code Ex3b.5: Page-164 (2008)
+clc; clear;
+theta_A = 30; // Angle between principal sections of polariser and analyser for beam A, degree
+theta_B = 60; // Angle between principal sections of polariser and analyser for beam B, degree
+// As I_A*cosd(theta_A)^2 = I_B*cosd(theta_B)^2, solving for I ratio
+I_ratio = cosd(theta_B)^2/cosd(theta_A)^2; // The intensity ratio of the two beams
+printf("\nThe intensity ratio of the two beams = %4.2f", I_ratio);
+
+// Result
+// The intensity ratio of the two beams = 0.33
|