summaryrefslogtreecommitdiff
path: root/257/CH3/EX3.12/example_3_12.sce
blob: 548b5f3956a2f6448c7a6d00893ad3d2cd42b2e8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//given poles are -1, -2+%i , -2-%i and zero is s=-3

num=poly([-3],'s','roots');
den=poly([5 9 5 1 ],'s','coeff');
G=k*num/den;
disp(G,"G(s)=")

//to find k
//G(0)=10  given

k=(10*(0+1)*(0+0+5))/3
disp(k,"value of k is")

disp(G,"transfer function is")