blob: 2e9cfc41facadd3bf54ff3ded8bc9ed30899346a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
// Scilab Code Ex3b.7: Page-165 (2008)
clc; clear;
// For half reduction in intensity
I_ratio = 1/2; // Intensity ratio
theta = acosd(sqrt(I_ratio)); // Angle of rotation of polaroid, degree
printf("\nFor half reduction in intensity, the angle of rotation = %d degree", theta);
// For one-fourth reduction in intensity
I_ratio = 1/4; // Intensity ratio
theta = acosd(sqrt(I_ratio)); // Angle of rotation of polaroid, degree
printf("\nFor one-fourth reduction in intensity, the angle of rotation = %d degree", theta);
// Result
// For half reduction in intensity, the angle of rotation = 45 degree
// For one-fourth reduction in intensity, the angle of rotation = 60 degree
|
