function [U,V] = proiestable(uinit,vinit,pas,a,b,c,d,N);

% [U,V]=proiestable(uinit,vinit,pas,a,b,c,d,N); 
%
% 
% Trace les trajectoires de l'équation de Lotka-Volterra au voisinage du point 
% d'équilibre stable (pris comme origine (0,0)). 

U=uinit;
V=vinit;
u=uinit;
v=vinit;
for i=1:N;
    u=u+pas*(-(b*c/d)*v -b*u*v);
    v=v+pas*((a*d/b)*u +d*u*v);
    U=[U,u];
    V=[V,v];
end;

