% Fig. 6.40   Feedback Control of Dynamic Systems, 8e 
%             Franklin, Powell, Emami
%

clear all;
%close all;
clf
 
num = conv( [1 10], [1 10] );
den = [1 0 0 0];

figure(1)

rlocus(num,den);

set(findall(gcf,'type','line'),'linewidth',2);
axis([-40 10 -25 25])
title('(a) Root Locus');

%grid on;


figure(2)

bode(num,den);
set(findall(gcf,'type','line'),'linewidth',2);
grid on;


figure(3)


w=logspace(-1,4,200);

[re,im]=nyquist(7*num,den,w);

plot(re,im,re,-im,'LineWidth',2);

set(findall(gcf,'type','line'),'linewidth',2);

axis([-2 2 -2 2]);
axis([-4 4 -4 4]);


grid on;

axis('square')
title('(b) Nyquist plot, K = 7');
xlabel('Real')
ylabel('Imaginary')

figure(1)










