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

//Variable declaration    
n0=1.33;     //water refractive index
n2=1.59;    //cladding refractive index
NA=0.2;     //numerical aperture

//Calculations
n1=sqrt(NA^2+n2^2);      //core refractive index      
NA=sqrt(n1^2-n2^2)/n0;       //numerical aperture
i0=asin(NA);             //acceptance angle(radian)
i0=i0*180/%pi ;         //acceptance angle(degrees)

//Result
printf("\n core refractive index is %0.4f ",n1)
printf("\n acceptance angle is %0.1f degrees",i0)