summaryrefslogtreecommitdiff
path: root/3753/CH5/EX5.13/Ex5_13.sce
blob: 53ee26a98874d7235b0752ed766650157371fa05 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Example 5.13, Page number 5.31

clc;clear;close

// variable declaration
alpha=1.85//unitless
lamda=1.3*10**-6 // in m
a=25*10**-6 // in m
N_a=0.21 // numerical aperture

// Calculations
V_n=((2*%pi**2)*a**2*N_a**2)/lamda**2 // V number
N_m=(alpha/(alpha+2))*V_n //unitless

printf("No.of modes = %.2f =155(approx)",N_m)
printf("\nTaking the two possible polarizations, Total No.of nodes = %.2f",(N_m*2))