257/CH6/EX6.5/example6_5.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

syms G1 G2 G3 G4 G5 H1 H2;

T1=G1*G3*G4*G2;
T2=G4*G5;

L1=-G2*H1;
L2=-G3*G1*G4*G2*H2;
L3=-G4*G5*H2;

delta=1-(L1+L2+L3)+(L1*L3)
del1=1;
del2=1-L1

TF=(T1*del1 + T2*del2)/delta ;
disp(TF,"C/R = ")