MathGroup Archive 2011

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

Search the Archive

Re: Integral points on elliptic curves

  • To: mathgroup at smc.vnet.net
  • Subject: [mg122335] Re: Integral points on elliptic curves
  • From: Emu <samuel.thomas.blake at gmail.com>
  • Date: Tue, 25 Oct 2011 06:19:21 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <j80q8p$adb$1@smc.vnet.net>

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