summaryrefslogtreecommitdiff
path: root/3834/CH5/EX5.1.1/Ex5_1_1.sce
blob: 1cdb285d417e81d757302e0061f5a229b9845c50 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Fiber-optics communication technology, by Djafer K. Mynbaev and Lowell L. Scheiner 
//Example 5.1.1
//windows XP
//Scilab version-5.5.1
clc;
clear;
//given

n1=1.4675;//Refractive index of the core for silica fiber
n2=1.4622;//Refractive index of the cladding for silica fiber

x=n1*n1;
y=n2*n2;

NA=sqrt(x-y);

mprintf("Numerical aperture of singlemode fiber =%.3f",NA);