summaryrefslogtreecommitdiff
path: root/1499/CH5/EX5.31/s31.sce
blob: bda215befc3f0ca2ed1082d2ea7f48d5c38a9893 (plain)
1
2
3
4
5
6
7
8
9
s=%s;
H=syslin('c',1/(s*(s+1)*(1+2*s)))
nyquist(H)
show_margins(H,'nyquist')
printf("Since P=1 and the pt. -1+j0 is encircled once by the locus")
printf("Hence N=1 therefore, Z=0(no of zeros in RHP)")
printf("System is stable")
gm=g_margin(H)  // gain margin
pm=p_margin(H)  // phase margin