%I A094614
%S A094614 401,817,1093,1393,1429,1641,1756,1897,1996,2081,2153,2908,3121,3181,
%T A094614 3253,3928,3997,4353,4357,4441,4504,4757,4889,5241,5269,5308,5944,6113,
%U A094614 6157,6481,6949,7064,7229,7513,7817,7861,8049,8108,8121,8309
%N A094614 Discriminants of real quadratic number fields with class number 5.
%H A094614 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
               ClassNumber.html">ClassNumber</a>
%t A094614 Needs["NumberTheory`NumberTheoryFunctions`"] (*then*) Flatten[Position[ClassNumber/
               @Range[8309], 5, {1}]]
%Y A094614 Cf. A003656, A094612, A094613, A094619.
%Y A094614 Sequence in context: A096991 A141026 A158313 this_sequence A104926 A031718 
               A031608
%Y A094614 Adjacent sequences: A094611 A094612 A094613 this_sequence A094615 A094616 
               A094617
%K A094614 nonn
%O A094614 1,1
%A A094614 Eric Weisstein (eric(AT)weisstein.com), May 14, 2004