Unit rank of a totally real field:
ProvedLeopoldt.units_rank_of_isTotallyRealleopoldtnumber-theory
Let be a totally real number field. Then its unit group has -rank
This is Dirichlet's unit theorem with and .
Preamble
import Definitions.Def_LeopoldtDefect open NumberField
Formal statement
namespace Leopoldt
theorem units_rank_of_isTotallyReal (K : Type*) [Field K] [NumberField K] [IsTotallyReal K] :
Units.rank K = Module.finrank ℚ K - 1 := by sorry
end LeopoldtSource
Dirichlet's unit theorem, e.g. J. Neukirch, Algebraic Number Theory, Chapter I, Theorem 7.4, specialised to r_2 = 0; used in arXiv:1105.4544 Section 1.1