1 files changed, 23 insertions, 0 deletions
diff --git a/3543/CH2/EX2.07/Ex2_7.sce b/3543/CH2/EX2.07/Ex2_7.sce
new file mode 100644
index 000000000..d3ac93874
--- /dev/null
+++ b/3543/CH2/EX2.07/Ex2_7.sce
@@ -0,0 +1,23 @@
+// Example 2.7
+// Calculation of normalized frequency and no of guided modes
+// Page no 481
+
+clc;
+clear;
+close;
+
+//Given data
+lambda=1.55*10^-6;      // Wavelength of fiber
+a=30*10^-6;             // Core diameter of fiber
+delta=0.015;            // Relative refractive index 
+n1=1.48;                // Refractive index of core
+
+// (a) Normalized frequency 
+v=(2*%pi*a*n1*(2*delta)^(1/2))/lambda; 
+//(b) Number of guided modes
+m=v^2/2;                               
+
+//Displaying results in the command window            
+printf("\n Normalized frequency = %0.2f  ",v);
+printf("\n Number of guided modes = %0.0f  ",m);
+// The answers vary due to round off error