blob: e43e802ec69fce59ea61b3249bb0c24bb889d650 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
//Optical Fiber communication by A selvarajan
//example 16.3
//OS=Windows XP sp3
//Scilab version 5.5.1
clc;
clear all;
alpha=0.2//fiber loss in dB/Km
LA=50//Amplifier spacing in Km
G=(alpha*LA)//gain in fiber
PbyPo=G*log(G)/(G-1)//Multiple of power required by single soliton
mprintf('Multiple of power required by single soliton =%f ',PbyPo)// the answer is slightly varing due to rounding error
|