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

//Variable declaration 
delta=0.03;    //relative difference
i0=22*%pi/180;      //acceptance angle(radians)

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

//Result
printf("\n numerical aperture is %0.3f ",NA)
printf("\n critical angle is %0.2f degrees",theta_c)