I am trying to solve an equation in Maple, code is below
> restart;
> mu:=0.3;
> q:=1.0;
> r1:=sqrt((x+mu)^2+y^2);
> r2:=sqrt((x+mu-1)^2+y^2);
> u:=x^2+y^2+2*q*(1-mu)/r1+2*mu/r2;
I wish to solve u for x varying from -1.5 to 1.5, in increments of 0.1 and for each value of these x I wish to get real values of y and want output in form of (x,y1), (x,y2), (x,y3) so that I can use these values to plot a graph. The number of real roots differ for each value of x (sometimes 1, sometimes 2 etc.)
Any champ in maple to help me out?