summaryrefslogtreecommitdiff
path: root/3755/CH13/EX13.6/Ex13_6.sce
blob: 0568b1b53c6d1bed79144a3e2a03faab35427015 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
clear
//
//
//

//Variable declaration    
NA=0.40;    //numerical aperture
delta=1/100;    //relative difference

//Calculations
i0=asin(NA);      //acceptance angle(radians)
i0=i0*180/%pi ;     //acceptance angle(degrees)
N=1-delta;
thetac=asin(N);     //critical angle(radians)
thetac=thetac*180/%pi ;     //critical angle(degrees)

//Result
printf("\n acceptance angle is %0.1f degrees",i0)
printf("\n critical angle is %0.1f degrees",thetac)