%Nyquist plot of stabilization of an inverted pendulum
%   kja 070516
aminit;

L = tf([1 2], [1 0 -1]);

%w=0:0.1:50;s=i*w;
%L=(s+2)./(s.^2-1);

figure(1); clf; subplot(221)
amaxis([-2.5 0.5 -1.25 1.25]); axis tight; daspect(daspect); hold on;
amnyquist(L);

amtext(-1.05, -0.25, '-1');

amprint('invpend-nyq.eps');
