summaryrefslogtreecommitdiff
path: root/3869/CH5/EX5.9/Ex5_9.sce
blob: fd78ee0e8de282a0810a6ffa948717549e705f13 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
clear
//
//
//

//Variable declaration
n1=1.563          //Core refractive index
n2=1.498          //Cladding refractive index

//Calculation
NA=sqrt(n1**2-n2**2)    //numerical aperture
phimax=asin(NA)         //acceptance angle(radian)
phimax=asin(NA)*180/%pi     
phimaxd=int(phimax)          //acceptance angle(degrees)
phimaxm=60*(phimax-phimaxd)  //acceptance angle(minutes)

//Result
printf("\n numerical aperture is %0.4f  ",NA)
printf("\n acceptance angle is %0.3f degrees %0.1f minutes",phimaxd,phimaxm)
printf("\n answer for acceptance angle in minutes given in the book varies due to rounding off errors")