summaryrefslogtreecommitdiff
path: root/269/CH10/EX10.18/ex18.sce
blob: 3287158818dded6d27e46154e2f3def6d80d1d31 (plain)
1
2
3
4
5
6
7
8
9
10
11
s=%s
p=s^3+2*s^2+2*s+4
h=routh_t(p)
disp(h)
disp("constant term 4 causes the system to be unstable")
disp("so the polynomial formed is")
disp("2*s^2+4")
disp("applyin RH on this polynomial")
q=s^2+2
r=routh_t(q)
disp(r)