summaryrefslogtreecommitdiff
path: root/1271/CH5/EX5.11/example5_11.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1271/CH5/EX5.11/example5_11.sce
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 '1271/CH5/EX5.11/example5_11.sce')
-rwxr-xr-x1271/CH5/EX5.11/example5_11.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/1271/CH5/EX5.11/example5_11.sce b/1271/CH5/EX5.11/example5_11.sce
new file mode 100755
index 000000000..a3168cd32
--- /dev/null
+++ b/1271/CH5/EX5.11/example5_11.sce
@@ -0,0 +1,11 @@
+clc
+// Given that
+lambda = 1.25e-6 //wavelength of light in meter
+mu1 = 1.46 // refractive index for core
+mu2 = 1.457 // refractive index for cladding
+// Sample Problem 11 on page no. 5.20
+printf("\n # PROBLEM 11 # \n")
+NA = sqrt(mu1^2 - mu2^2)//calculation for numerical aperture
+k = (2.4 * lambda) / ( %pi * NA)
+printf("\n Standard formula used \n d<8*lambda/(pi*NA)\n")
+printf("\n Maximum diameter of core = %f micro meter",k*1e6)