summaryrefslogtreecommitdiff
path: root/3411/CH7/EX7.1/Ex7_1.sce
blob: e590554318447cfb92d309f85a70fd38dbc0d860 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Example 7_1
clc();
clear;
//To determine the no of modes propogating in the fiber
n1=1.48
n2=1.41
NA=sqrt(n1^2-n2^2)
d=60  //units in micro mts
lamda0=0.8        //units in micro mts
v=(%pi*d*NA)/lamda0
n=v^2/2
printf("Number of modes n=%.2f",n)
//In text book the answer given wrong as n=4.55*10^3    the correct answer is n=5615.50