diff options
Diffstat (limited to '3547/CH7')
| -rw-r--r-- | 3547/CH7/EX7.1/EX7_1.png | bin | 0 -> 16085 bytes | |||
| -rw-r--r-- | 3547/CH7/EX7.1/EX7_1.sce | 36 | ||||
| -rw-r--r-- | 3547/CH7/EX7.2/EX7_2.png | bin | 0 -> 17436 bytes | |||
| -rw-r--r-- | 3547/CH7/EX7.2/Ex7_2.sce | 55 | ||||
| -rw-r--r-- | 3547/CH7/EX7.3/EX7_3.png | bin | 0 -> 13186 bytes | |||
| -rw-r--r-- | 3547/CH7/EX7.3/EX7_3.sce | 26 | ||||
| -rw-r--r-- | 3547/CH7/EX7.4/EX7_4.png | bin | 0 -> 13696 bytes | |||
| -rw-r--r-- | 3547/CH7/EX7.4/EX7_4.sce | 44 | ||||
| -rw-r--r-- | 3547/CH7/EX7.5/EX7_5.png | bin | 0 -> 13648 bytes | |||
| -rw-r--r-- | 3547/CH7/EX7.5/EX7_5.sce | 47 | ||||
| -rw-r--r-- | 3547/CH7/EX7.6/EX7_6.png | bin | 0 -> 13292 bytes | |||
| -rw-r--r-- | 3547/CH7/EX7.6/EX7_6.sce | 48 | ||||
| -rw-r--r-- | 3547/CH7/EX7.7/EX7_7.png | bin | 0 -> 17129 bytes | |||
| -rw-r--r-- | 3547/CH7/EX7.7/EX7_7.sce | 41 | ||||
| -rw-r--r-- | 3547/CH7/EX7.9/EX7_9.png | bin | 0 -> 14620 bytes | |||
| -rw-r--r-- | 3547/CH7/EX7.9/EX7_9.sce | 57 |
16 files changed, 354 insertions, 0 deletions
diff --git a/3547/CH7/EX7.1/EX7_1.png b/3547/CH7/EX7.1/EX7_1.png Binary files differnew file mode 100644 index 000000000..7b897dbd1 --- /dev/null +++ b/3547/CH7/EX7.1/EX7_1.png diff --git a/3547/CH7/EX7.1/EX7_1.sce b/3547/CH7/EX7.1/EX7_1.sce new file mode 100644 index 000000000..bcb4a1c21 --- /dev/null +++ b/3547/CH7/EX7.1/EX7_1.sce @@ -0,0 +1,36 @@ +// Example 7.1
+// Compuatation of the lower limit on the transmitter power
+//
+// Page no. 305
+
+clc;
+clear;
+close;
+
+//Given data
+q=1.6*10^-19;
+R=1;
+B=7*10^9;
+c=3*10^8; // Velocity of light
+h=6.62*10^-34; // Planck constant
+Q=6;
+k=1.38*10^-23; // Boltzman constant
+T=298;
+Rl=50;
+alpha=0.046; // Fiber loss coefficient
+L=130; // Length
+
+
+// The lower limit on the transmitter power
+a=2*q*R*B;
+b=(4*k*T*B)/Rl;
+p=(2*sqrt(b)/R*Q)+((a*Q^2)/R^2);
+Pi=p*exp(alpha*L);
+
+//Displaying the result in command window
+printf("\n The lower limit on the transmitter power = %0.2f mW",Pi*10^3);
+printf("\n The lower limit on the transmitter peak power is 7.23mW. If the transmitter peak power < 7.23mW, Q < 6.");
+
+// The answer vary due to round off error
+
+
diff --git a/3547/CH7/EX7.2/EX7_2.png b/3547/CH7/EX7.2/EX7_2.png Binary files differnew file mode 100644 index 000000000..2c1a88ee0 --- /dev/null +++ b/3547/CH7/EX7.2/EX7_2.png diff --git a/3547/CH7/EX7.2/Ex7_2.sce b/3547/CH7/EX7.2/Ex7_2.sce new file mode 100644 index 000000000..ebc5cbf47 --- /dev/null +++ b/3547/CH7/EX7.2/Ex7_2.sce @@ -0,0 +1,55 @@ +// Example no. 7.2
+// To calculate exact and approximate Q-factor if the signal is (a)OOK, (b) PSK
+// Page no. 311
+
+clc;
+clear;
+
+// Given data
+lambda=1.55*10^(-6); // Wavelength of given signal
+meanPin=1; // Mean fiber launch power in dBm
+alpha=0.2; // fiber loss in dB/km
+l=240; // fiber length in km
+neta=0.7; // quantum efficiency
+T = 290; // Tempearture in K
+RL=100; // Length resistance in Ω
+PLOdBm = 10; // Power at local oscillator in dBm
+Be = 7.5*10^9; // Efficient bandwidth of filter in Hz
+c=3*10^8; // Speed of ligth in air in m/s
+loss=alpha*l; // Total fiber loss
+q=1.602*10^(-19); // Charge of electron
+h=6.626*10^(-34); // Planck constant
+kB=1.38*10^(-23); // Bolzman constant
+
+f=c/lambda; // mean frequency
+R=(neta*q)/(h*f); // Responsivity
+
+//For OOK
+Pin=10*log10(2)+meanPin; // peak power in dBm
+P1rdBm=Pin-loss; // received peak power in dBm
+P1r=(10^(P1rdBm/10))*10^(-3); // received peak power in W
+PLO=(10^(PLOdBm/10))*10^(-3); // Power at local oscillator in W
+I1=2*R*sqrt(P1r*PLO); // mean of bit 1
+sigma1=2*q*Be*R*(P1r+PLO)+(4*kB*T*Be)/RL; // Square of variance of bit 1
+I0=0; // mean of bit 0
+sigma0=sigma1; // Square of variance of bit 0
+Q1=(I1-I0)/(2*sqrt(sigma1)); // Exact Q-factor
+Q2=sqrt((neta*P1r)/(2*h*f*Be)); // Approximate Q-factor
+
+// Displaying the result in command window
+printf('\n Exact Q-factor if the signal is OOK = %0.1f',Q1);
+printf('\n Approximate Q-factor if the signal is OOK = %0.1f',Q2);
+
+// For PSK
+P1rdBm=meanPin-loss; // received peak power in dBm
+P1r=(10^(P1rdBm/10))*10^(-3); // received peak power in W
+I1=2*R*sqrt(P1r*PLO); // mean of bit 1
+sigma1=2*q*Be*R*(P1r+PLO)+(4*kB*T*Be)/RL; // Square of variance of bit 1
+I0=-I1; // mean of bit 0
+sigma0=sigma1; // Square of variance of bit 0
+Q1=I1/sqrt(sigma1); // Exact Q-factor
+Q2=sqrt((2*neta*P1r)/(h*f*Be)); // Approximate Q-factor
+
+// Displaying the result in command window
+printf('\n Exact Q-factor if the signal is PSK = %0.2f',Q1);
+printf('\n Approximate Q-factor if the signal is PSK = %0.2f',Q2);
diff --git a/3547/CH7/EX7.3/EX7_3.png b/3547/CH7/EX7.3/EX7_3.png Binary files differnew file mode 100644 index 000000000..0670feec6 --- /dev/null +++ b/3547/CH7/EX7.3/EX7_3.png diff --git a/3547/CH7/EX7.3/EX7_3.sce b/3547/CH7/EX7.3/EX7_3.sce new file mode 100644 index 000000000..ca7daa787 --- /dev/null +++ b/3547/CH7/EX7.3/EX7_3.sce @@ -0,0 +1,26 @@ +// Example 7.3
+// Calculation of the distance.
+// Page no 315
+
+clc;
+clear;
+close;
+
+//Given data
+B1=2.5*10^9; // Mean optical power
+B2=10*10^9; // Split loss
+L1=160*10^3; // Total system margin
+
+
+
+// Distance
+L2=((B1/B2)^2*L1);
+L2=L2*10^-3;
+
+
+
+//Displaying results in the command window
+printf("\n Distance = %0.0f Km ",L2);
+
+
+// The answers vary due to round off error
diff --git a/3547/CH7/EX7.4/EX7_4.png b/3547/CH7/EX7.4/EX7_4.png Binary files differnew file mode 100644 index 000000000..e82a12c92 --- /dev/null +++ b/3547/CH7/EX7.4/EX7_4.png diff --git a/3547/CH7/EX7.4/EX7_4.sce b/3547/CH7/EX7.4/EX7_4.sce new file mode 100644 index 000000000..ce1db5c91 --- /dev/null +++ b/3547/CH7/EX7.4/EX7_4.sce @@ -0,0 +1,44 @@ +// Example 7.4
+// Compuatation of (a) OSNR in a reference bandwidth of 0.1 nm, (b) Q-factor.
+// Page no. 321
+
+clc;
+clear;
+close;
+
+// Given data
+
+f=10*10^9;
+n=1.5; //Refractive index
+h=6.63*10^-34; // Planck constant
+c=3*10^8; // Velocity of light
+lambda=1.55*10^-6; //
+q=1.6*10^-19; // Electron charge
+d=0.1*10^-9; // Reference bandwidth
+alpha=0.0461; // Fiber loss coefficient
+L=80; // Spacing
+Pi=-3; // Mean fiber launch power
+N=80; // Identical amplifers
+fe=7*10^9; // Electrical filter bandwidth
+
+
+// Signal calculation
+df=-((c*d)/lambda^2); //Reference frequency
+G=exp(alpha*L);
+G1=10*log10(G);
+N1=10*log10(N);
+Fn=2*n; //Noise figure
+Fn=10*log10(Fn);
+
+O=Pi-N1-G1-Fn+58; //OSNR
+Pi1=2*10^(-(3/10)); // Peak power in mW
+f=c/lambda;
+Q=sqrt((Pi1*10^-3)/(4*N*n*h*f*(G-1)*fe)); //Q-factor
+
+// Displaying the result in command window
+printf("\n OSNR is = %0.2f dB",O);
+printf("\n Q-factor is = %0.2f ",Q);
+
+// The answer vary due to round off error
+
+
diff --git a/3547/CH7/EX7.5/EX7_5.png b/3547/CH7/EX7.5/EX7_5.png Binary files differnew file mode 100644 index 000000000..b2006b34d --- /dev/null +++ b/3547/CH7/EX7.5/EX7_5.png diff --git a/3547/CH7/EX7.5/EX7_5.sce b/3547/CH7/EX7.5/EX7_5.sce new file mode 100644 index 000000000..a7246c3c4 --- /dev/null +++ b/3547/CH7/EX7.5/EX7_5.sce @@ -0,0 +1,47 @@ +// Example 2.1
+// Compuatation of the transmission distance
+//
+// Page no. 325
+
+clc;
+clear;
+close;
+
+//Given data
+
+fl=0.2 // Fiber loss
+L=100; // Amplifeir spacing
+n=1.4;
+h=6.63*10^-34; // Planck constant
+c=3*10^8; // Velocity of light
+lambda=1.55*10^-6;
+
+q=1.6*10^-19; // Electron charge
+R=0.9;
+d=0.1*10^-9;
+alpha=0.0461;
+L=100; // Spacing
+Pi=-3; // Mean fiber launch power
+//N=80; // Identical amplifers
+fe=7*10^9; // Electrical filter bandwidth
+q=6;
+B=5*10^9;
+
+
+// The transmission distance
+l=fl*L;
+G=10^(l/10);
+f=c/lambda;
+// r=N*n*h*f*(G-1);
+Pi=10^(-(2/10));
+N=Pi/(q^2*n*h*f*(G-1)*B);
+Td=N*L;
+Td=Td*10^-3;
+
+//Displaying the result in command window
+printf("\n The transmission distance is = %0.0f km",Td);
+
+
+
+
+
diff --git a/3547/CH7/EX7.6/EX7_6.png b/3547/CH7/EX7.6/EX7_6.png Binary files differnew file mode 100644 index 000000000..a38e1f27a --- /dev/null +++ b/3547/CH7/EX7.6/EX7_6.png diff --git a/3547/CH7/EX7.6/EX7_6.sce b/3547/CH7/EX7.6/EX7_6.sce new file mode 100644 index 000000000..c73fcf63b --- /dev/null +++ b/3547/CH7/EX7.6/EX7_6.sce @@ -0,0 +1,48 @@ +// Example 7.6
+// Compuatation of the Q-factor.
+//
+// Page no. 327
+
+clc;
+clear;
+close;
+
+//Given data
+alpha=0.18; // Fiber loss coefficient
+L=190; // Fiber length
+G=20; // Gain of preamplifier
+lambda=1.55*10^-6; // Operating wavelength
+h=6.63*10^-34; // Planck constant
+n=1.409;
+G1=10^(G/10);
+f0=20*10^9;
+R=1.1;
+q=1.6*10^-19;
+fe=7.5*10^9;
+Pi=1; // Input power
+c=3*10^8; // Velocity of light
+k=1.38*10^-23;
+T=298;
+Rl=200;
+
+// The Q factor
+l=alpha*L;
+Po=Pi-l+G;
+Po=10^(Po/10)*10^-3;
+f=c/lambda;
+r=h*f*(G1-1)*n;
+fn=2*n;
+fn=10^(fn/10);
+I1=R*Po+2*r*f0;
+I0=2*R*r*f0;
+o1=(2*q*I1*fe)+((4*k*T*fe)/Rl)+(2*R^2*r*(2*Po*fe+r*(2*f0-fe)*fe));
+o2=(2*q*I0*fe)+((4*k*T*fe)/Rl)+(2*R^2*r^2*(2*f0-fe)*fe);
+Q=(I1-I0)/(sqrt(o1)+sqrt(o2));
+
+//Displaying the result in command window
+
+printf("\n Q factor= %0.3f ",Q);
+
+// The answer vary due to round off error
+
+
diff --git a/3547/CH7/EX7.7/EX7_7.png b/3547/CH7/EX7.7/EX7_7.png Binary files differnew file mode 100644 index 000000000..4116f33a7 --- /dev/null +++ b/3547/CH7/EX7.7/EX7_7.png diff --git a/3547/CH7/EX7.7/EX7_7.sce b/3547/CH7/EX7.7/EX7_7.sce new file mode 100644 index 000000000..43c9690fb --- /dev/null +++ b/3547/CH7/EX7.7/EX7_7.sce @@ -0,0 +1,41 @@ +// Example 7.7
+// Compuatation of the optimum amplifier configuration
+//
+// Page no. 329
+
+clc;
+clear;
+close;
+
+//Given data
+
+G1=8; // Amplifier gain 1
+G2=16; // Amplifier gain 2
+fn1=7; // Noise figure of amplifier 1
+fn2=5.5; // Noise figure of amplifier 2
+H=7; // Insertion loss of the DCF
+//N=80; // Identical amplifers
+fe=7*10^9; // Electrical filter bandwidth
+// q=6;
+
+
+// The optimum amplifier configuration
+
+fn1=10^(fn1/10);
+fn2=10^(fn2/10);
+G2=10^(G2/10);
+H=10^(H/10);
+Fna=fn2+(fn1/(G2*H));
+Fna=10*log10(Fna);
+G=G2+G1+H;
+Fnb=fn1+(fn2/(G1*H));
+
+Fnb=10*log10(Fnb);
+
+//Displaying the result in command window
+printf("\n The optimum amplifier configuration by choosing Amp2 as the first amplifier = %0.3f dB",Fna);
+printf("\n The optimum amplifier configuration by choosing Amp1 as the first amplifier = %0.3f dB",Fnb);
+
+// The answer vary due to round off error
+
+
diff --git a/3547/CH7/EX7.9/EX7_9.png b/3547/CH7/EX7.9/EX7_9.png Binary files differnew file mode 100644 index 000000000..cc4210d8d --- /dev/null +++ b/3547/CH7/EX7.9/EX7_9.png diff --git a/3547/CH7/EX7.9/EX7_9.sce b/3547/CH7/EX7.9/EX7_9.sce new file mode 100644 index 000000000..0fc81e25c --- /dev/null +++ b/3547/CH7/EX7.9/EX7_9.sce @@ -0,0 +1,57 @@ +// Example 7.9
+// Compuatation of the (a) the length of the DCF (b) the gain G2 and (c) the Q-factor.
+//
+// Page no. 331
+
+clc;
+clear;
+close;
+
+//Given data
+b=-21*10^-27;
+L=100*10^3;
+Lt=100;
+l=0.18; // Loss
+l1=0.5; // Dispersion coefficients of the TF
+G1=16; // Amplifier gain
+p=-2; // Mean transmitter output power
+fe=7*10^9;
+c=3*10^8; // Velocity of light
+h=6.62*10^-34; // Planck constant
+fn1=5.5; // Noise figure of amplifier 1
+fn2=7.5; // Noise figure of amplifier 2
+lambda=1.55*10^-6;
+bd=145*10^-27; // Dispersion coefficients of the DCF
+
+// (a) The length of the DCF
+st=b*L;
+sd=-0.9*st;
+Ld=sd/bd;
+Ld=Ld*10^-3;
+// (b) Gain G2
+Ht=l*Lt;
+Hd=l1*Ld;
+G2=Ht+Hd-G1;
+
+// (c) Q factor
+Ge=G1+G2+-Hd;
+Ge=10^(Ge/10);
+fn1=10^(fn1/10);
+fn2=10^(fn2/10);
+G1=10^(G1/10);
+Hd=10^(-Hd/10);
+Fe=fn1+(fn2/(G1*Hd))-(1/G1);
+f=c/lambda;
+r=70*h*f*(((Ge*Fe)-1)/2);
+Pi=2*10^(p/10)*10^-3;
+Q=sqrt(Pi/(4*r*fe));
+
+
+//Displaying the result in command window
+printf("\n The length of the DCF = %0.2f km",Ld);
+printf("\n Gain G2 = %0.2f dB",G2);
+printf("\n Q factor= %0.1f ",Q);
+
+// The answer vary due to round off error
+
+
|
