Lifting a residue-field map to W(kβ)βπͺ
ProvedWittVector.exists_ringHom_isLocalHom_and_residue_comp_eq_comp_constantCoeffLet be a prime, let be a finite field of characteristic , and let be a commutative ring which is a domain and a discrete valuation ring, complete for the adic topology of its maximal ideal (in the sense of IsAdicComplete for the ideal IsLocalRing.maximalIdeal πͺ). Assume that the image of in lies in , and let be a ring homomorphism from to the residue field of . Then there exists a ring homomorphism from the ring of -typical Witt vectors of to such that is a local homomorphism, i.e. the preimage under of the non-units of consists of non-units (the IsLocalHom predicate), and such that the composite of with the residue map equals the composite of the constant-coefficient homomorphism with . Only existence is asserted; no uniqueness of is claimed.
This is the lifting property of the Witt vectors of a finite (hence perfect) field of characteristic : any map of into the residue field of a complete discrete valuation ring of mixed characteristic is induced by a local homomorphism out of , the coefficient ring of the unramified case of the Cohen structure theorem. It is used to supply coefficient rings: it is cited in the construction of regular local rings prorepresenting stalks on quaternionic moduli problems in the ΔerednikβDrinfeld setting, and in the construction of Galois representations attached to cusp forms with prescribed Hecke data.
import Mathlib.RingTheory.WittVector.DiscreteValuationRing import Mathlib.RingTheory.WittVector.Complete import Mathlib.RingTheory.LocalRing.ResidueField.Basic set_option maxHeartbeats 4000000 set_option synthInstance.maxHeartbeats 400000 set_option backward.isDefEq.respectTransparency.types false
theorem WittVector.exists_ringHom_isLocalHom_and_residue_comp_eq_comp_constantCoeff (p : β) [Fact p.Prime]
(kβ : Type) [Field kβ] [Finite kβ] [CharP kβ p]
(πͺ : Type) [CommRing πͺ] [IsDomain πͺ] [IsDiscreteValuationRing πͺ]
[IsAdicComplete (IsLocalRing.maximalIdeal πͺ) πͺ]
(hpπͺ : (p : πͺ) β IsLocalRing.maximalIdeal πͺ)
(f : kβ β+* IsLocalRing.ResidueField πͺ) :
β g : WittVector p kβ β+* πͺ, IsLocalHom g β§
(IsLocalRing.residue πͺ).comp g =
f.comp (WittVector.constantCoeff : WittVector p kβ β+* kβ) := by sorry