Extension of a -adic completion along a finite extension of number fields
ProvedLeopoldt.exists_primesOver_ringHom_adicCompletionLet be a prime, let be number fields ( an algebra over ), and let be a prime of above . The statement asserts that there is a prime of above and a ring homomorphism
between the completions such that
- is compatible with the inclusions: for every , where is viewed in on the left and in on the right, and
- there is a real constant with for all .
This is the existence of an extension of the -adic absolute value of to : the prime lies above , the inclusion is uniformly continuous for the -adic and -adic topologies because the valuations satisfy on , and it extends to the completions. The exponent is a positive integer determined by the ramification index and the normalizations of the two absolute values; only its positivity is used, so it is stated as an existential real number.
Use. Statements proved in (for instance Brumer's theorem for the field ) are transported to through ; the norm relation makes continuous and sends the ball into the ball , so commutes with the -adic logarithm (PadicLog.map_log). This is a step of the reduction of Leopoldt.exists_linearIndependent_log_conj_of_brumer.
Formalization Note. is v.1.adicCompletion K, with the norm of Definitions.Def_PrimesOverNorm (the one that makes ). w is tied to v only through the compatibility of ι with the two algebraMaps. Mathlib (at this revision) has no ring homomorphism between adic completions of a finite extension; the building blocks are IsDedekindDomain.HeightOneSpectrum.valuation_liesOver, IsDedekindDomain.HeightOneSpectrum.uniformContinuous_algebraMap_liesOver, UniformSpace.Completion.mapRingHom and IsDedekindDomain.HeightOneSpectrum.adicCompletion.equiv; the infinite-place analogue NumberField.InfinitePlace.completionMap is a template. ‖x‖ ^ c with real c is the real power.
import Definitions.Def_PrimesOverNorm open NumberField
theorem Leopoldt.exists_primesOver_ringHom_adicCompletion (p : ℕ) [Fact p.Prime]
(K : Type*) [Field K] [NumberField K] (L : Type*) [Field L] [NumberField L] [Algebra K L]
(v : Leopoldt.PrimesOver p K) :
∃ (w : Leopoldt.PrimesOver p L) (ι : v.1.adicCompletion K →+* w.1.adicCompletion L),
(∀ x : K, ι (algebraMap K (v.1.adicCompletion K) x) =
algebraMap L (w.1.adicCompletion L) (algebraMap K L x)) ∧
∃ c : ℝ, 0 < c ∧ ∀ x, ‖ι x‖ = ‖x‖ ^ c := by sorry