summaryrefslogtreecommitdiff
path: root/3834/CH12/EX12.3.2/Ex12_3_2.sce
blob: 5893eca02e6dd256b1d556a81c632c949d8e4fc7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner
//Windows 8
//Scilab version- 6.0.0
//Example 12.3.2
clc;
clear ;
//given

g=106;//maximum gain coefficient in 1/cm
alpha=14;//loss coefficient of a cavity in 1/cm
GAMA=0.8;//confinement factor
L1=50E-3;//assumed length of a typical travelling-wave semiconductor amplifier in cm
y=GAMA*g-alpha;
z=y*L1;
Gs1=exp(z);//Gain of a travelling-wave semiconductor amplifier
mprintf("Gain of a travelling-wave semiconductor amplifier = %.2f.or  %.1f ",Gs1,10*log10(Gs1));
//case 2
L2=100E-3;//assumed length of a typical travelling-wave semiconductor amplifier in cm
y=GAMA*g-alpha;
z=y*L2;
Gs2=exp(z);//Gain of a travelling-wave semiconductor amplifier
mprintf("\nGain of a travelling-wave semiconductor amplifier = %.2f.or  %.1f ",Gs2,10*log10(Gs2));