Module

CurveModel_ffEquiv_symm_mem_and_evalAt_pointEquivPlace_eq_stalkClosedPointTo.lean

Nyll.AlgebraicCurves.Models.CurveModel_ffEquiv_symm_mem_and_evalAt_pointEquivPlace_eq_stalkClosedPointTo
1 declaration indexed from sourceView source ↗

Curve Model ff Equiv symm mem and eval At point Equiv Place eq stalk Closed Point To

Declarations

AlgebraicCurve.CurveModel.ffEquiv_symm_mem_and_evalAt_pointEquivPlace_eq_stalkClosedPointTo
Source context 5 commands

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

section ProofImplementation
namespace AlgebraicCurves.Models.Proofs
namespace CurveModel_ffEquiv_symm_mem_and_evalAt_pointEquivPlace_eq_stalkClosedPointTo
open CategoryTheory AlgebraicGeometry AlgebraicCurve
universe u v
theorem
  _root_.AlgebraicCurve.CurveModel.ffEquiv_symm_mem_and_evalAt_pointEquivPlace_eq_stalkClosedPointTo
    {K : Type u} [Field K] [IsAlgClosed K] {L : Type v} [Field L] [Algebra K L]
    (M : CurveModel K L) (pt : {q : Spec (CommRingCat.of K) ⟶ M.C // q ≫ M.toBase = 𝟙 _})
    (s : M.C.presheaf.stalk (pt.1.base (IsLocalRing.closedPoint K))) :
    ∃ h : M.ffEquiv.symm (algebraMap _ M.C.functionField s) ∈ (M.pointEquivPlace
      pt).toValuationSubring,
      IsLocalRing.residue (M.pointEquivPlace pt).toValuationSubring ⟨_, h⟩ =
        algebraMap K (M.pointEquivPlace pt).ResidueField ((Scheme.stalkClosedPointTo pt.1).hom s) ∧
      (M.pointEquivPlace pt).evalAt (M.ffEquiv.symm (algebraMap _ M.C.functionField s)) =
        (Scheme.stalkClosedPointTo pt.1).hom s