summaryrefslogtreecommitdiff
path: root/401/CH14/EX14.5/Example14_5.sce
blob: 2e1552d9155c61aca70df1a174f3406c793fd4d1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Example 14.5
//Program to calculate the Numerical Aperture(NA) of the fiber

clear;
clc ;
close ;

//Given data
D=10;                 //cm - SCREEN POSITION
A=6.2;                //cm - OUTPUT PATTERN SIZE

// Numerical Aperture(NA) of the fiber
NA=A/sqrt(A^2+4*D^2);

//Displaying The Results in Command Window
printf("\n\n\t  The Numerical Aperture(NA) of the fiber is %0.2f .",NA);