EXP NO 5
TITLE: TO PLOT POLES AND ZEROES AND STUDY STABILITY OF
DIFFERENT TRANSFER FUNCTION
%FOR STABLE
clc;
clear all;
close all;
b=[1 0];
a=[1 0.5];
h=impz(b,a);
stem(h);
[z p]=tf2zp(b,a);
if(abs(p)<1)
disp('system is stable');
elseif(abs(p)>1)
disp('system is unstable');
else
disp('system is marginally stable');
end;
%FOR NONSTABLE
clc;
clear all;
close all;
b=[1 0];
a=[1 -2];
h=impz(b,a);
stem(h);
[z p]=tf2zp(b,a);
if(abs(p)<1)
disp('system is stable');
elseif(abs(p)>1)
disp('system is unstable');
else
disp('system is marginally stable');
end;
%FOR MARGINALY STABLE
clc;
clear all;
close all;
b=[1 0];
a=[1 1];
h=impz(b,a);
stem(h);
[z p]=tf2zp(b,a);
if(abs(p)<1)
disp('system is stable');
elseif(abs(p)>1)
disp('system is unstable');
else
disp('system is marginally stable');
end;