summaryrefslogtreecommitdiff
path: root/3822/CH9/EX9.2/Ex9_2.sce
blob: 8a0691b88a24e6a9d1ecba26e6bc09ad210bf713 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

//OptoElectronics and Fibre Optics Communication, by C.K Sarkar and B.C Sarkar
//Example 9.2
//OS=Windows 10
////Scilab version Scilab 6.0.0-beta-2(64 bit)
clc;
clear;

//given
L1=1.5;//length of optical fiber in Km
L2=0.002;//length of fiber cutback in Km
Pn=50.1;//output power in microwatts for the full link length
Pf=385.4;//output power in microwatts for fiber cutback

a=10/(L1-L2);
b=log10(Pf/Pn);
alphadB=a*b;//attenuation per Kilometer in dB/km at wavelength 1.1um
mprintf("The attenuation per Kilometer at wavelength 1.1um is=%.2f dB/Km",alphadB);