summaryrefslogtreecommitdiff
path: root/3834/CH6/EX6.3.1/Ex6_3_1.sce
blob: a7cb489e9b992dae9d0bcf5cb64b5e4715505194 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner 
//Example 6.3.1
//windows XP
//Scilab version-5.5.1
clc;
clear ;
//given

L=100E12;//Length of the single-mode fiber link in nm

lambda0=1310;//average of zero-dispersion wavelength in nm
lambda=1550;//operating wavelength in nm
S0=0.092;//zero dispersion slope in ps/nm^2

y=lambda0/lambda;
z=1-y^4;
Dlambda=(S0/4)*lambda*z;//dispersion coefficient in ps/nm.Km

deltalambda=1;//light source's spectral width in nm

deltatchrom=Dlambda*deltalambda*L;//Pulse spread caused by chromatic dispersion in s

mprintf("Pulse spread caused by chromatic dispersion = %.2f ps",deltatchrom*1E-12);//multiplication by 1e-12 to convert unit from s to ps

x=6.66;//here, x= L/Ldcf assumed to be 6.66

Ddcf=-Dlambda*x;//dispersion in DCF in ps/nm.Km
mprintf("\nWe need DCF of %.2f ps/nm.km to compensate for dispersion in a conventional SM fiber.",Ddcf);