summaryrefslogtreecommitdiff
path: root/3506/CH3/EX3.2/EXP_3_2.sce
blob: b738a36235201061e7f5a4bc7f7f2d4d7b46ae3e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//Optical Fiber communication by A selvarajan
//example 3.2
//OS=Windows XP sp3
//Scilab version 5.5.1
clc;
clear all;
//given 
NA1=0.2;//numerical apperture of fiber 1
NA2=0.1;//numerical apperture of fiber 2
D1=12;// core daimeter of fiber 1 in um
D2=6;// core daimeter of fiber 2 in um
Losses=20*log10(NA1/NA2)+20*log10(D1/D2);// total fiber to fiber coupling losses due to NA mismatch and size mismatch
mprintf("total losses=%fdB ",Losses);