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.3/Ex4_3.sce | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 3415/CH4/EX4.3/Ex4_3.sce (limited to '3415/CH4/EX4.3/Ex4_3.sce') 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