login
Fundamental discriminants of real quadratic number fields with class number 7.
2

%I #6 Feb 16 2025 08:33:18

%S 577,1009,1601,1761,2029,2913,4229,4348,5176,5273,5417,7736,8097,8661,

%T 8773,9004,9029,9049,9101,9208,9289,9868,10117,10313,10357,10713,

%U 10957,11021,11053,11269,11537,11621,12497,12977,13049,13313,13701,14201,15277,15809

%N Fundamental discriminants of real quadratic number fields with class number 7.

%H Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/ClassNumber.html">Class Number</a>

%H <a href="/index/Qua#quadfield">Index entries for sequences related to quadratic fields</a>

%t Select[Range[15809], NumberFieldDiscriminant@Sqrt[#] == # && NumberFieldClassNumber@Sqrt[#] == 7 &]

%Y Cf. A003656, A094619, A094612-A094614, A218156, A218158-A218160.

%K nonn,changed

%O 1,1

%A _Arkadiusz Wesolowski_, Oct 22 2012