%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