OFFSET
1,1
LINKS
Eric Weisstein's World of Mathematics, Class Number
MATHEMATICA
Select[Range[14888], NumberFieldDiscriminant@Sqrt[#] == # && NumberFieldClassNumber@Sqrt[#] == 10 &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Arkadiusz Wesolowski, Oct 22 2012
STATUS
approved