summaryrefslogtreecommitdiff
path: root/374/CH3/EX3.3/33.sci
blob: 05ad22d0ed68d812e8f4483eb3288d53497f6c4a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//chapter 3 example 3//
clc
clear
//core refractive index=n1,cladding refractive index=n2,refractive index of air=na,numerical aperture=NA,acceptance angle=A,multiple time dispersion=M,relative refractive index difference=d,speed of light=C//
n1=1.55;
n2=1.51;
d=n1-n2;
n=(n1+n2)/2;
NA=sqrt(2*d*n);
printf("\n 1) numerical aperture=%f.\n",NA);
A=asind(NA);
printf("\n 2) acceptance angle=%f.\n",A);
C=(3*(10^8));//in mts per sec//
M=((n1*d)/(n2*C))*(10^12);
printf("\n 3) multiple time dispersion=%f ns/km \n",M);