summaryrefslogtreecommitdiff
path: root/3740/CH8/EX8.6/Ex8_6.sce
blob: 4dd2e813614b23640872427cdfc0f04148a87fad (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Optoelectronics - An Introduction, 2nd Edition by J. Wilson and J.F.B. Hawkes
//Example 8.6
//OS=Windows XP sp3
//Scilab version 5.5.2
clc;
clear;

//given
n1=1.48;//Dimensionless refractive index of fiber core
n2=1.46;//Dimensionless refractive index of fiber cladding
L=1e3;//Length of fiber in m
c=3e8;//Speed of light in vacuum in m/s

DeltaTSI=L/c*(n1/n2)*(n1-n2);//Intermodal dispersion in s
mprintf("\n DeltaTSI = %.2f ns",DeltaTSI/1e-9);//Dividing by 10^(-9) to convert to ns
//The answers vary due to round off error