summaryrefslogtreecommitdiff
path: root/257/CH6/EX6.18/example6_18.sce
blob: df442e946020f473cd63895c4c5fd58ef66cd4f9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
syms G1 G2 G3 H1 H2;

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

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

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

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