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

//input data
n1      = 1.54;      // Refractive index of core
n2      = 1.5;      // Refractive index of cladding

// Calculations
NA      = sqrt(n1^2 - n2^2);        // Numerical Aperture of optical fiber

// Output
mprintf('Numerical Aperture of the optical fiber = %3.4f',NA);
//==============================================================================