Embedding by mixed sections
OpenOAI.MaximalSeshadri.Geometry.LineBundle.mixed_section_embeddingLet be integral and compact, proper over a commutative ring , line bundles, a finite family of sections of with nonvanishing opens affine, nonempty and covering , and trivializations of on those opens. Then there are and finitely many sections of with iso-opens covering defining a closed immersion to over .
Notation. The iso-open of (SectionOpens.isoOpen s) is the union of the opens on which the morphism restricts to an isomorphism. sectionOpen X s is the same union for a global section : its nonvanishing open. sectionsMorphism k s hs is the morphism from to of the graded polynomial ring in variables indexed by the sections, defined by sections whose iso-opens cover , with the ring map from the base into .
Formalization Note The statement is verbatim from OpenAI's Lean development, with Definitions files of this development imported in place of the upstream modules; these are supporting code for the statement.
import Mathlib
import Definitions.Def_MaximalSeshadriConstants
import Definitions.Def_SeshadriPrelim6
namespace OAI
section
namespace MaximalSeshadri.Geometry
noncomputable section
open AlgebraicGeometry CategoryTheory CategoryTheory.Limits TopologicalSpace Opposite MvPolynomial
open MaximalSeshadri.Frames MaximalSeshadri.TensorPure MaximalSeshadri.Projective
variable {X : Scheme.{0}} {K ι : Type} [CommRing K] [Fintype ι]
theorem LineBundle.mixed_section_embedding [IsIntegral X] [CompactSpace X]
(p : X ⟶ Spec (CommRingCat.of K)) [IsProper p] (L M : LineBundle X)
(s : ι → GlobalSections X L.sheaf)
(hc : (⨆ i, sectionOpen X (s i)) = ⊤)
(haff : ∀ i, IsAffineOpen (sectionOpen X (s i)))
(hne : ∀ i, (sectionOpen X (s i) : Set X).Nonempty)
(d : ∀ i, M.sheaf.restrict (sectionOpen X (s i)).ι ≅ O (sectionOpen X (s i)).toScheme) :
∃ n : ℕ, 0 < n ∧ ∃ σ : Type, ∃ _ : Fintype σ,
∃ t : σ → GlobalSections X ((L.pow n).tensor M).sheaf,
∃ ht : (⨆ i, SectionOpens.isoOpen (t i)) = ⊤,
IsClosedImmersion (sectionsMorphism
(p.appTop.hom.comp (Scheme.ΓSpecIso (CommRingCat.of K)).inv.hom) t ht) := by
sorry
end
end MaximalSeshadri.Geometry
end
end OAI