summaryrefslogtreecommitdiff
path: root/2309/CH3/EX3.a.5/A_Ex3_5.sce
blob: 9e0a5a9be911a7fd7bdf2702a898169029369d0e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
// Chapter 3 Additional Example 5
//==============================================================================
clc;
clear;

//input data
NA      = 0.25;      // Numerical aperture 
d       = 6*10^-6   // core diameter
lamda   = 1.5*10^-6; // wavelength of laser source
n1      = 1.47;      // refractive index of core
n2      = 1.43       // refractive index of cladding

// calculations
NA      = sqrt( n1^2 - n2^2);       // Numerical Aperture
N       = 4.9*(d*NA/lamda)^2;       // no of modes for step index fibre

// Output
mprintf('No. of total modes propagating in the fibre = %d',N);
//==============================================================================