diff options
Diffstat (limited to '3651/CH8/EX8.2/2.sce')
-rw-r--r-- | 3651/CH8/EX8.2/2.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/3651/CH8/EX8.2/2.sce b/3651/CH8/EX8.2/2.sce new file mode 100644 index 000000000..8eaab51ed --- /dev/null +++ b/3651/CH8/EX8.2/2.sce @@ -0,0 +1,12 @@ +//variable declaration
+d=50 //diameter
+N_a=0.2 //Numerical aperture
+lamda=1 //wavelength
+
+//Calculations
+N=4.9*(((d*10**-6*N_a)/(lamda*10**-6))**2)
+
+//Result
+printf('N =%0.3f \n',N)
+printf('Fiber can support%0.3f guided modes \n',N)
+printf('In graded index fiber, No.of modes propogated inside the fiber =%0.3f only',N/2)
\ No newline at end of file |