% EE 262
% Randy Dimmett -- NOTE: a based on a script of Dr. Erickson's
% Root Locus and PO lines.
% num = [1 ];
% den = [ 1 3 0];

rlocus(num,den)
grid on
title('EE 262 -- Randy Dimmett');
hold on
len=10;
zeta = [0.707 0.6 0.5]; % for the 5%, 10% and 15% PO lines
for j = 1:3,
  theta = 3.14 - acos( zeta(j) );,
  xa=[0 len*cos(theta)]; ya=[0 len*sin(theta)];,
  plot(xa, ya, 'g');
end;
zoom on ; pause
zoom off

[x,y] = ginput(1)
pt=x+i*y;
k=-polyval(den,pt)/polyval(num,pt)