summaryrefslogtreecommitdiff
path: root/1061/CH2/EX2.14/Ex2_14.sce
blob: 74d89cac96aa8e93c1efa554f0e9a05733c0884a (plain)
1
2
3
4
5
6
7
8
9
10
11
//Ex:2.14
clc;
clear;
close;
n1=1.46;// core refractive index
dl=0.01;// index difference
n_2=n1-(n1*dl);// cladding refractive index
x_c=(asin(n_2/n1))*180/%pi;// critical angle in degree
n_m=sqrt(n1^2-n_2^2);// numerical aperture
printf("critical angle = %f degree",x_c);
printf("\n numerical aperture = %f",n_m);