summaryrefslogtreecommitdiff
path: root/3710/CH8/EX8.6/Ex8_6.sce
blob: 608b297f538b2b5d96aed5dd3458318d84d36167 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//Example 8.6, Page Number 380
//Intermodal Dispersion in step index fibers
clc;

n1=1.48//refractive index 
n2=1.46//refractive index
L=1*(10**3) //Length of Fiber in kilometer
c=3*(10**8) //Speed of Light in meters per second

//Using equation 8.24
td=((L*n1)/(c*n2))*(n1-n2) //t is the time difference due tp intermodal dispersion
disp(td,"The Time difference due to Intermodal dispersion in s is:")