diff options
Diffstat (limited to '3828/CH3/EX3.3/Ex3_3.sce')
| -rw-r--r-- | 3828/CH3/EX3.3/Ex3_3.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3828/CH3/EX3.3/Ex3_3.sce b/3828/CH3/EX3.3/Ex3_3.sce new file mode 100644 index 000000000..026cbe91a --- /dev/null +++ b/3828/CH3/EX3.3/Ex3_3.sce @@ -0,0 +1,16 @@ +//Chapter 3 : Polarization + +clear; + +//Variable declaration +myu=1.55 //refractive index of glass + +//Calculations +theta_p=(atan(myu))*180/%pi +theta_r=(asin(sin((theta_p*%pi/180))/1.55))*180/%pi +Total=theta_p+theta_r + +//Result +mprintf("Angle of polarization= %f degrees",theta_p) +mprintf("\nAngle between reflected and refracted ray= %d degrees",Total) + |