diff options
Diffstat (limited to '3834/CH8')
-rw-r--r-- | 3834/CH8/EX8.1.1/Ex8_1_1.jpg | bin | 0 -> 219088 bytes | |||
-rw-r--r-- | 3834/CH8/EX8.1.1/Ex8_1_1.sce | 28 | ||||
-rw-r--r-- | 3834/CH8/EX8.4.1/Ex8_4_1.jpg | bin | 0 -> 235357 bytes | |||
-rw-r--r-- | 3834/CH8/EX8.4.1/Ex8_4_1.sce | 28 |
4 files changed, 56 insertions, 0 deletions
diff --git a/3834/CH8/EX8.1.1/Ex8_1_1.jpg b/3834/CH8/EX8.1.1/Ex8_1_1.jpg Binary files differnew file mode 100644 index 000000000..0b5730e88 --- /dev/null +++ b/3834/CH8/EX8.1.1/Ex8_1_1.jpg diff --git a/3834/CH8/EX8.1.1/Ex8_1_1.sce b/3834/CH8/EX8.1.1/Ex8_1_1.sce new file mode 100644 index 000000000..2708bc69f --- /dev/null +++ b/3834/CH8/EX8.1.1/Ex8_1_1.sce @@ -0,0 +1,28 @@ +//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner
+//Example 8.1.1
+//windows 8
+//Scilab version-6.0.0
+clc;
+clear ;
+//given
+
+//case 1
+d1=65.5E-6;//diameter of the core considering 62.5+3 in m
+d2=59.5E-6;//diameter of the core considering 62.5-3 in m
+
+Losscore=-10*log10((d2/d1)^2);//Intrinsic loss due to diameter mismatch in dB
+mprintf("Intrinsic loss due to diameter mismatch = %.2fdB",Losscore);
+
+
+//case 2
+NA1=0.290;//numerical aperture of fiber considering 0.275+0.015
+NA2=0.260;//numerical aperture of fiber considering 0.275-0.015
+
+LossNA=-10*log10((NA2/NA1)^2);//Intrinsic loss due to NA mismatch in dB
+mprintf("\nIntrinsic loss due to NA mismatch = %.2fdB",LossNA);
+
+//case 3
+w1=9.8;//MFD considering 9.3+0.5 um
+w2=8.8;//MFD considering 9.3-0.5 um
+LossMFD=-10*log10(4/((w1/w2)+(w2/w1))^2);//Intrinsic loss due to NA mismatch in dB
+mprintf("\nIntrinsic loss due to MFD mismatch = %.2fdB",LossMFD);
diff --git a/3834/CH8/EX8.4.1/Ex8_4_1.jpg b/3834/CH8/EX8.4.1/Ex8_4_1.jpg Binary files differnew file mode 100644 index 000000000..11510814d --- /dev/null +++ b/3834/CH8/EX8.4.1/Ex8_4_1.jpg diff --git a/3834/CH8/EX8.4.1/Ex8_4_1.sce b/3834/CH8/EX8.4.1/Ex8_4_1.sce new file mode 100644 index 000000000..c800c03e4 --- /dev/null +++ b/3834/CH8/EX8.4.1/Ex8_4_1.sce @@ -0,0 +1,28 @@ +//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner
+//Example 8.4.1
+//windows 8
+//Scilab version-6.0.0
+clc;
+clear;
+//given
+
+L=2;//installation length in Km
+lambda=850E-9;//operating wavelength in m
+deltalambda=20;//spectral width in nm
+BW=16;//maximum bit rate in M bit/s
+taultwrise=4;//rise time of light wave equipment in ns
+BWLmodal=160//modalbandwidth length product in MHz.Km from data sheet
+dlambda=0.21//chromatic dispersion parameter in ns/nm.Km at 850nm wavelength
+tausystrise=0.35/BW;//total system rise time in us
+mprintf("Total system rise time= %.0f ns",tausystrise*1e3);//multiplication by 1e3 to convert unit from us to ns
+taufib_rise1=sqrt((tausystrise*1e3)^2-(taultwrise)^2)//Fiber risetime in ns//the answer vary due to rounding
+mprintf("\nFiber risetime =%.2f ns",taufib_rise1)
+BWmodal=BWLmodal/(L)//modal bandwidth in MHz
+BWel_modal=0.707*BWmodal//electrical bandwith in MHz
+taumod_rise=0.35/BWel_modal//Fiber modal risetime in ns
+mprintf("\nFiber modal risetime =%.2f ns",taumod_rise*1e3)//multiplication by 1e3 to convert unit from us to ns
+tauchrom_rise=dlambda*L*deltalambda//Fiber chromatic risetime in ns
+mprintf("\nFiber chromatic risetime =%.2f ns",tauchrom_rise)
+taufib_rise2=sqrt((taumod_rise*1e3)^2+tauchrom_rise^2)//Fiber risetime in ns
+mprintf("\nFiber risetime =%.1f ns",taufib_rise2)
+mprintf("\nThe fiber rise time %.2fns is less than the required risetime of %.2f ns;therefore the chosen fiber will support this link",taufib_rise2,taufib_rise1)
|