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 /3506/CH9 | |
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 '3506/CH9')
-rw-r--r-- | 3506/CH9/EX9.1/Ex_9_1.JPG | bin | 0 -> 47045 bytes | |||
-rw-r--r-- | 3506/CH9/EX9.1/Ex_9_1.sce | 20 | ||||
-rw-r--r-- | 3506/CH9/EX9.1/exp_9_1.sce | 20 | ||||
-rw-r--r-- | 3506/CH9/EX9.2/Ex_9_2.JPG | bin | 0 -> 43651 bytes | |||
-rw-r--r-- | 3506/CH9/EX9.2/Ex_9_2.sce | 14 | ||||
-rw-r--r-- | 3506/CH9/EX9.2/exp_9_2.sce | 14 | ||||
-rw-r--r-- | 3506/CH9/EX9.3/Ex_9_3.JPG | bin | 0 -> 46536 bytes | |||
-rw-r--r-- | 3506/CH9/EX9.3/Ex_9_3.sce | 24 | ||||
-rw-r--r-- | 3506/CH9/EX9.3/exp_9_3.sce | 24 |
9 files changed, 116 insertions, 0 deletions
diff --git a/3506/CH9/EX9.1/Ex_9_1.JPG b/3506/CH9/EX9.1/Ex_9_1.JPG Binary files differnew file mode 100644 index 000000000..c62af2968 --- /dev/null +++ b/3506/CH9/EX9.1/Ex_9_1.JPG diff --git a/3506/CH9/EX9.1/Ex_9_1.sce b/3506/CH9/EX9.1/Ex_9_1.sce new file mode 100644 index 000000000..2e377fad7 --- /dev/null +++ b/3506/CH9/EX9.1/Ex_9_1.sce @@ -0,0 +1,20 @@ +//Optical Fiber communication by A selvarajan
+//example 9.1
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+lambda=1.3*1e-6//wavelength in m
+c=3*1e8//velocity of light in m/s
+SNRoutdB=30//signal to noise ratio at outputin dB
+SNRout=10^(SNRoutdB/10);//signal to noise ratio at output normal scale
+new=c/lambda;//frequency in Hz
+h=6.6e-34;//plancks constant
+P=0.5e-3;//Input power in W
+NFdB=4//noise figure in dB
+NF=10^(NFdB/10);//noise figure in normal scale
+SNRin=NF*SNRout//signal to noise ratio at input normal scale
+delta_Be=P/(2*h*new*SNRin);//receiver bandwidth in Hz
+mprintf('Signal to noise ratio at Input=%f',SNRin)
+mprintf('\nReciever bandwidth is=%fx10^14Hz',delta_Be/1e14);// division by 1e14 to convert the unit from Hz to 10^14 Hz
+// The answer given in textbook is wrong
diff --git a/3506/CH9/EX9.1/exp_9_1.sce b/3506/CH9/EX9.1/exp_9_1.sce new file mode 100644 index 000000000..2e377fad7 --- /dev/null +++ b/3506/CH9/EX9.1/exp_9_1.sce @@ -0,0 +1,20 @@ +//Optical Fiber communication by A selvarajan
+//example 9.1
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+lambda=1.3*1e-6//wavelength in m
+c=3*1e8//velocity of light in m/s
+SNRoutdB=30//signal to noise ratio at outputin dB
+SNRout=10^(SNRoutdB/10);//signal to noise ratio at output normal scale
+new=c/lambda;//frequency in Hz
+h=6.6e-34;//plancks constant
+P=0.5e-3;//Input power in W
+NFdB=4//noise figure in dB
+NF=10^(NFdB/10);//noise figure in normal scale
+SNRin=NF*SNRout//signal to noise ratio at input normal scale
+delta_Be=P/(2*h*new*SNRin);//receiver bandwidth in Hz
+mprintf('Signal to noise ratio at Input=%f',SNRin)
+mprintf('\nReciever bandwidth is=%fx10^14Hz',delta_Be/1e14);// division by 1e14 to convert the unit from Hz to 10^14 Hz
+// The answer given in textbook is wrong
diff --git a/3506/CH9/EX9.2/Ex_9_2.JPG b/3506/CH9/EX9.2/Ex_9_2.JPG Binary files differnew file mode 100644 index 000000000..4904ad8dc --- /dev/null +++ b/3506/CH9/EX9.2/Ex_9_2.JPG diff --git a/3506/CH9/EX9.2/Ex_9_2.sce b/3506/CH9/EX9.2/Ex_9_2.sce new file mode 100644 index 000000000..c310c23b0 --- /dev/null +++ b/3506/CH9/EX9.2/Ex_9_2.sce @@ -0,0 +1,14 @@ +//Optical Fiber communication by A selvarajan
+//example 9.2
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+PASE=1e-3;//amplified spontaneous emission power in W
+Gdb=20;//optical amplifier gain in dB
+G=10^(Gdb/10);//optical amplifier gain in normal scale
+delta_newbynew=5e-6;//fractional bandwidth
+h=6.6e-34;//planck's constant
+ns=PASE/((G-1)*h/delta_newbynew);//noise factor
+mprintf('noise factor is=%fx10^21',ns/1e21);// division by 1e21 to convert the unit from Hz to 10^21 Hz
+// The answer given in textbook is wrong
diff --git a/3506/CH9/EX9.2/exp_9_2.sce b/3506/CH9/EX9.2/exp_9_2.sce new file mode 100644 index 000000000..c310c23b0 --- /dev/null +++ b/3506/CH9/EX9.2/exp_9_2.sce @@ -0,0 +1,14 @@ +//Optical Fiber communication by A selvarajan
+//example 9.2
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+PASE=1e-3;//amplified spontaneous emission power in W
+Gdb=20;//optical amplifier gain in dB
+G=10^(Gdb/10);//optical amplifier gain in normal scale
+delta_newbynew=5e-6;//fractional bandwidth
+h=6.6e-34;//planck's constant
+ns=PASE/((G-1)*h/delta_newbynew);//noise factor
+mprintf('noise factor is=%fx10^21',ns/1e21);// division by 1e21 to convert the unit from Hz to 10^21 Hz
+// The answer given in textbook is wrong
diff --git a/3506/CH9/EX9.3/Ex_9_3.JPG b/3506/CH9/EX9.3/Ex_9_3.JPG Binary files differnew file mode 100644 index 000000000..4a83210b1 --- /dev/null +++ b/3506/CH9/EX9.3/Ex_9_3.JPG diff --git a/3506/CH9/EX9.3/Ex_9_3.sce b/3506/CH9/EX9.3/Ex_9_3.sce new file mode 100644 index 000000000..42f2ad35a --- /dev/null +++ b/3506/CH9/EX9.3/Ex_9_3.sce @@ -0,0 +1,24 @@ +//Optical Fiber communication by A selvarajan
+//example 9.3
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+L=50//link length in Km
+Fiber_loss=0.2//fiber loss in dB/Km
+Req_Gain=Fiber_loss*L//required Gain
+Fn1db=5//Noise figure in dB
+Fn2db=5//Noise figure in dB
+Fn3db=5//Noise figure in dB
+Fn1=10^(Fn1db/10);//Noise figure in normal scale for all amplifiers
+Fn2=10^(Fn2db/10);//Noise figure in normal scale for all amplifiers
+Fn3=10^(Fn3db/10);//Noise figure in normal scale for all amplifiers
+G1=10^(Req_Gain/10)//gain in normal scale
+G2=10^(Req_Gain/10)//gain in normal scale
+Fneff=Fn1+(Fn2/G1)+(Fn3/(G1*G2));//Effective noise figure
+SNRindb=30;//Signal to noise ratio at input in dB
+SNRout=10^(SNRindb/10)/Fneff;//Signal to noise ratio at output in dB
+SNRoutdb=10*log10(SNRout);
+mprintf("Required Gain=%f",Req_Gain)
+mprintf("\nEffective noise figure=%f",Fneff)
+mprintf("\nSignal to noise ratio at output =%f dB",SNRoutdb)
diff --git a/3506/CH9/EX9.3/exp_9_3.sce b/3506/CH9/EX9.3/exp_9_3.sce new file mode 100644 index 000000000..42f2ad35a --- /dev/null +++ b/3506/CH9/EX9.3/exp_9_3.sce @@ -0,0 +1,24 @@ +//Optical Fiber communication by A selvarajan
+//example 9.3
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+L=50//link length in Km
+Fiber_loss=0.2//fiber loss in dB/Km
+Req_Gain=Fiber_loss*L//required Gain
+Fn1db=5//Noise figure in dB
+Fn2db=5//Noise figure in dB
+Fn3db=5//Noise figure in dB
+Fn1=10^(Fn1db/10);//Noise figure in normal scale for all amplifiers
+Fn2=10^(Fn2db/10);//Noise figure in normal scale for all amplifiers
+Fn3=10^(Fn3db/10);//Noise figure in normal scale for all amplifiers
+G1=10^(Req_Gain/10)//gain in normal scale
+G2=10^(Req_Gain/10)//gain in normal scale
+Fneff=Fn1+(Fn2/G1)+(Fn3/(G1*G2));//Effective noise figure
+SNRindb=30;//Signal to noise ratio at input in dB
+SNRout=10^(SNRindb/10)/Fneff;//Signal to noise ratio at output in dB
+SNRoutdb=10*log10(SNRout);
+mprintf("Required Gain=%f",Req_Gain)
+mprintf("\nEffective noise figure=%f",Fneff)
+mprintf("\nSignal to noise ratio at output =%f dB",SNRoutdb)
|