%rutina para graficar en tiempo continuo una 
%exponencial real
t=[0:.01:6];
A=2.4;
a=-.1;
ft=A*exp(-a*t);
figure(1),plot(t,ft,'k')
hold on
