blob: a9343cad8d3009cda2d4d6c6d0078948faa36de1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
//chapter 7 example 2//
clc
clear
//longitudnal displacement=S,numerical aperure=NA,core radius=a,coupling efficiency=ns1.critical angle=Am//
NA=0.2;
Am=asind(NA);//in deg//
printf("\n critical angle=%f deg\n",Am)
a=25*(10^-6);//in mts//
S=2.5*(10^-6);//in mts//
ns1=((a/(a+(S*tand(Am))))^2)*100;
printf("\n coupling efficiency=%f percent\n",ns1)
|
