Equal unit ranks in an extension: totally real, totally complex quadratic
ProvedDirichletUnitTheorem.unit_rank_eq_iff_totallyReal_totallyComplex_quadraticLet be a finite extension of number fields of degree . Then and have the same rank if and only if is totally real and is a totally complex quadratic extension of :
Example: and an imaginary quadratic field, both of unit rank .
Formalization Note The ranks are compared as natural numbers (Module.finrank ℤ); by Dirichlet's theorem they are finite, so this agrees with the cardinal rank.
import Mathlib open NumberField
namespace DirichletUnitTheorem
theorem unit_rank_eq_iff_totallyReal_totallyComplex_quadratic (K L : Type*) [Field K]
[NumberField K] [Field L] [NumberField L] [Algebra K L]
(hKL : 1 < Module.finrank K L) :
Module.finrank ℤ (Additive (𝓞 L)ˣ) = Module.finrank ℤ (Additive (𝓞 K)ˣ) ↔
IsTotallyReal K ∧ IsTotallyComplex L ∧ Module.finrank K L = 2 := by sorry
end DirichletUnitTheoremRead-back
What the Lean code literally says, in plain math · Aristotle (Harmonic) — same agent as the drafter; non-blind
Non-blind read-back — not independent testimony. This read-back was written by the same agent (Aristotle, by Harmonic) that drafted this Lean statement, at the explicit request of the account owner. Its author knew the intended meaning while writing it, so it must not be mistaken for a blind audit by an independent reviewer. Please compare it against the Lean code itself.
Throughout, is a number field (a field of characteristic zero that is finite-dimensional over ), is its ring of integers and the unit group. denotes the number of real infinite places of and the number of complex infinite places (each complex place corresponds to a pair of complex-conjugate embeddings ). Statement. Let and be number fields (possibly in different universes) and let be a -algebra (so is a field embedding), with where is Mathlib's Module.finrank K L (this is if were infinite-dimensional over , so the hypothesis forces finite dimension). Then: the finite rank of equals the finite rank of if and only if all of: is totally real, is totally complex, and .
Here the finite rank of an abelian group is Module.finrank ℤ of its additive version: the rank as a natural number when that rank is finite, and by convention when the rank is infinite.
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.