summaryrefslogtreecommitdiff
path: root/2780/CH4/EX4.3/Ex4_3.sce
blob: 9101c7ce54de1bef42b276290424e1b61258cee8 (plain)
1
2
3
4
5
6
7
clc
//to calculate polarising angle and angle of refraction
mu=1.345    //refractive index, mu=1/sinc=1/sin48degree=1/0.7431 
ip=atand(mu)
r=90-ip
disp("polarising angle is ip="+string(ip)+"degree")
disp("angle of refraction is r="+string(r)+"degree")