theorem
L35 ↗ringHom_flat_mk_comp
AlgebraicCurves.Geometry.Sheaves.Proofs.IdealSheafData_flat_subschemeInclusion_comp_of_forall_mul_mem_of_isDiscreteValuationRing.SatFlat.ringHom_flat_mk_comp
Source context 6 commands
Surrounding namespaces, section variables, and local commands at this declaration.
section ProofImplementation
namespace AlgebraicCurves.Geometry.Sheaves.Proofs
namespace IdealSheafData_flat_subschemeInclusion_comp_of_forall_mul_mem_of_isDiscreteValuationRing
universe u
open CategoryTheory CategoryTheory.Limits AlgebraicGeometry
namespace SatFlatLean source · statement
theorem ringHom_flat_mk_comp {O : Type u} [CommRing O] [IsDomain O] [IsDiscreteValuationRing O] {A
: Type u} [CommRing A]
(θ : O →+* A) (J : Ideal A) (hsat : ∀ (ϖ : O), Irreducible ϖ → ∀ s : A, θ ϖ * s ∈ J → s ∈ J) :
((Ideal.Quotient.mk J).comp θ).Flat