Module

IsLocalRing_isRegularLocalRing_of_formallySmooth_of_formallyUnramified_polynomial_of_henselianLocalRing.lean

Nyll.AlgebraicCurves.Foundations.CommutativeAlgebra.IsLocalRing_isRegularLocalRing_of_formallySmooth_of_formallyUnramified_polynomial_of_henselianLocalRing
1 declaration indexed from sourceView source ↗

Is Local Ring is Regular Local Ring of formally Smooth of formally Unramified polynomial

of henselian Local Ring

Declarations

IsLocalRing.isRegularLocalRing_of_formallySmooth_of_formallyUnramified_polynomial_of_henselianLocalRing
Source context 3 commands

Surrounding namespaces, section variables, and local commands at this declaration.

section ProofImplementation
namespace IsLocalRing
open _root_.IsLocalRing
theorem isRegularLocalRing_of_formallySmooth_of_formallyUnramified_polynomial_of_henselianLocalRing
    {A : Type} [CommRing A] [IsDomain A] [IsDiscreteValuationRing A] [HenselianLocalRing A]
    (ϖ : A) (hϖ : maximalIdeal A = Ideal.span {ϖ})
    {S : Type} [CommRing S] [IsDomain S] [IsLocalRing S]
    (φ : Polynomial A →+* S) (hφs : φ.FormallySmooth) (hφu : φ.FormallyUnramified) (hφf :
      φ.EssFiniteType)
    (χ₀ : S →+* ResidueField A) (hχ₀ : RingHom.ker χ₀ = maximalIdeal S)
    (hχ₀C : ∀ a : A, χ₀ (φ (Polynomial.C a)) = IsLocalRing.residue A a) (hχ₀t : χ₀ (φ Polynomial.X)
      = 0) :
    IsRegularLocalRing S ∧ ringKrullDim S ≤ 2 ∧
      maximalIdeal S = Ideal.span {φ (Polynomial.C ϖ), φ Polynomial.X} ∧ Prime (φ (Polynomial.C ϖ))