AlgebraicCurves.RelativeDivisors.Proofs.RelEffCartierDiv_exists_supportedIn_of_forall_finset.AlgebraicGeometry.RelEffCartierDiv.exists_supportedIn_of_forall_finset_aux
Source context 13 commands
Surrounding namespaces, section variables, and local commands at this declaration.
section ProofImplementation
namespace AlgebraicCurves.RelativeDivisors.Proofs
namespace RelEffCartierDiv_exists_supportedIn_of_forall_finset
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.AlgebraicGeometry
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace RelEffCartierDiv
open _root_.AlgebraicGeometry.RelEffCartierDiv
open _root_.AlgebraicGeometry.RelEffCartierDiv
open _root_.AlgebraicGeometryLean source · statement
theorem exists_supportedIn_of_forall_finset_aux
{𝒞 S : Scheme.{u}} (f : 𝒞 ⟶ S)
(hcov : ∀ (V : S.affineOpens) (F : Finset 𝒞), (∀ x ∈ F, f x ∈ (V : S.Opens)) →
∃ U : 𝒞.Opens, IsAffineOpen U ∧ U ≤ f ⁻¹ᵁ (V : S.Opens) ∧ ∀ x ∈ F, x ∈ U)
(r : ℕ) {T : Scheme.{u}} {g : T ⟶ S} (D : RelEffCartierDiv f r g) (t : T) :
∃ (W : T.Opens) (_ : t ∈ W) (V : S.affineOpens) (U : 𝒞.affineOpens)
(_ : (U : 𝒞.Opens) ≤ f ⁻¹ᵁ (V : S.Opens)),
(D.pullbackAlong W.ι rfl).SupportedIn U