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

1, 3, 3, 1, 39, 5, 273, 1, 4, 531, 7, 7, 12, 69, 5967, 413, 9, 9, 3, 165, 4, 22419, 93, 28, 105, 11, 11, 419775, 927, 6578829, 1, 140634693, 20, 105, 5019135, 13, 313191, 36, 123, 650783, 1, 1153080099, 4, 19162705353, 3, 5, 15, 15, 5, 3

Offset: 0

Author

N. J. A. Sloane, Jan 06 2000

Keywords

• nonn
• easy
• nice

Comments

Entries are indexed by values of n from A039957.

References

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

Links

• S. R. Finch, Class number theory
• Steven R. Finch, Class number theory [Cached copy, with permission of the author]

Crossrefs

Cf. A053370-A053375.

Programs

Mathematica

A039957 = Select[ Range[250], SquareFreeQ[#] && Mod[#, 4] == 3 & ]; A053375 = (NumberFieldFundamentalUnits[ Sqrt[#]][[1, 2, 2]] & ) /@ A039957 (* Jean-François Alcover, Jan 04 2012 *)