summaryrefslogtreecommitdiff
path: root/3822/CH1
diff options
context:
space:
mode:
Diffstat (limited to '3822/CH1')
-rw-r--r--3822/CH1/EX1.1/Ex1_1.jpgbin0 -> 177923 bytes
-rw-r--r--3822/CH1/EX1.1/Ex1_1.sce23
-rw-r--r--3822/CH1/EX1.2/Ex1_2.jpgbin0 -> 204974 bytes
-rw-r--r--3822/CH1/EX1.2/Ex1_2.sce18
-rw-r--r--3822/CH1/EX1.3/Ex1_3.jpgbin0 -> 212392 bytes
-rw-r--r--3822/CH1/EX1.3/Ex1_3.sce20
6 files changed, 61 insertions, 0 deletions
diff --git a/3822/CH1/EX1.1/Ex1_1.jpg b/3822/CH1/EX1.1/Ex1_1.jpg
new file mode 100644
index 000000000..bef3442e5
--- /dev/null
+++ b/3822/CH1/EX1.1/Ex1_1.jpg
Binary files differ
diff --git a/3822/CH1/EX1.1/Ex1_1.sce b/3822/CH1/EX1.1/Ex1_1.sce
new file mode 100644
index 000000000..00b7b3888
--- /dev/null
+++ b/3822/CH1/EX1.1/Ex1_1.sce
@@ -0,0 +1,23 @@
+
+//Optoelectronics and Fiber Optics Communication by C.R. Sarkar and D.C. Sarkar
+//Example 1.1
+//OS = Windows 7
+//Scilab version 5.5.2
+
+clc;
+clear;
+
+//given
+n1=1.500;//refractive index of core
+n2=1.450;//refractive index of cladding
+thetac=asind(n2/n1);//critical angle for core-cladding(in degrees)
+phim=90-thetac;//corresponding angle of obliqueness(in degrees)
+mprintf("\n Critical Angle for the core-cladding surface is =%.2f degrees ",thetac);
+mprintf("\n Corresponding Angle of Obliquences is= %.2f degrees",phim);
+Alpham=asind((n1/n2)* sind(phim));//acceptance angle
+mprintf("\n Acceptance Angle is =%.2f ",Alpham);
+NA=(((n1+n2)*(n1-n2))^0.5);//numerical aperture of the fiber
+mprintf("\n Numerical Aperture is =%.2f ",NA);
+p=((NA)^2 )*100;//percentage of light collected
+mprintf("\n Percentage of Light Collected is =%.2f percent",p);
+//the answers vary due to rounding
diff --git a/3822/CH1/EX1.2/Ex1_2.jpg b/3822/CH1/EX1.2/Ex1_2.jpg
new file mode 100644
index 000000000..105e7ac74
--- /dev/null
+++ b/3822/CH1/EX1.2/Ex1_2.jpg
Binary files differ
diff --git a/3822/CH1/EX1.2/Ex1_2.sce b/3822/CH1/EX1.2/Ex1_2.sce
new file mode 100644
index 000000000..5316b907c
--- /dev/null
+++ b/3822/CH1/EX1.2/Ex1_2.sce
@@ -0,0 +1,18 @@
+
+//Optoelectronics and Fiber Optics Communication by C.R. Sarkar and D.C. Sarkar
+//Example 1.2
+//OS = Windows 7
+//Scilab version 5.5.2
+
+clc;
+clear;
+
+//given
+NA=0.3;//numerical aperture of the optical fiber
+na=1;//refractive index of air
+Alpham=(asind(NA));//acceptance angle for the meridional rays
+gamma0=45;//in degrees
+Alphasm=(asind(NA)/cosd(gamma0));//acceptance angle for skew rays
+mprintf("\n Acceptance angle for the meridional rays is= %.2f degrees",Alpham);
+mprintf("\n Acceptance angle for the skew rays is = %.2f degrees",Alphasm);
+//The answer vary due to rounding
diff --git a/3822/CH1/EX1.3/Ex1_3.jpg b/3822/CH1/EX1.3/Ex1_3.jpg
new file mode 100644
index 000000000..3ec22cd0d
--- /dev/null
+++ b/3822/CH1/EX1.3/Ex1_3.jpg
Binary files differ
diff --git a/3822/CH1/EX1.3/Ex1_3.sce b/3822/CH1/EX1.3/Ex1_3.sce
new file mode 100644
index 000000000..43510acb9
--- /dev/null
+++ b/3822/CH1/EX1.3/Ex1_3.sce
@@ -0,0 +1,20 @@
+
+//Optoelectronics and Fiber Optics Communication by C.R. Sarkar and D.C. Sarkar
+//Example 1.3
+//OS = Windows 7
+//Scilab version 5.5.2
+
+clc;
+clear;
+
+//given
+n1=1.46;//refractive index of the core of W-step index fiber
+delta=0.02;//relative refractive index between the core and the cladding
+n2=n1-(delta*n1);//refractive index of the cladding
+NA=(((n1+n2)*(n1-n2))^0.5);//numerical aperture of the fiber
+thetac=asind(n2/n1);//critical angle at the core cladding interface
+phi=%pi*(NA^2);//solid acceptance angle in air for the fiber
+mprintf("\n Numerical Aperture is %.2f",NA);
+mprintf("\n Critical angle at the core-cladding interface is =%.2fdegrees",thetac);
+mprintf("\n Solid acceptance angle in air for the fiber is =%.2fradians",phi);
+//the answer vary due to rounding