summaryrefslogtreecommitdiff
path: root/29/CH12/EX12.2/exa12_2.sce
blob: 109549f565e5d389a6a87a05d5734278c6fded2c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
//Caption:transfer_function
// example 12.2
//page 516
// we are solving this problem from signal flow graph approach
syms G1 G2 G3 G4
// forward path denoted by P1,P2 and so on and loop by L1,L2 and so on 
//path factor by D1,D2 and so on and graph determinant by D
P1=G1;
P2=G2;
P3=-G1*G2*G3;
P4=G1*G2*G4;
L1=-G1*G2*G3*G4;
D1=1;
D2=1;
D3=1;
D4=1;
D=1-(L1);
Y=(P1*D1+P2*D2+P3*D3+P4*D4)/D;
Y=simple(Y);
disp(Y,"C(s)/R(s)=");