login
A010398
Squares mod 37.
3
0, 1, 3, 4, 7, 9, 10, 11, 12, 16, 21, 25, 26, 27, 28, 30, 33, 34, 36
OFFSET
1,3
COMMENTS
A070459 sorted, dulicates removed. - R. J. Mathar, Jan 12 2024
MATHEMATICA
Union[PowerMod[Range[37], 2, 37]] (* Vincenzo Librandi, Jan 31 2020 *)
PROG
(Sage) [quadratic_residues(37)] # Zerinvary Lajos, May 24 2009
(Magma) [n: n in [0..36] | IsSquare(R! n) where R:= ResidueClassRing(37)]; // Vincenzo Librandi Jan 31 2020
CROSSREFS
Sequence in context: A174659 A242423 A010444 * A010435 A057709 A139442
KEYWORD
nonn,fini,full
STATUS
approved