initial commit / add all books

16 files changed, 164 insertions, 0 deletions

diff --git a/3834/CH12/EX12.2.1/Ex12_2_1.jpg b/3834/CH12/EX12.2.1/Ex12_2_1.jpg
new file mode 100644
index 000000000..93828ad7a
--- /dev/null
+++ b/3834/CH12/EX12.2.1/Ex12_2_1.jpg
diff --git a/3834/CH12/EX12.2.1/Ex12_2_1.sce b/3834/CH12/EX12.2.1/Ex12_2_1.sce
new file mode 100644
index 000000000..3f8dbab99
--- /dev/null
+++ b/3834/CH12/EX12.2.1/Ex12_2_1.sce
@@ -0,0 +1,17 @@
+//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner

+//Windows 8

+//Scilab version- 6.0.0

+//Example 12.2.1

+clc;

+clear ;

+//given

+

+deltaf=100E9;//spacing in Hz

+lambda=1550;//wavelength in nm

+c=3E17;//speed of light in nm/s

+f=c/lambda;

+

+x=1/(f*f);

+deltalambda=c*deltaf*x;//Spacing between channels in nm

+

+mprintf("Spacing between channels is = %.2f nm",deltalambda);

diff --git a/3834/CH12/EX12.3.1/Ex12_3_1.jpg b/3834/CH12/EX12.3.1/Ex12_3_1.jpg
new file mode 100644
index 000000000..f3661a622
--- /dev/null
+++ b/3834/CH12/EX12.3.1/Ex12_3_1.jpg
diff --git a/3834/CH12/EX12.3.1/Ex12_3_1.sce b/3834/CH12/EX12.3.1/Ex12_3_1.sce
new file mode 100644
index 000000000..44e500d0b
--- /dev/null
+++ b/3834/CH12/EX12.3.1/Ex12_3_1.sce
@@ -0,0 +1,27 @@
+//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner

+//Windows 8

+//Scilab version- 6.0.0

+//Example 12.3.1

+clc;

+clear ;

+//given

+

+R=0.32;//Reflectance (power reflection coeeficient)

+

+//case 1 Gs value assumed as 2

+Gs=2;//assumed single-pass amplification factor

+

+x=Gs*((1-R)^2);

+y=(1-R*Gs)^2;

+Gfpa=x/y;

+

+mprintf("Gain of Fabry-Perot semiconductor optical amplifier = %.2f or %.1f dB for Gs=2",Gfpa,10*log10(Gfpa));

+

+//case 2 Gs value assumed as 3

+Gs2=3;//assumed single-pass amplification factor

+

+x2=Gs2*((1-R)^2);

+y2=(1-R*Gs2)^2;

+Gfpa2=x2/y2;//Gain of Fabry-Perot semiconductor optical amplifier

+

+mprintf("\nGain of Fabry-Perot semiconductor optical amplifier = %.2f or %.1f dB for Gs=3",Gfpa2,10*log10(Gfpa2));

diff --git a/3834/CH12/EX12.3.2/Ex12_3_2.jpg b/3834/CH12/EX12.3.2/Ex12_3_2.jpg
new file mode 100644
index 000000000..f86e2b991
--- /dev/null
+++ b/3834/CH12/EX12.3.2/Ex12_3_2.jpg
diff --git a/3834/CH12/EX12.3.2/Ex12_3_2.sce b/3834/CH12/EX12.3.2/Ex12_3_2.sce
new file mode 100644
index 000000000..5893eca02
--- /dev/null
+++ b/3834/CH12/EX12.3.2/Ex12_3_2.sce
@@ -0,0 +1,22 @@
+//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner

+//Windows 8

+//Scilab version- 6.0.0

+//Example 12.3.2

+clc;

+clear ;

+//given

+

+g=106;//maximum gain coefficient in 1/cm

+alpha=14;//loss coefficient of a cavity in 1/cm

+GAMA=0.8;//confinement factor

+L1=50E-3;//assumed length of a typical travelling-wave semiconductor amplifier in cm

+y=GAMA*g-alpha;

+z=y*L1;

+Gs1=exp(z);//Gain of a travelling-wave semiconductor amplifier

+mprintf("Gain of a travelling-wave semiconductor amplifier = %.2f.or  %.1f ",Gs1,10*log10(Gs1));

+//case 2

+L2=100E-3;//assumed length of a typical travelling-wave semiconductor amplifier in cm

+y=GAMA*g-alpha;

+z=y*L2;

+Gs2=exp(z);//Gain of a travelling-wave semiconductor amplifier

+mprintf("\nGain of a travelling-wave semiconductor amplifier = %.2f.or  %.1f ",Gs2,10*log10(Gs2));

diff --git a/3834/CH12/EX12.3.3/Ex12_3_3.jpg b/3834/CH12/EX12.3.3/Ex12_3_3.jpg
new file mode 100644
index 000000000..929e7762f
--- /dev/null
+++ b/3834/CH12/EX12.3.3/Ex12_3_3.jpg
diff --git a/3834/CH12/EX12.3.3/Ex12_3_3.sce b/3834/CH12/EX12.3.3/Ex12_3_3.sce
new file mode 100644
index 000000000..5c08c844f
--- /dev/null
+++ b/3834/CH12/EX12.3.3/Ex12_3_3.sce
@@ -0,0 +1,17 @@
+//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner

+//Windows 8

+//Scilab version- 6.0.0

+//Example 12.3.3

+clc;

+clear;

+//given

+

+x=0.96;//assumed R*Gs value

+L=500E-4;//assumed length of a typical travelling-wave semiconductor amplifier in cm

+n=3.6;//refractive index of SOA medium

+c=3e10//spped of light in vaccum in cm/s

+v=c/n//speed of light within resonant cavity in cm/s

+y=asin((1-x)/(2*sqrt(x)));

+BWfpa=((v/L)*y);//Bandwidth of Fabry-perot semiconductor amplifier

+mprintf("Bandwidth of Fabry-perot semiconductor amplifier = %.2f *10^9 rad/s.",BWfpa/1e9);//division by 1e9 to convert unit from rad/s to 10^9 rad/sec

+//the answer given in the book is wrong//

diff --git a/3834/CH12/EX12.3.4/Ex12_3_4.jpg b/3834/CH12/EX12.3.4/Ex12_3_4.jpg
new file mode 100644
index 000000000..cd9cc69a6
--- /dev/null
+++ b/3834/CH12/EX12.3.4/Ex12_3_4.jpg
diff --git a/3834/CH12/EX12.3.4/Ex12_3_4.sce b/3834/CH12/EX12.3.4/Ex12_3_4.sce
new file mode 100644
index 000000000..89fe16692
--- /dev/null
+++ b/3834/CH12/EX12.3.4/Ex12_3_4.sce
@@ -0,0 +1,20 @@
+//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner

+//Windows 8

+//Scilab version- 6.0.0

+//Example 12.3.4

+clc;

+clear ;

+//given

+

+Pis=300E-6;//input-signal power in W

+Pin=30E-9;//input noise power in w

+B=1E-9;//Bandwidth in m

+Pos=60E-3;//output signal power in W

+Pon=20E-6;// output noise  power in W

+

+SNRin=Pis/Pin;

+SNRout=Pos/Pon;

+

+Fn=SNRin/SNRout;

+

+mprintf("Noise figure of an optical amplifier = %.2f or %.1fdB",Fn,10*log10(Fn));

diff --git a/3834/CH12/EX12.3.5/Ex12_3_5.jpg b/3834/CH12/EX12.3.5/Ex12_3_5.jpg
new file mode 100644
index 000000000..d636b841f
--- /dev/null
+++ b/3834/CH12/EX12.3.5/Ex12_3_5.jpg
diff --git a/3834/CH12/EX12.3.5/Ex12_3_5.sce b/3834/CH12/EX12.3.5/Ex12_3_5.sce
new file mode 100644
index 000000000..8b0d824ee
--- /dev/null
+++ b/3834/CH12/EX12.3.5/Ex12_3_5.sce
@@ -0,0 +1,20 @@
+//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner

+//Windows 8

+//Scilab version- 6.0.0

+//Example 12.3.5

+clc;

+clear ;

+//given

+

+lambda=1300E-9;//operating wavelength in m

+c=3E8;//speed of light in m

+f=c/lambda;

+hf=1.53E-19;//photon energy in V

+nsp=3;//spontaneous emission factor

+G=1000;//by converting gain into absolut no.

+deltalambda=40E-9;//bandwidth of TWA in m

+//BW=f*(((deltalambda)/lambda)^2);//it is not giving correct answer

+BW=1.775E12;

+P_ASE = 2*nsp*hf*G*BW;//ASE power generated in mW

+

+mprintf("ASE power generated= %.1f mW",P_ASE*1000);//multiplication by 1e3 to convert unit from W to mW

diff --git a/3834/CH12/EX12.4.1/Ex12_4_1.jpg b/3834/CH12/EX12.4.1/Ex12_4_1.jpg
new file mode 100644
index 000000000..739fad669
--- /dev/null
+++ b/3834/CH12/EX12.4.1/Ex12_4_1.jpg
diff --git a/3834/CH12/EX12.4.1/Ex12_4_1.sce b/3834/CH12/EX12.4.1/Ex12_4_1.sce
new file mode 100644
index 000000000..0ed60d0bb
--- /dev/null
+++ b/3834/CH12/EX12.4.1/Ex12_4_1.sce
@@ -0,0 +1,23 @@
+//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner

+//Windows 8

+//Scilab version- 6.0.0

+//Example 12.4.1

+clc;

+clear ;

+//given

+

+//case 1 

+Pin=300E-6;//light input power in W

+Pout=60E-3;//output power in W

+

+Gain=Pout/Pin;//Gain

+x=log10(Gain);

+Gdb=10*x;//Gain of erbium-doped fiber for case in dB

+

+mprintf("Gain of erbium-doped fiber for case 1 = %.0f dB",Gdb);

+

+//case 2

+Pase=30E-6;//ASE power in W

+

+Gdb2=10*log10(Gain-(Pase/Pin));//Gain of erbium-doped fiber for case 2 in dB

+mprintf("\nGain of erbium-doped fiber for case 2 = %.0f dB",Gdb);

diff --git a/3834/CH12/EX12.4.2/Ex12_4_2.jpg b/3834/CH12/EX12.4.2/Ex12_4_2.jpg
new file mode 100644
index 000000000..fb678dc95
--- /dev/null
+++ b/3834/CH12/EX12.4.2/Ex12_4_2.jpg
diff --git a/3834/CH12/EX12.4.2/Ex12_4_2.sce b/3834/CH12/EX12.4.2/Ex12_4_2.sce
new file mode 100644
index 000000000..247b79e3f
--- /dev/null
+++ b/3834/CH12/EX12.4.2/Ex12_4_2.sce
@@ -0,0 +1,18 @@
+//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner

+//Windows 8

+//Scilab version- 6.0.0

+//Example 12.4.2

+clc;

+clear ;

+//given

+

+w1=10.5E-6;//MFD of transmission fibre in m

+lambda=1550E-9;//operating wavelength in m

+w2=5.3E-6;//assumed average MFD of Pirelli EDF-PAX-01 Fiber in m

+

+a=w1*w2;

+y=w2^2+w1^2;

+z=(2*a)/y;

+

+Ldb=-10*log10(z^2);//Connection loss in transmission fibre in dB

+mprintf("Connection loss in transmission fibre = %.2f dB",Ldb);//the answer vary due to rounding