%rutina para graficar en tiempo continuo una 
%exponencial compleja
w0=pi;
A=2;
t=0:.001:4;
x=A*cos(w0*t);
y=A*sin(w0*t);
figure(10),plot3(x,y,t);xlabel('real');ylabel('imag'),zlabel('tiempo');
grid;
hold on;
cer=zeros(size(x));
plot3(x,cer,t,'r');
hold on;
plot3(cer,y,t,'k');
hold on;
