blob: bdd197987d14edd6bc992bfde9c628ec7392c3d6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
//Example 5 // Degree of polarization
clc;
clear;
close;
//given data :
thetai=45;// in degree
n=1.5;/// index
thetar=asind(sind(thetai)/n);
Rl=sind(thetai-thetar)^2/sind(thetai+thetar)^2;
Rp=tand(thetai-thetar)^2/tand(thetai+thetar)^2;
D=((Rl-Rp)/(Rl+Rp))*100;
disp(D,"Degree of polarization,D(%) = ")
// answer is wrong in the textbook
|
