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