OFFSET
1,1
COMMENTS
All p^2 are congruent to {1, 9} (mod 40), as in A107145.
Rational primes that decompose in the field Q(sqrt(-10)). - N. J. A. Sloane, Dec 26 2017
LINKS
MAPLE
Load the Maple program HH given in A296920. Then run HH(-10, 200); This produces A155488, A296925, A293859. - N. J. A. Sloane, Dec 26 2017
MATHEMATICA
Sqrt[#]&/@Select[Union[Flatten[Table[x^2+40y^2, {x, 800}, {y, 100}]]], PrimeQ[Sqrt[#]]&] (* Harvey P. Dale, Jul 12 2025 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Jan 23 2009
STATUS
approved
