summaryrefslogtreecommitdiff
path: root/3506/CH2
diff options
context:
space:
mode:
Diffstat (limited to '3506/CH2')
-rw-r--r--3506/CH2/EX2.1/EXP_2_1.sce27
-rw-r--r--3506/CH2/EX2.1/Ex_2_1.JPGbin0 -> 107349 bytes
-rw-r--r--3506/CH2/EX2.10/EX_2_10.JPGbin0 -> 61434 bytes
-rw-r--r--3506/CH2/EX2.10/Exp_2_10.sce25
-rw-r--r--3506/CH2/EX2.2/EXP_2_2.sce16
-rw-r--r--3506/CH2/EX2.2/EX_2_2.JPGbin0 -> 126491 bytes
-rw-r--r--3506/CH2/EX2.3/EX_2_3.JPGbin0 -> 130135 bytes
-rw-r--r--3506/CH2/EX2.3/Ex_2_3.sce17
-rw-r--r--3506/CH2/EX2.4/EX_2_4.JPGbin0 -> 128906 bytes
-rw-r--r--3506/CH2/EX2.4/Ex_2_4.sce15
-rw-r--r--3506/CH2/EX2.6/EX_2_6.JPGbin0 -> 140968 bytes
-rw-r--r--3506/CH2/EX2.6/ExP_2_6.sce17
-rw-r--r--3506/CH2/EX2.8/EXP_2_8.sce18
-rw-r--r--3506/CH2/EX2.8/Ex_2_8.JPGbin0 -> 43387 bytes
-rw-r--r--3506/CH2/EX2.9/EX_2_9.JPGbin0 -> 144050 bytes
-rw-r--r--3506/CH2/EX2.9/Exp_2_9.sce37
16 files changed, 172 insertions, 0 deletions
diff --git a/3506/CH2/EX2.1/EXP_2_1.sce b/3506/CH2/EX2.1/EXP_2_1.sce
new file mode 100644
index 000000000..9b6a4f9c8
--- /dev/null
+++ b/3506/CH2/EX2.1/EXP_2_1.sce
@@ -0,0 +1,27 @@
+//Optical Fiber communication by A selvarajan
+//example 2.1
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+//case-1
+ncore=1.46//refractive index of core
+nclad=1//refractive index of cladding
+c=3e5//velocity of light in Km/s
+L=1// length of path in Km
+NA=sqrt(ncore^2-nclad^2)//Numerical aperture
+delt_tau_by_L=(NA^2)/(2*c*ncore) //multipath pulse broadening in s/Km
+delt_tau=delt_tau_by_L*L//bandwidth distance product Hz
+BL=(1/delt_tau)*L//bandwidth distance product Hz
+mprintf('Numerical aperture=%f',NA);//The answers vary due to round off error
+mprintf('\nMultipath pulse broadening=%fns/Km',delt_tau_by_L*1e9);//The answer provided in the textbook is wrong//multiplication by 1e9 to convert s/Km to ns/Km
+mprintf('\nBandwidth distance product=%fMHz',BL*1e-6);//The answer provided in the textbook is wrong//multiplication by 1e-6 to convert Hz to MHz
+//case-2
+ncore=1.465//refractive index of core
+nclad=1.45//refractive index of cladding
+NA=sqrt(ncore^2-nclad^2)//Numerical aperture
+delt_tau_by_L=(NA^2)/(2*c*ncore) //multipath pulse broadening in s/m
+BL=(1/delt_tau_by_L)*L//bandwidth distance product Hz
+mprintf('\n\nNumerical aperture=%f',NA);
+mprintf('\nMultipath pulse broadening=%fns/Km',delt_tau_by_L*1e9);//The answer provided in the textbook is wrong//multiplication by 1e9 to convert s/Km to ns/Km
+mprintf('\nBandwidth distance product=%fGHz',BL*1e-9);//The answer provided in the textbook is wrong//multiplication by 1e-6 to convert Hz to GHz
diff --git a/3506/CH2/EX2.1/Ex_2_1.JPG b/3506/CH2/EX2.1/Ex_2_1.JPG
new file mode 100644
index 000000000..c5f486a4a
--- /dev/null
+++ b/3506/CH2/EX2.1/Ex_2_1.JPG
Binary files differ
diff --git a/3506/CH2/EX2.10/EX_2_10.JPG b/3506/CH2/EX2.10/EX_2_10.JPG
new file mode 100644
index 000000000..274be1ec5
--- /dev/null
+++ b/3506/CH2/EX2.10/EX_2_10.JPG
Binary files differ
diff --git a/3506/CH2/EX2.10/Exp_2_10.sce b/3506/CH2/EX2.10/Exp_2_10.sce
new file mode 100644
index 000000000..d9894ad55
--- /dev/null
+++ b/3506/CH2/EX2.10/Exp_2_10.sce
@@ -0,0 +1,25 @@
+//Optical Fiber communication by A selvarajan
+//example 2.10
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+//given
+//case-1
+n1=1.49;//refractive index of core
+n2=1.46//refractive index of cladding
+c=3*10^5;//speed of light in Km/s
+t1=n1/c;//time delay for one traveling along axis in s/Km
+t2=(n1^2/n2)/c//time delay for one traveling along path that is totally reflecting at the first interface in s/km
+mprintf("time delay for traveling along axis =%f us/Km",t1*1e6)//multiplication by 1e6 to convert the unit from s/Km to us/Km
+mprintf("\ntime delay for traveling along path that is totally reflecting at the first interface =%fus/km",t2*1e6)//multiplication by 1e6 to convert the unit from s/Km to us/Km
+//case-2
+n1=1.47;//refractive index of core
+n2=1.46//refractive index of cladding
+c=3*10^5;//speed of light in Km/s
+t1=n1/c;//time delay for one traveling along axis in
+t2=(n1^2/n2)/c//time delay for one traveling along path that is totally reflecting at the first interface
+mprintf("\ntime delay for traveling along axis =%f us/Km",t1*1e6)//multiplication by 1e6 to convert the unit from s/Km to us/Km
+mprintf("\ntime delay for traveling along path that is totally reflecting at the first interface =%fus/km",t2*1e6)//multiplication by 1e6 to convert the unit from s/Km to us/Km
+
+//The answer provided in the textbook is wrong it has got wrong unit
diff --git a/3506/CH2/EX2.2/EXP_2_2.sce b/3506/CH2/EX2.2/EXP_2_2.sce
new file mode 100644
index 000000000..a5212896b
--- /dev/null
+++ b/3506/CH2/EX2.2/EXP_2_2.sce
@@ -0,0 +1,16 @@
+//Optical Fiber communication by A selvarajan
+//example 2.2
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+lamda1=0.7//wavelength in um
+lamda2=1.3//wavelength in um
+lamda3=2//wavelength in um
+f_lambda1=(303.33*(lamda1^-1)-233.33)//equation for lambda1
+f_lambda2=(303.33*(lamda2^-1)-233.33)//equation for lambda2
+f_lambda3=(303.33*(lamda3^-1)-233.33)//equation for lambda3
+mprintf("Material dispersion at Lambda 0.7um=%f",f_lambda1)
+mprintf("\nMaterial dispersion at Lambda 1.3um=%f",f_lambda2)//The answers vary due to round off error
+mprintf("\nMaterial dispersion at Lambda 2um=%f",f_lambda3)//The answers vary due to round off error
+mprintf('\nIts is a standard silica fiber')
diff --git a/3506/CH2/EX2.2/EX_2_2.JPG b/3506/CH2/EX2.2/EX_2_2.JPG
new file mode 100644
index 000000000..e8ff89a22
--- /dev/null
+++ b/3506/CH2/EX2.2/EX_2_2.JPG
Binary files differ
diff --git a/3506/CH2/EX2.3/EX_2_3.JPG b/3506/CH2/EX2.3/EX_2_3.JPG
new file mode 100644
index 000000000..170281976
--- /dev/null
+++ b/3506/CH2/EX2.3/EX_2_3.JPG
Binary files differ
diff --git a/3506/CH2/EX2.3/Ex_2_3.sce b/3506/CH2/EX2.3/Ex_2_3.sce
new file mode 100644
index 000000000..6863c0633
--- /dev/null
+++ b/3506/CH2/EX2.3/Ex_2_3.sce
@@ -0,0 +1,17 @@
+//Optical Fiber communication by A selvarajan
+//example 2.3
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+//given
+ncore=1.505//refractive index of core
+nclad=1.502//refractive index of cladding
+V=2.4//v no. for single mode
+lambda=1300e-9//operating wavelength in m
+//to find
+NA=sqrt(ncore^2-nclad^2)//numerical aperture
+a=V*(lambda)/(2*%pi*NA)//dimension of fiber core in m
+//display
+mprintf("The numarical aperture =%f",NA);
+mprintf("\n Dimension of fiber core =%f um",a*1e6)//multiplication by 1e6 to convert unit from m to um
diff --git a/3506/CH2/EX2.4/EX_2_4.JPG b/3506/CH2/EX2.4/EX_2_4.JPG
new file mode 100644
index 000000000..f95fb5874
--- /dev/null
+++ b/3506/CH2/EX2.4/EX_2_4.JPG
Binary files differ
diff --git a/3506/CH2/EX2.4/Ex_2_4.sce b/3506/CH2/EX2.4/Ex_2_4.sce
new file mode 100644
index 000000000..5e201862e
--- /dev/null
+++ b/3506/CH2/EX2.4/Ex_2_4.sce
@@ -0,0 +1,15 @@
+//Optical Fiber communication by A selvarajan
+//example 2.4
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+//given
+
+V=2//v no. for single mode
+a=4//radius of fiber in um
+//to find
+w=a*(0.65+1.619*V^(-3/2)+2.87*V^-6)//effective mode radius in um
+//display
+
+mprintf("Effective mode radius =%f um",w)
diff --git a/3506/CH2/EX2.6/EX_2_6.JPG b/3506/CH2/EX2.6/EX_2_6.JPG
new file mode 100644
index 000000000..5f2a41cd2
--- /dev/null
+++ b/3506/CH2/EX2.6/EX_2_6.JPG
Binary files differ
diff --git a/3506/CH2/EX2.6/ExP_2_6.sce b/3506/CH2/EX2.6/ExP_2_6.sce
new file mode 100644
index 000000000..995e8bb5a
--- /dev/null
+++ b/3506/CH2/EX2.6/ExP_2_6.sce
@@ -0,0 +1,17 @@
+//Optical Fiber communication by A selvarajan
+//example 2.6
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+//given
+ m=0// for dominant mode
+ v=0// for dominant mode
+ n1=1.5// refractive index of core
+ delta=0.01// core clad index difference
+ a=5// fiber radius in um
+ lambda=1.3//wavelength of operation in um
+// to find
+ k0=(2*%pi/lambda)//constant in /m
+beta=sqrt((k0^2)*(n1^2)-(2*k0*n1*sqrt(2*delta)/a))//propagation constant in rad/um
+ mprintf('Propagation constant=%f rad/um',beta)//The answers vary due to round off error
diff --git a/3506/CH2/EX2.8/EXP_2_8.sce b/3506/CH2/EX2.8/EXP_2_8.sce
new file mode 100644
index 000000000..581314c60
--- /dev/null
+++ b/3506/CH2/EX2.8/EXP_2_8.sce
@@ -0,0 +1,18 @@
+//Optical Fiber communication by A selvarajan
+//example 2.8
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+//given
+M=1000;//modes supported
+lambda=1.3;//operating wavelength in um
+n1=1.5;//refractive index of core
+n2=1.48;//refractive index of cladding
+//to find
+V=sqrt(2*M)// normalised frequency V no.
+NA=sqrt(n1^2-n2^2)//numerical apperture
+R=lambda*V/(2*%pi*NA)//radius of fiber in um
+//display
+mprintf("Core Radius=%fum",R)//The answer provided in the textbook is wrong
+
diff --git a/3506/CH2/EX2.8/Ex_2_8.JPG b/3506/CH2/EX2.8/Ex_2_8.JPG
new file mode 100644
index 000000000..b08d23440
--- /dev/null
+++ b/3506/CH2/EX2.8/Ex_2_8.JPG
Binary files differ
diff --git a/3506/CH2/EX2.9/EX_2_9.JPG b/3506/CH2/EX2.9/EX_2_9.JPG
new file mode 100644
index 000000000..32b9b5961
--- /dev/null
+++ b/3506/CH2/EX2.9/EX_2_9.JPG
Binary files differ
diff --git a/3506/CH2/EX2.9/Exp_2_9.sce b/3506/CH2/EX2.9/Exp_2_9.sce
new file mode 100644
index 000000000..c47664c6d
--- /dev/null
+++ b/3506/CH2/EX2.9/Exp_2_9.sce
@@ -0,0 +1,37 @@
+//Optical Fiber communication by A selvarajan
+//example 2.9
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+//given
+lambda=1.3;//wavelength of operation in um
+n1=1.5;// refractive index of core
+n2=1.48;// refractive index of cladding
+k0=2*%pi/lambda;//constant in /m
+//case-1
+b=0.5//normalized propagation constant
+k0=2*%pi/lambda//constant
+beta=k0*sqrt(n2^2+b*(n1^2-n2^2))//propagation constant
+mprintf("Propagation constant=%frad/um",beta)//The answers vary due to round off error
+//case-2
+//given
+lambda=1.3;//wavelength of operation in um
+n1=1.5;// refractive index of core
+n2=1.48;// refractive index of cladding
+k0=2*%pi/lambda;//constant in /m
+b=0.5//normalized propagation constant
+k0=2*%pi/lambda//constant
+b=(((n1+n2)/2)^2-n2^2)/(n1^2-n2^2)//normalized propagation constant
+mprintf("\nPropagation constant=%f ",b)//The answers vary due to round off error
+
+//case-3
+//given
+lambda=1.3;//wavelength of operation in um
+n1=1.5;// refractive index of core
+n2=1.0;// refractive index of cladding
+k0=2*%pi/lambda;//constant in /m
+b=0.5//normalized propagation constant
+k0=2*%pi/lambda//constant
+beta=k0*sqrt(n2^2+b*(n1^2-n2^2))//propagation constant
+mprintf("\nPropagation constant=%f rad/um",beta)//The answers vary due to round off error