1 files changed, 24 insertions, 0 deletions
diff --git a/3543/CH2/EX2.1/Ex2_1.sce b/3543/CH2/EX2.1/Ex2_1.sce
new file mode 100644
index 000000000..898f7df1c
--- /dev/null
+++ b/3543/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,24 @@
+// Example 2.1
+// Calculation of core diameter
+// Page no 31
+
+clc;
+clear;
+close;
+
+// Given data
+n1=1.5;               // Refractive index of core
+n2=1.48;              // Refractive index of cladding
+N=1000;               // No of modes
+lambda=1.3;           // Light wavelength
+V=sqrt(2*N);          // Mode parameter
+
+//core diameter
+d=(lambda*V)/(2*%pi*sqrt(n1^2-n2^2));   
+
+
+//Display result on command window
+printf("\n Mode parameter = %0.2f  ",V);
+printf("\n Core diameter(micrometer)= %0.0f  ",d);
+
+// Answer is wrong in the book.