summaryrefslogtreecommitdiff
path: root/1871/CH6/EX6.2/Ch06Ex2.sce
blob: f9b611cb2f50fb42836275c00b6ab4db22039fac (plain)
1
2
3
4
5
6
7
8
9
10
11
12
// Scilab code Ex6.2: Pg:247 (2008)
clc;clear;
mu = 1.50;    // Refractive index of the material
// Since mu = tan i_p, solving for i_p 
i_p = atand(mu);    // Angle of polarization, degree
r = 90-i_p;    // Angle of refraction, degree
printf("\nThe angle of polarization = %4.1f degree", i_p);
printf("\nThe angle of refraction = %4.1f degree", r);

// Result 
// The angle of polarization = 56.3 degree
// The angle of refraction = 33.7 degree