summaryrefslogtreecommitdiff
path: root/1499/CH5/EX5.47/s47.sce
blob: 5ad3c4501280fd6889fc204ee5b59ff5df874c53 (plain)
1
2
3
4
5
6
7
8
9
s=%s;
H=syslin('c',500/(s*(s+6)*(s+9)))
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