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

//Variable declaration    
n1=1.5;     //core refractive index
n2=1.45;     //cladding refractive index

//Calculations
delta=(n1-n2)/n1;    //relative difference
NA=n1*sqrt(2*delta);       //numerical aperture
i0=asin(NA);             //acceptance angle(radian)
i0=i0*180/%pi ;            //acceptance angle(degrees)
theta_c=asin(n2/n1);     //critical angle(radian)
theta_c=theta_c*180/%pi ;            //critical angle(degrees)

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