summaryrefslogtreecommitdiff
path: root/3753/CH5/EX5.2/Ex5_2.sce
blob: 129fe58a0a39aed5b34b9f27b8a3a4ac61c5c7c3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Example 5.2, Page number 5.28

clc;clear;close

//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)// unitless

//Result
printf("N = %.f ",N)
printf("\nFiber can support: %d guided modes",N)
printf("\nIn graded index fiber, No.of modes propagated inside the fiber = %.f only",(N/2))