MathGroup Archive 2011

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Integral points on elliptic curves


On Oct 23, 9:28 pm, Artur <gra... at csl.pl> wrote:
> Dear Mathematica Gurus,
> Who know that existed any Mathematica procedure (library) to finding
> integral points on elliptic curves?
> Or how to find example to e.g.
>
> FindInstance[y^3 - x^2 == 1641843, {x, y}, Integers]
>
> if FindInstance doesn't work what inspite???
>
> Unfortunatelly Wolfram Research is developing some branches of
> Mathematics in new versions of Mathematica and complete leave anothers
> (good samples are elliptic curves, Chabauty method, determining Galois
> groups of polynomials etc.).
>
> Best wishes
> Artur Jasinski

How about something as naive as

In[31]:= Cases[Join @@ Table[{x, y, y^3 - x^2 == 1641843}, {x, 1,
1000}, {y, 1, 1000}], {__, True}]
Out[31]= {{468, 123, True}}

In[32]:= 123^3 - 468^2 == 1641843
Out[32]= True

Sam Blake



  • Prev by Date: Re: Full simplify problem
  • Next by Date: bug ?
  • Previous by thread: Re: Integral points on elliptic curves
  • Next by thread: Re: Integral points on elliptic curves