summaryrefslogtreecommitdiff
path: root/3756/CH4/EX4.2/Ex4_2.sce
blob: 54e9568f47de8c12014680aad530182db006577b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
clc
//
//
//

//Variable declaration
muclad=1.48   //Refractive index of claddings
mucore=1.5    //Refractive index of core

//Calculations
thetac=(180/%pi)*(asin(muclad/mucore))
fri=(mucore-muclad)/mucore
aa=(sqrt((mucore**2)-(muclad**2)))
NA=sin(aa)
//Result
printf("\n (a) The critical angle is :%2.2f degrees",thetac)
printf("\n (b) The Fractional refractive index is :%1.3f ",fri)

printf("\n (c) The Acceptance angle is :%1.3f Radians",aa)
printf("\n (d) The Numerical Apperture is :%1.3f ",NA)