summaryrefslogtreecommitdiff
path: root/2411/CH3/EX3.b.105/Ex3b_5.sce
blob: 0036b4b4907882457217beae569be173fb4dfe9b (plain)
1
2
3
4
5
6
7
8
9
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