dispersion.m

Electronic Communication Systems的Matlab源码

%
% Example 24.5 evaluated for zero-dispersion wavelengths values
% from 1301.5nm to 1321.5nm
% 
%
%

% zer-dispersion slope in ps(nm.km)
S0 = 0.05;
% zero-dispersion wavelength in nanometers
lamda_zero = 1301.5:1321.5;
% wavelength in nanometers
lamda = 1550;
% source linewidth
line_width = 2;
% fibre length 
length = 50;

% Chromatic dispersion ps/nm/nm/km
Dc = (S0/4).*(lamda - ((lamda_zero.^4)./(lamda.^3)));
% Dispersion per kilometer
D = line_width*Dc ;
% Total dispersion
total_dispersion = length*D;
%
clf
figure(1)

plot(lamda_zero,D);
title('Total dispersion in ps for various zero-dispersion wavelengths')
ylabel('Total dispersion in picoseconds')
xlabel('zero-dispersion wavelength in nanometres')
grid
%