login
Write fundamental unit for real quadratic field of discriminant n as x + y*omega; sequence gives values of y for n == 2 mod 4.
0

%I #12 Apr 14 2019 11:01:13

%S 1,2,1,4,42,1,2,6,6,2,3588,13,8,8,30,5,6,1,1122,221064,10,389,2,96,

%T 28254,1,5,12606,4,12,12,1716,616,132015642,1,110,120,2,550,3774,14,

%U 221,4148,2,47533775646,17,10,1,6,756,5662,16,16,6485718,42,85,150

%N Write fundamental unit for real quadratic field of discriminant n as x + y*omega; sequence gives values of y for n == 2 mod 4.

%C Entries are indexed by values of n from A039956.

%D R. A. Mollin, Quadratics, CRC Press, 1996, Tables B1-B3.

%H S. R. Finch, <a href="http://www.people.fas.harvard.edu/~sfinch/">Class number theory</a>

%H Steven R. Finch, <a href="/A000924/a000924.pdf">Class number theory</a> [Cached copy, with permission of the author]

%t sf = Select[2*Range[0, 139], SquareFreeQ]; NumberFieldFundamentalUnits[Sqrt[#]][[1, 2, 2]]& /@ sf (* _Jean-François Alcover_, May 31 2013 *)

%Y Cf. A053370-A053375.

%K nonn,easy,nice

%O 0,2

%A _N. J. A. Sloane_, Jan 06 2000