summaryrefslogtreecommitdiff
path: root/174/CH14/EX14.1/example14_1.sce
blob: b3c0d817b1a2fe97fd7d8d975ec5a7a47f60b32a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
// To find acceptance angle and numerical aperture
// Modern Electronic Instrumentation And Measurement Techniques
// By Albert D. Helfrick, William D. Cooper
// First Edition Second Impression, 2009
// Dorling Kindersly Pvt. Ltd. India
// Example 14-1 in Page 392


clear; clc; close;

// Given data
n_2 = 1.45; //Core index of refraction
n_1 = 1.47; //Cladding index of refraction

//Calculation
theta_c = acos(n_2/n_1);
theta_A = 2*asin(n_1*sin(theta_c));
NA = sqrt(n_1^2 -n_2^2);

printf("The critical angle of the fiber = %0.2f degree\n",theta_c*180/%pi);
printf("The acceptance angle of the fiber = %0.2f degree\n",theta_A*180/%pi);
printf("The numerical aperture of the fiber = %0.3f ",NA);

//Result
// The critical angle of the fiber = 9.46 degree
// The acceptance angle of the fiber = 27.97 degree
// The numerical aperture of the fiber = 0.242