diff options
Diffstat (limited to '3543/CH2/EX2.014/Ex2_14.sce')
| -rw-r--r-- | 3543/CH2/EX2.014/Ex2_14.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/3543/CH2/EX2.014/Ex2_14.sce b/3543/CH2/EX2.014/Ex2_14.sce new file mode 100644 index 000000000..95bd6db03 --- /dev/null +++ b/3543/CH2/EX2.014/Ex2_14.sce @@ -0,0 +1,21 @@ +// Example 2.14
+// Calculation of critical wavelength
+// Page no 483
+
+clc;
+clear;
+close;
+
+//Given data
+a=3*10^-6; // Core diameter of fiber
+delta=0.15; // Relative refractive index
+v=2.405; // Normalized frequency
+
+// Critical wavelength
+lambda=(2*%pi*a*delta)/v;
+lambda=lambda*10^9;
+
+//Displaying The Results in Command Window
+printf("\n Critical wavelength (nm)= %0.0f ",lambda);
+
+// The answers vary due to round off error
|