%This script, EXP_PLOT, generates a plot of an eponential
% exp(?3*t)*1(t)

% written by S. H. Zak on August 20, 2010

clear
box on
axis([-0.5 2 0 1.1])
set(gca,'Fontsize',16)
xlabel('Time (sec)','Fontsize',16)
ylabel('exp(-3*t)*1(t)','Fontsize',16)
grid
hold
% text(4.075,1.55,'zeta=0.1','Fontsize',14)
% text(5.2,1.1,'zeta=0.5','Fontsize',14)
% text(2.1,0.6,'zeta=0.95','Fontsize',14)
% zeta=[0.1 0.5 0.95];
time=-0.5:0.001:2;
   c='exp(-3*time).*(time >= 0)';
   plot(time,eval(c))