%Step responses for forward and reverse driving
% kja 070420
aminit
t=0:0.01:4;
Gf=tf([1 1],[1 0 0]);
Gr=tf([-1 1],[1 0 0]);
yf=step(Gf,t);
yr=step(Gr,t);
subplot(321);
pl=plot(t,yf,'b-',t,yr,'b--');
set(pl,'Linewidth',AM_data_linewidth);
hold on
line([0 4],[0 0]);
axis([0 4 -1 10]);
xlabel('t');
ylabel('y');
