summaryrefslogtreecommitdiff
path: root/1958/CH11/EX11.1/Chapter11_example1.sce
blob: 21d680e09861b8e3da0b49d7bff98991dbbba711 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
clc
clear
//Input data
r1=1.538//Refractive index of the crown glass for violet
r2=1.52//Refractive index of the crown glass for red

//Calculations
ip1=atand(r1)//Polarizing angle in degrees
ip2=atand(r2)//Polarizing angle in degrees

//Output
printf('Polarizing angles for violet and red are %3.2f degrees and %3.2f degrees',ip1,ip2)