summaryrefslogtreecommitdiff
path: root/3875/CH9/EX9.4/Ex9_4.sce
blob: 7aff2104e97d54ab810f1df48ceb86376d6d5c9a (plain)
1
2
3
4
5
6
7
8
9
10
11
clc;
clear;
n1=1.45 //refractive index of core
n2=1.40 //refractive index of cladding

//calculation
NA=sqrt(n1^2-n2^2)
mprintf("\nThe numerical aperture is = %1.4f.\n",NA)

i_a=asind(NA)
mprintf("The acceptance angle is = %d degree.",i_a)