summaryrefslogtreecommitdiff
path: root/273/CH24/EX24.2/ex24_2.sce
blob: b30f6a8ae5c2889a74b33d2b81e89b4ad2cd7649 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clc;clear;
//Example 24.2
//calculation of acceptance angle

//given values
n=1.59;//cladding refractive index
u=1.33;//refractive index of water
N=.20;//numerical aperture offibre
//calculation
x=sqrt(N^2+n^2);//index of fibre
N1=sqrt(x^2-n^2)/u;//numerical aperture when fibre is in water
alpha=asin(N1)*180/%pi;
disp(alpha,'acceptance angle in degree is');