blob: a22b9b04338aff11058354a9c255c8448460368e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
// Example 6.13 //coupling efficiency
clc;
clear;
close;
t=1;//
no=1;//
na=0.3;//
x=1;//assume
y=1;//
nc1=(t*(na/no)^2*(x/y)^2)*100;//
alpha=2;//
nc2=((t*(na/no)^2*(x/y)^2*(alpha/(alpha+2))))*100;//
disp(nc1,"coupling efficiency for step index fiber in (%)")
disp(nc2,"coupling efficiency for graded index fiber in (%)")
|
