1 files changed, 19 insertions, 0 deletions
diff --git a/2309/CH3/EX3.a.5/A_Ex3_5.sce b/2309/CH3/EX3.a.5/A_Ex3_5.sce
new file mode 100755
index 000000000..9e0a5a9be
--- /dev/null
+++ b/2309/CH3/EX3.a.5/A_Ex3_5.sce
@@ -0,0 +1,19 @@
+// Chapter 3 Additional Example 5
+//==============================================================================
+clc;
+clear;
+
+//input data
+NA      = 0.25;      // Numerical aperture 
+d       = 6*10^-6   // core diameter
+lamda   = 1.5*10^-6; // wavelength of laser source
+n1      = 1.47;      // refractive index of core
+n2      = 1.43       // refractive index of cladding
+
+// calculations
+NA      = sqrt( n1^2 - n2^2);       // Numerical Aperture
+N       = 4.9*(d*NA/lamda)^2;       // no of modes for step index fibre
+
+// Output
+mprintf('No. of total modes propagating in the fibre = %d',N);
+//==============================================================================