summaryrefslogtreecommitdiff
path: root/2183/CH6/EX6.4.a/Ex_6_4_a.sce
blob: 685134a8668a7da2cfeb4371097759074b66e32f (plain)
1
2
3
4
5
6
7
8
// Example 6.4.a //coupling efficiency
clc;
clear;
close;
NA=0.2;//numerical aperture
n=1.4;//refractive index
nc=(NA)^2;//coupling efficiency
disp(nc,"coupling efficiency is")