summaryrefslogtreecommitdiff
path: root/1985/CH5/EX5.8
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1985/CH5/EX5.8
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1985/CH5/EX5.8')
-rwxr-xr-x1985/CH5/EX5.8/chapter5_Example8.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/1985/CH5/EX5.8/chapter5_Example8.sce b/1985/CH5/EX5.8/chapter5_Example8.sce
new file mode 100755
index 000000000..7e737ee22
--- /dev/null
+++ b/1985/CH5/EX5.8/chapter5_Example8.sce
@@ -0,0 +1,14 @@
+clc
+clear
+//Input data
+l=1*10^-6//Wavelength of light used in m
+n1=1.45//Refractive index of the core
+n2=1.448//Refractive index of the cladding
+d=6*10^-6//Diamter of the core in m
+
+//Calculations
+NA=sqrt(n1^2-n2^2)//Numerical aperture
+N=4.9*(d*NA/l)^2//Number of modes propagating through the fibre
+
+//Output
+printf('The number of modes that can be allowed through the fibre is %i. \n It is a single-mode fibre',N)