diff options
Diffstat (limited to '3755/CH13/EX13.13/Ex13_13.sce')
| -rw-r--r-- | 3755/CH13/EX13.13/Ex13_13.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3755/CH13/EX13.13/Ex13_13.sce b/3755/CH13/EX13.13/Ex13_13.sce new file mode 100644 index 000000000..5899eee30 --- /dev/null +++ b/3755/CH13/EX13.13/Ex13_13.sce @@ -0,0 +1,16 @@ +clear
+//
+//
+//
+
+//Variable declaration
+lamda=1.3; //wavelength(micro m)
+n1=1.5; //core refractive index
+Nm=1100; //number of modes
+delta=0.01; //refractive index difference
+
+//Calculations
+d=lamda*sqrt(Nm/delta)/(%pi*n1); //diameter of fibre core(micro m)
+
+//Result
+printf("\n diameter of fibre core is %0.1f micro m",d)
|