SchemeTheory.isDiscreteValuationRing_of_isRegularLocalRing_dimension_one
A regular local ring of dimension one is a DVR, with its domain structure derived from regularity and retained in the conclusion.
Source context 2 commands
Surrounding namespaces, section variables, and local commands at this declaration.
namespace SchemeTheory
universe uLean source · full declaration
theorem isDiscreteValuationRing_of_isRegularLocalRing_dimension_one
(R : Type u) [CommRing R] [IsRegularLocalRing R]
(hdim : ringKrullDim R = (1 : WithBot ℕ∞)) :
let : IsDomain R := IsRegularLocalRing.isDomain R
IsDiscreteValuationRing R := by
intro hdomain
apply IsLocalRing.finrank_CotangentSpace_eq_one_iff.mp
have hcotangent :
((Module.finrank (IsLocalRing.ResidueField R)
(IsLocalRing.CotangentSpace R) : ℕ∞) : WithBot ℕ∞) =
((1 : ℕ∞) : WithBot ℕ∞) :=
((IsRegularLocalRing.iff_finrank_cotangentSpace R).mp inferInstance).trans hdim
exact ENat.natCast_inj.mp (WithBot.coe_eq_coe.mp hcotangent)