diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3638/CH8/EX8.9/Ex8_9.sce | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '3638/CH8/EX8.9/Ex8_9.sce')
| -rw-r--r-- | 3638/CH8/EX8.9/Ex8_9.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/3638/CH8/EX8.9/Ex8_9.sce b/3638/CH8/EX8.9/Ex8_9.sce new file mode 100644 index 000000000..4bfaaee5e --- /dev/null +++ b/3638/CH8/EX8.9/Ex8_9.sce @@ -0,0 +1,20 @@ +//Introduction to Fiber Optics by A. Ghatak and K. Thyagarajan, Cambridge, New Delhi, 1999
+//Example 8.9
+//OS=Windows XP sp3
+//Scilab version 5.5.2
+clc;
+clear;
+//given
+lambda0=1.3e-6;//operating wavelength of single mode fiber in m
+thetah=2.357;//angle corresponding to 3 dB point in degrees
+thetax=12.73;//angle in degrees at which intensity first becomes zero
+sigmax=sind(thetax)/sind(thetah);//ratio of sine of angles
+V=8.039-2.347*sigmax+0.3329*sigmax^2-0.0218*sigmax^3+0.00054*sigmax^4;//corresponding dimensionless V number
+alphah=-0.7858+0.994*V-0.1155*V^2;
+k0=2*%pi/lambda0;//free space wave number in rad/m
+a=alphah/(k0*sind(thetah));//radius of core in m
+NA=V*lambda0/(2*%pi*a);//corresponding value of numerical aperture
+mprintf("The ESI parameters of given fiber are:");
+mprintf("\n Radius of core=%f um",a/1e-6);//division by 1e-6 to convert in um
+//The answers vary due to round off error
+mprintf("\n Numerical aperture=%.2f",NA);
|