773/CH15/EX15.07/15_07.sci


1
2
3
4
5
6
7
8
9
10
11

//system//
s=%s;
sys=syslin('c',12/(s*(s+1)*(s+2)))
nyquist(sys) 
show_margins(sys,'nyquist')
gm=g_margin(sys)
if (gm<=0)
  printf("system is unstable")
else 
printf("system is stable");end;