diff options
Diffstat (limited to '3834/CH3')
24 files changed, 265 insertions, 0 deletions
diff --git a/3834/CH3/EX3.1.1/Ex3_1_1.jpg b/3834/CH3/EX3.1.1/Ex3_1_1.jpg Binary files differnew file mode 100644 index 000000000..dd34d4050 --- /dev/null +++ b/3834/CH3/EX3.1.1/Ex3_1_1.jpg diff --git a/3834/CH3/EX3.1.1/Ex3_1_1.sce b/3834/CH3/EX3.1.1/Ex3_1_1.sce new file mode 100644 index 000000000..eb51779a1 --- /dev/null +++ b/3834/CH3/EX3.1.1/Ex3_1_1.sce @@ -0,0 +1,27 @@ +//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner
+//Example 3.1.1
+//windows 7
+//Scilab version-6.0.0
+clc;
+clear;
+//given
+
+//case 1
+n1=1.48;//refractive index of the core
+n2=1.46;//refractive index of the cladding
+
+//case 2
+n3=1.495;//refractive index of the core
+n4=1.402;//refractive index of the cladding
+
+//case 1
+b=n2/n1;
+thetac=asind(b);
+mprintf("\n The critical incident angle for case 1 is=%.2f degrees",thetac);
+
+//case 2
+g=n4/n3;
+mprintf("\n The ratio=%.2f",g);
+thetac2=asind(g);
+mprintf("\n The critical incident angle for case 2 is=%.2f degrees",thetac2);
+
diff --git a/3834/CH3/EX3.1.2/Ex3_1_2.jpg b/3834/CH3/EX3.1.2/Ex3_1_2.jpg Binary files differnew file mode 100644 index 000000000..5e88f423c --- /dev/null +++ b/3834/CH3/EX3.1.2/Ex3_1_2.jpg diff --git a/3834/CH3/EX3.1.2/Ex3_1_2.sce b/3834/CH3/EX3.1.2/Ex3_1_2.sce new file mode 100644 index 000000000..75e5d90e2 --- /dev/null +++ b/3834/CH3/EX3.1.2/Ex3_1_2.sce @@ -0,0 +1,23 @@ +//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner
+//Windows 7
+//Scilab version- 6.0.0
+//Example 3.1.2
+clc;
+clear;
+//given
+
+//case 1
+n1=1.48;//Refractive index of the core for silica fiber
+n2=1.46;//Refractive index of the cladding for silica fiber
+
+//case 2
+n3=1.495;//Refractive index of the core for plastic optical fiber
+n4=1.402;//Refractive index of the cladding for plastic optical fiber
+
+//case 1
+alphac=asind(sqrt(1-(n2/n1)^2));
+mprintf("\n The Critical propagation angle for case 1 = %.2f deg",alphac);
+
+//case 2
+alphac2=asind(sqrt(1-(n4/n3)^2));
+mprintf("\n The Critical propagation angle for case 2 = %.2f deg",alphac2);
diff --git a/3834/CH3/EX3.1.3/Ex3_1_3.jpg b/3834/CH3/EX3.1.3/Ex3_1_3.jpg Binary files differnew file mode 100644 index 000000000..2465d427b --- /dev/null +++ b/3834/CH3/EX3.1.3/Ex3_1_3.jpg diff --git a/3834/CH3/EX3.1.3/Ex3_1_3.sce b/3834/CH3/EX3.1.3/Ex3_1_3.sce new file mode 100644 index 000000000..59a29da21 --- /dev/null +++ b/3834/CH3/EX3.1.3/Ex3_1_3.sce @@ -0,0 +1,31 @@ +//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner
+//Example 3.1.3
+//windows XP
+//Scilab version-5.1.1
+clc;
+clear;
+//given
+
+//case 1
+n1=1.48;//refractive index of the core
+n2=1.46;//refractive index of the cladding
+
+alphac=asin(sqrt(1-(n2/n1)^2));
+mprintf("\n The Critical propogation angle for case 1 = %.2f deg",alphac);
+b=sin(alphac);
+thetaa=asind(n1*b);//by snell's law
+
+a=2*thetaa;//acceptance angle of the fiber
+mprintf("\nThe acceptance angle for case 1 is = %.2f deg",a);
+
+//case 2
+n3=1.495;//refractive index of the core
+n4=1.402;//refractive index of the cladding
+
+alphac2=asin(sqrt(1-(n4/n3)^2));
+mprintf("\n The critical propagation angle for case 1 = %.2f deg",alphac2);
+b2=sin(alphac2);
+thetaa2=asind(n3*b2);//by snell's law
+
+a2=2*thetaa2;//acceptance angle of the fiber
+mprintf("\nThe acceptance angle for case 2 is = %.2f deg",a2);
diff --git a/3834/CH3/EX3.1.4/Ex3_1_4.jpg b/3834/CH3/EX3.1.4/Ex3_1_4.jpg Binary files differnew file mode 100644 index 000000000..54c317db3 --- /dev/null +++ b/3834/CH3/EX3.1.4/Ex3_1_4.jpg diff --git a/3834/CH3/EX3.1.4/Ex3_1_4.sce b/3834/CH3/EX3.1.4/Ex3_1_4.sce new file mode 100644 index 000000000..5bfea516a --- /dev/null +++ b/3834/CH3/EX3.1.4/Ex3_1_4.sce @@ -0,0 +1,31 @@ +//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner
+//Example 3.1.4
+//windows XP
+//Scilab version-5.5.1
+clc;
+clear;
+//given
+
+//case 1
+n1=1.48;//refractive index of the core
+n2=1.46;//refractive index of the cladding
+
+//case 2
+n3=1.495;//refractive of the index of core
+n4=1.402;//refractive index of the cladding
+
+//case 1
+b=n1*n1;
+c=n2*n2;
+v=b-c;
+NA=sqrt(v);//numerical aperture for case 1
+mprintf("\n numerical aperture for case 1=%.4f",NA);
+
+//case 2
+e=n3*n3;
+r=n4*n4;
+t=e-r;
+NA1=sqrt(t);//numerical aperture for case 2
+mprintf("\n numerical aperture for case 2=%.4f",NA1);
+
+
diff --git a/3834/CH3/EX3.2.1/Ex3_2_1.jpg b/3834/CH3/EX3.2.1/Ex3_2_1.jpg Binary files differnew file mode 100644 index 000000000..44944b5f6 --- /dev/null +++ b/3834/CH3/EX3.2.1/Ex3_2_1.jpg diff --git a/3834/CH3/EX3.2.1/Ex3_2_1.sce b/3834/CH3/EX3.2.1/Ex3_2_1.sce new file mode 100644 index 000000000..f98f24867 --- /dev/null +++ b/3834/CH3/EX3.2.1/Ex3_2_1.sce @@ -0,0 +1,16 @@ +//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner
+//Windows 7
+//Scilab version- 6.0.0
+//Example 3.2.1
+clc;
+clear;
+//given
+
+A=0.5;//attenuation in dB/Km
+Pin=1E-3;//input power in milli watts
+L=15;//length in kilometers
+
+a=[(-A*L)/10];
+b=10^(a);
+Pout=(Pin*b)*1E3;
+mprintf("ouput power is=%.3f mW",Pout);
diff --git a/3834/CH3/EX3.2.2/Ex3_2_2.jpg b/3834/CH3/EX3.2.2/Ex3_2_2.jpg Binary files differnew file mode 100644 index 000000000..f1ad75c50 --- /dev/null +++ b/3834/CH3/EX3.2.2/Ex3_2_2.jpg diff --git a/3834/CH3/EX3.2.2/Ex3_2_2.sce b/3834/CH3/EX3.2.2/Ex3_2_2.sce new file mode 100644 index 000000000..84c60dfb5 --- /dev/null +++ b/3834/CH3/EX3.2.2/Ex3_2_2.sce @@ -0,0 +1,17 @@ +//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner
+//Windows 7
+//Scilab version- 6.0.0
+//Example 3.2.2
+clc;
+clear;
+//given
+
+A=0.5;//Attenuation in dB/km
+Pin=1E-3; //Power launched in mW
+Pout=50E-6; //Receiver sensitivity in uW
+e=Pin/Pout;
+s=10/A;
+d=log10(e);
+lmax=s*d;//maximum transistion distance
+
+mprintf("Maximum transistion distance = %.2f km",lmax);
diff --git a/3834/CH3/EX3.3.1/Ex3_3_1.jpg b/3834/CH3/EX3.3.1/Ex3_3_1.jpg Binary files differnew file mode 100644 index 000000000..924584e98 --- /dev/null +++ b/3834/CH3/EX3.3.1/Ex3_3_1.jpg diff --git a/3834/CH3/EX3.3.1/Ex3_3_1.sce b/3834/CH3/EX3.3.1/Ex3_3_1.sce new file mode 100644 index 000000000..b98c06476 --- /dev/null +++ b/3834/CH3/EX3.3.1/Ex3_3_1.sce @@ -0,0 +1,18 @@ +//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner
+//Example 3.3.1
+//windows 7
+//Scilab version-6.0.0
+clc;
+clear;
+//given
+d=62.5E-6;//core diameter in SI units
+NA=0.275;//numerical aperture
+lambda=1300E-9;//operating wavelength lambda in m
+
+x=3.14*d*NA;
+
+V=x/lambda;
+
+N=(V^2)/4;
+
+mprintf("Number of modes for graded index fiber = %.0f",N);
diff --git a/3834/CH3/EX3.3.2/Ex3_3_2.jpg b/3834/CH3/EX3.3.2/Ex3_3_2.jpg Binary files differnew file mode 100644 index 000000000..f6cacf5cf --- /dev/null +++ b/3834/CH3/EX3.3.2/Ex3_3_2.jpg diff --git a/3834/CH3/EX3.3.2/Ex3_3_2.sce b/3834/CH3/EX3.3.2/Ex3_3_2.sce new file mode 100644 index 000000000..fa6cc683f --- /dev/null +++ b/3834/CH3/EX3.3.2/Ex3_3_2.sce @@ -0,0 +1,23 @@ +//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner
+//Example 3.3.2
+//windows 7
+//Scilab version-6.0.0
+clc;
+clear;
+//given
+L=5;//fiber length in km
+NA=0.275;//numerical aperture
+c=3E5;//speed of light in km
+n1=1.48;//refractive index
+
+p=2*c*n1;
+
+e=NA*NA;
+
+d=L*e;
+
+deltatsi=(d/p)*1E9;//pulse spreading in ns //answer vary due round-off
+deltatsi_by_L=(deltatsi/L)//pulse spreading per unit length in ns/Km//answer vary due round-off
+
+mprintf("\n Light pulse spreading= %.2f ns",deltatsi);
+mprintf("\n Pulse spreading per unit length is=%.2f ns/Km",deltatsi_by_L);
diff --git a/3834/CH3/EX3.3.3/Ex3_3_3.jpg b/3834/CH3/EX3.3.3/Ex3_3_3.jpg Binary files differnew file mode 100644 index 000000000..4f1fb484a --- /dev/null +++ b/3834/CH3/EX3.3.3/Ex3_3_3.jpg diff --git a/3834/CH3/EX3.3.3/Ex3_3_3.sce b/3834/CH3/EX3.3.3/Ex3_3_3.sce new file mode 100644 index 000000000..a9501fe6b --- /dev/null +++ b/3834/CH3/EX3.3.3/Ex3_3_3.sce @@ -0,0 +1,22 @@ +//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner
+//Example 3.3.3
+//windows 7
+//Scilab version-6.0.0
+clc;
+clear;
+//given
+L=5;//fiber length in km
+NA=0.275;//numerical aperture
+c=3E5;//speed of light in km
+n1=1.48;//refractive index
+
+p=2*c*n1;
+
+e=NA*NA;
+
+d=L*e;
+
+deltatsi=(d/p)*1E9;//pulse spreading in ns //answer vary due round-off
+deltatsi_by_L=(deltatsi/L)//pulse spreading per unit length in ns/Km//answer vary due round-off
+Maximum_bit_rate=1e3/deltatsi_by_L//maximum bit rate in Mbits/s//multiplication by 1e3 to conver unit from Gbits/s to Mbits per sec
+mprintf("\n maximum bit rate = %.1f Mbits/s",Maximum_bit_rate);//answer vary due to rounding
diff --git a/3834/CH3/EX3.3.4/Ex3_3_4.jpg b/3834/CH3/EX3.3.4/Ex3_3_4.jpg Binary files differnew file mode 100644 index 000000000..0827c4597 --- /dev/null +++ b/3834/CH3/EX3.3.4/Ex3_3_4.jpg diff --git a/3834/CH3/EX3.3.4/Ex3_3_4.sce b/3834/CH3/EX3.3.4/Ex3_3_4.sce new file mode 100644 index 000000000..181e848f0 --- /dev/null +++ b/3834/CH3/EX3.3.4/Ex3_3_4.sce @@ -0,0 +1,20 @@ +//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner
+//Windows 7
+//Scilab version- 6.0.0
+//Example 3.3.4
+clc;
+clear;
+//given
+N1=1.487;//refractive index
+delta=1.71;
+L=5E3;//length of the graded index fiber
+c=3E8;//velocity of light in m/s
+
+b=delta*delta;
+e=L*N1*b;
+w=8*c;
+deltatg1=(e/w)*1E5;//pulse spreading due to modal dispersion in ns
+deltatg1_by_L=(deltatg1/L)*1E3;//maximum bit rate Mbits/s
+
+mprintf("\n Pulse spreading due to modal dispersion=%.1f ns",deltatg1);
+mprintf("\n Maximum bit rate=%.2f ns/Km",deltatg1_by_L);
diff --git a/3834/CH3/EX3.3.5/Ex3_3_5.jpg b/3834/CH3/EX3.3.5/Ex3_3_5.jpg Binary files differnew file mode 100644 index 000000000..87e955e3c --- /dev/null +++ b/3834/CH3/EX3.3.5/Ex3_3_5.jpg diff --git a/3834/CH3/EX3.3.5/Ex3_3_5.sce b/3834/CH3/EX3.3.5/Ex3_3_5.sce new file mode 100644 index 000000000..b8caec59a --- /dev/null +++ b/3834/CH3/EX3.3.5/Ex3_3_5.sce @@ -0,0 +1,19 @@ +//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner
+//Windows 7
+//Scilab version- 6.0.0
+//Example 3.3.5
+clc;
+clear;
+//given
+
+S0=0.097;//zero dispersion slope in ps/(nm^2.km)
+lambda0=1343E-9; //zero dispersion wavelength in m
+lambda=1300E-9;//operating wavelength in m
+
+b=lambda0*lambda0*lambda0*lambda0;
+c=lambda*lambda*lambda;
+x=b/c;
+e=lambda-x;
+g=S0/4;
+Dlambda=g*e*1E9;//Chromatic dispersion in ps/(nm.Km)
+mprintf("\n Chromatic dispersion =%.2f ps/(nm.Km)",Dlambda);
diff --git a/3834/CH3/EX3.4.1/Ex3_4_1.jpg b/3834/CH3/EX3.4.1/Ex3_4_1.jpg Binary files differnew file mode 100644 index 000000000..ab9e0f920 --- /dev/null +++ b/3834/CH3/EX3.4.1/Ex3_4_1.jpg diff --git a/3834/CH3/EX3.4.1/Ex3_4_1.sce b/3834/CH3/EX3.4.1/Ex3_4_1.sce new file mode 100644 index 000000000..a21657ceb --- /dev/null +++ b/3834/CH3/EX3.4.1/Ex3_4_1.sce @@ -0,0 +1,18 @@ +//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner
+//Windows 7
+//Scilab version- 6.0.0
+//Example 3.4.1
+clc;
+clear;
+//given
+
+NA=0.275;//numerical aperture
+N1=1.487;//refractive in dex
+c=3E8;//speed of light in m/s
+L=1E3;//length of the link
+a=N1*N1*N1;
+b=8*c*a;
+d=NA*NA*NA*NA;
+g=L*d;
+BRg1=(b/g);
+mprintf("The bits restricted by modal dispersion is=%.2f Gbit/s",BRg1/1e9);//division by 1e9 t0 convert unit from bits/sec to Gbits /sec
|
