summaryrefslogtreecommitdiff
path: root/1619/CH1/EX1.14.10/Example1_14_10.sce
blob: 722ee8e4aab5099ee1a9c882d3c78a8349e7ee3e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Example 1.14.10 page 1.49
//To find the diameter of the core..

clc;
clear;

del= 0.01;      //Relative RI difference..
n1= 1.5;
M= 1100;        //Number of modes...
lamda= 1.3;     //wavelength of operation in um..
V= sqrt(2*M);       //Normalised frequency...
d= V*lamda/(%pi*n1*sqrt(2*del));    //diameter of core..
printf('The diameter of the core is %.2f um',d);