Nous travaillons sur le problème des trois corps restreint et nous voudrions tracer la courbe de vitesse nulle avec Maple. On voudrais tracer la courbe defini par l'eq6:

x1:=R*q1*cos(z); y1:=R*q1*sin(z);
eq6:=0=omega^2*(x1^2+y1^2)+2*( mu/(q1^2+(1-mu)^2+2*q1*cos(z)*(1-mu))^(1/2)+(1-mu)/sqrt(q1^2+mu^2-2*q1*cos(z)*mu))-Cj;

ou Cj,omega, mu sont des constantes déjà définies. On a donc essayé avec "implicitplot"

implicitplot(eq6,q1=-2*R..2*R,z=0..2*Pi,coords=pola r,scaling=constrained)

Nous obtenons un repère (minuscule) ... sans courbe !!!
Pourriez vous nous aider svp.