From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 3415/CH4/EX4.1/Ex4_1.JPG | Bin 0 -> 52528 bytes 3415/CH4/EX4.1/Ex4_1.sce | 21 +++++++++++++++++++++ 3415/CH4/EX4.2/Ex4_2.JPG | Bin 0 -> 50326 bytes 3415/CH4/EX4.2/Ex4_2.sce | 14 ++++++++++++++ 3415/CH4/EX4.3/Ex4_3.JPG | Bin 0 -> 49243 bytes 3415/CH4/EX4.3/Ex4_3.sce | 20 ++++++++++++++++++++ 6 files changed, 55 insertions(+) create mode 100644 3415/CH4/EX4.1/Ex4_1.JPG create mode 100644 3415/CH4/EX4.1/Ex4_1.sce create mode 100644 3415/CH4/EX4.2/Ex4_2.JPG create mode 100644 3415/CH4/EX4.2/Ex4_2.sce create mode 100644 3415/CH4/EX4.3/Ex4_3.JPG create mode 100644 3415/CH4/EX4.3/Ex4_3.sce (limited to '3415/CH4') diff --git a/3415/CH4/EX4.1/Ex4_1.JPG b/3415/CH4/EX4.1/Ex4_1.JPG new file mode 100644 index 000000000..2a57085bb Binary files /dev/null and b/3415/CH4/EX4.1/Ex4_1.JPG differ diff --git a/3415/CH4/EX4.1/Ex4_1.sce b/3415/CH4/EX4.1/Ex4_1.sce new file mode 100644 index 000000000..9fbf95519 --- /dev/null +++ b/3415/CH4/EX4.1/Ex4_1.sce @@ -0,0 +1,21 @@ +//fiber optic communications by joseph c. palais +//example 4.1 +//OS=Windows XP sp3 +//Scilab version 5.4.1 +clc +clear all +//given +d=1.64//Daimeter of waveguide in um +lambda=0.82//wavelength in um + +//to find +dbylambda=d/lambda//d by lambda ratio normalized thickness +neff1=3.594//for TE0 mode from figure 4.5 for calculated normalized thickness +theta1=86.7//for TE0 mode from figure 4.5 for calculated normalized thickness +neff2=3.578//for TE1 mode from figure 4.5 for calculated normalized thickness +theta2=83.7//for TE1 mode from figure 4.5 for calculated normalized thickness +neff3=3.577//for TE2 mode from figure 4.5 for calculated normalized thickness +theta3=81.1//for TE2 mode from figure 4.5 for calculated normalized thickness +mprintf('For TE0 mode \n neff =%f theta=%f degree',neff1,theta1) +mprintf(' \nFor TE1 mode \n neff =%f theta=%f degree',neff2,theta2) +mprintf(' \nFor TE2 mode \n neff =%f theta=%f degree',neff3,theta3) diff --git a/3415/CH4/EX4.2/Ex4_2.JPG b/3415/CH4/EX4.2/Ex4_2.JPG new file mode 100644 index 000000000..e5b235669 Binary files /dev/null and b/3415/CH4/EX4.2/Ex4_2.JPG differ diff --git a/3415/CH4/EX4.2/Ex4_2.sce b/3415/CH4/EX4.2/Ex4_2.sce new file mode 100644 index 000000000..2b3e6f725 --- /dev/null +++ b/3415/CH4/EX4.2/Ex4_2.sce @@ -0,0 +1,14 @@ +//fiber optic communications by joseph c. palais +//example 4.2 +//OS=Windows XP sp3 +//Scilab version 5.4.1 +clc +clear all +//given +lambda=0.82//wavelength in um +n1=3.6//refractive index of core AlGaAs slab +n2=3.55//refractive index of cladding +//to find +d=lambda/(2*sqrt(n1^2-n2^2))//Largest thickness in um + +mprintf(' Maximum thickness that will guarantee single TE-mode operation at 0.82umin AlGaAs slab waveguide =%f um',d) diff --git a/3415/CH4/EX4.3/Ex4_3.JPG b/3415/CH4/EX4.3/Ex4_3.JPG new file mode 100644 index 000000000..56262c7ac Binary files /dev/null and b/3415/CH4/EX4.3/Ex4_3.JPG differ diff --git a/3415/CH4/EX4.3/Ex4_3.sce b/3415/CH4/EX4.3/Ex4_3.sce new file mode 100644 index 000000000..e7a0bb003 --- /dev/null +++ b/3415/CH4/EX4.3/Ex4_3.sce @@ -0,0 +1,20 @@ +//fiber optic communications by joseph c. palais +//example 4.3 +//OS=Windows XP sp3 +//Scilab version 5.4.1 +clc +clear all +//given +lambda=0.82//wavelength in um +n1=3.6//refractive index of core AlGaAs slab +n2=3.55//refractive index of cladding +n3=3.55//refractive index of cladding +n0=1//refractive index of Air + + +//to find +NA=sqrt(n1^2-n2^2)//Numerical aperture +alpha0=asind(NA/n0)//Acceptance angle in degree + +mprintf(' Numerical aperture =%f ',NA) +mprintf(' \nAcceptance angle in range =+%fdegree to -+%fdegree',alpha0,alpha0) -- cgit