summaryrefslogtreecommitdiff
path: root/3834/CH4/EX4.4.1/Ex4_4_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3834/CH4/EX4.4.1/Ex4_4_1.sce')
-rw-r--r--3834/CH4/EX4.4.1/Ex4_4_1.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/3834/CH4/EX4.4.1/Ex4_4_1.sce b/3834/CH4/EX4.4.1/Ex4_4_1.sce
new file mode 100644
index 000000000..4c637c44d
--- /dev/null
+++ b/3834/CH4/EX4.4.1/Ex4_4_1.sce
@@ -0,0 +1,18 @@
+//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner
+//Example 4.4.1
+//windows 7
+//Scilab version-6.0.0
+clc;
+clear;
+//given
+
+d=62.5E-6;//core diameter in SI units
+D=125E-6;//cladding diameter in SI units
+NA=0.275;//numerical aperture
+lambda=1300E-9;//operating wavelength lambda in m
+
+x=3.14*d*NA;
+V=x/lambda;
+PcladbyPtotal=2*sqrt(2)/(3*V)//Power carried by fiber cladding
+mprintf("\nPower carried by fiber cladding = %.3f",PcladbyPtotal);
+