blob: dc278891ae4aadc4a08354b7294f1b4d1b40607c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
//Variable declaration
n1=1.48; //refractive index of core
n2=1.45; //refractive index of cladding
//Calculation
NA=sqrt((n1**2)-(n2**2)); //numerical aperture
theta0=asin(NA); //acceptance angle(radian)
theta0=theta0*180/%pi; //acceptance angle(degrees)
theta0_m=60*(theta0-int(theta0));
thetac=asin(n2/n1); //critical angle(radian)
thetac=thetac*180/%pi; //critical angle(degrees)
thetac_m=60*(thetac-int(thetac));
delta=(n1-n2)/n1; //fractional refractive indices change
//Result
printf('numerical aperture is %0.3f \n',(NA))
printf('acceptance angle is %0.3f degrees %0.3f minutes \n',int(theta0),(theta0_m))
printf('critical angle is %0.3f degrees %0.3f minutes \n',int(thetac),int(thetac_m))
printf('fractional refractive indices change is %0.3f \n',(delta))
|
