diff options
author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3547/CH7/EX7.9/EX7_9.sce | |
parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip |
initial commit / add all books
Diffstat (limited to '3547/CH7/EX7.9/EX7_9.sce')
-rw-r--r-- | 3547/CH7/EX7.9/EX7_9.sce | 57 |
1 files changed, 57 insertions, 0 deletions
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
+
+
|