initial commit / add all books

5 files changed, 93 insertions, 0 deletions

diff --git a/2216/CH2/EX2.1/ex_2_1.sce b/2216/CH2/EX2.1/ex_2_1.sce
new file mode 100755
index 000000000..cc514fbbe
--- /dev/null
+++ b/2216/CH2/EX2.1/ex_2_1.sce
@@ -0,0 +1,23 @@
+//Example 2.1 // NA ,angles and pulse broadning
+clc;
+clear;
+close;
+format('v',9 )
+disp("part (a)")
+n1=1.5;//core refrative index
+n2=1.48;//claddin refractive index
+a=100/2;//radius in micro meter
+na=1;//air refrative index
+NA=sqrt(n1^2-n2^2);//numerical aperture
+disp(NA,"numerical aperture is")
+disp("part (b)")
+am=(asind(NA));//
+tm=asind(NA/n1);//
+tc=asind(n2/n1);//
+disp(am,"angle in degree is (αm)")
+disp(tm,"angle in degree is (Om)")
+disp(tc,"angle in degree is(Φc)")
+disp("part (c)")
+c=3*10^8;//speed of light in m/s
+dtl=((n1/n2)*(n1-n2)/c);//pulse broadning per unit length
+disp(dtl,"pulse broadning per unit length in sm^-1")
diff --git a/2216/CH2/EX2.2/ex_2_2.sce b/2216/CH2/EX2.2/ex_2_2.sce
new file mode 100755
index 000000000..c92ca8229
--- /dev/null
+++ b/2216/CH2/EX2.2/ex_2_2.sce
@@ -0,0 +1,17 @@
+//Example 2.2 // minimum and maximum number of reflections
+clc;
+clear;
+close;
+format('v',5)
+n1=1.5;//core refrative index
+n2=1.48;//claddin refractive index
+a=100/2;//radius in micro meter
+na=1;//air refrative index
+NA=sqrt(n1^2-n2^2);//numerical aperture
+am=(asind(NA));//
+tm=asind(NA/n1);//
+tc=asind(n2/n1);//
+L=((a*10^-6)/(tand(tm)));//length in meter
+x=(1/(2*L));//maximum number of reflections per meter
+disp("all other rays will suffer reflections between these two extremes of "+string(0)+" and "+string(x)+" m^-1")
+//answer is wrong in the textbook
diff --git a/2216/CH2/EX2.3/ex_2_3.sce b/2216/CH2/EX2.3/ex_2_3.sce
new file mode 100755
index 000000000..f3344f789
--- /dev/null
+++ b/2216/CH2/EX2.3/ex_2_3.sce
@@ -0,0 +1,11 @@
+//Example 2.3 // pulse broadning
+clc;
+clear;
+close;
+format('v',6)
+h=0.85;//WAVELENGTH IN MICRO METER
+y=0.035;//spectral width
+c=0.021;//constant
+cl=3;//speed of light in m/s
+dtl=(y/cl)*c;//
+disp(dtl*10^4,"pulse broadning  in ns km^-1")
diff --git a/2216/CH2/EX2.4/ex_2_4.sce b/2216/CH2/EX2.4/ex_2_4.sce
new file mode 100755
index 000000000..ed61bfa3d
--- /dev/null
+++ b/2216/CH2/EX2.4/ex_2_4.sce
@@ -0,0 +1,21 @@
+//Example 2.4 // pulse broadning
+clc;
+clear;
+close;
+format('v',6)
+disp("part (a)")
+h=850;//WAVELENGTH IN NANO METER
+l=80;//fiber length in Km
+dh=30;//in Nano Meter
+m1=105.5;//material dispersion for h=850nm in ps/nm-Km
+m2=2.8;//material dispersion for h=1300nm in ps/nm-Km
+t=m1*l*dh*10^-3;//material dispersion in ns when h=850nm
+disp(t,"material dispersion in ns when h=850nm")
+disp("part (b)")
+h=1300;//WAVELENGTH IN NANO METER
+l=80;//fiber length in Km
+dh=30;//in Nano Meter
+m1=105.5;//material dispersion for h=850nm in ps/nm-Km
+m2=2.8;//material dispersion for h=1300nm in ps/nm-Km
+t=m2*l*dh*10^-3;//material dispersion in ns when h=850nm
+disp(t,"material dispersion in ns when h=1300nm")
diff --git a/2216/CH2/EX2.5/ex_2_5.sce b/2216/CH2/EX2.5/ex_2_5.sce
new file mode 100755
index 000000000..ca8b4af2e
--- /dev/null
+++ b/2216/CH2/EX2.5/ex_2_5.sce
@@ -0,0 +1,21 @@
+//Example 2.5; pulse broadning
+clc;
+clear;
+close;
+format('v',6)
+disp("part (a)")
+h=850;//WAVELENGTH IN NANO METER
+l=80;//fiber length in Km
+dh=2;//in Nano Meter
+m1=105.5;//material dispersion for h=850nm in ps/nm-Km
+m2=2.8;//material dispersion for h=1300nm in ps/nm-Km
+t=m1*l*dh*10^-3;//material dispersion in ns when h=850nm
+disp(t,"material dispersion in ns when h=850nm")
+disp("part (b)")
+h=1300;//WAVELENGTH IN NANO METER
+l=80;//fiber length in Km
+dh=2;//in Nano Meter
+m1=105.5;//material dispersion for h=850nm in ps/nm-Km
+m2=2.8;//material dispersion for h=1300nm in ps/nm-Km
+t=m2*l*dh*10^-3;//material dispersion in ns when h=850nm
+disp(t,"material dispersion in ns when h=1300nm")