Module

Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.lean

Nyll.AlgebraicCurves.Geometry.Schemes.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
20 declarations indexed from sourceView source ↗

Scheme forall mem iff of subset union preimage or disjoint

Declarations

AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.T

Right translation by the chosen section in the category of schemes over the base.

Source context 18 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
def T (a : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) : Over.mk t ⟶ Over.mk t
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.S

Left translation by the chosen section composed with inversion in the group object.

Source context 18 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
def S (c : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) : Over.mk t ⟶ Over.mk t
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.P

The underlying point of the scheme determined by a section over the base field.

Source context 18 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
def P (y : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) : X
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.toUnit_pt_comp
Source context 20 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
omit [GrpObj (Over.mk t)] in
lemma toUnit_pt_comp (a : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) :
    CartesianMonoidalCategory.toUnit (Over.mk (𝟙 (Spec (CommRingCat.of k)))) ≫ a = a
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.pt_comp_T
Source context 19 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
lemma pt_comp_T (y a : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) : y ≫ T t a = y * a
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.pt_comp_S
Source context 19 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
lemma pt_comp_S (y c : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) : y ≫ S t c = c * y⁻¹
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.T_comp_T
Source context 19 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
lemma T_comp_T (a b : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) : T t a ≫ T t b = T t (a *
  b)
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.T_one
Source context 19 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
lemma T_one : T t (1 : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) = 𝟙 (Over.mk t)
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.S_comp_S
Source context 19 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
lemma S_comp_S [IsCommMonObj (Over.mk t)] (c : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) :
    S t c ≫ S t c = 𝟙 (Over.mk t)
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.isIso_T
Source context 19 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
instance isIso_T (a : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) : IsIso (T t a)
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.isIso_S
Source context 19 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
instance isIso_S [IsCommMonObj (Over.mk t)] (c : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶
  Over.mk t) :
    IsIso (S t c)
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.P_comp
Source context 20 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
omit [GrpObj (Over.mk t)] in
lemma P_comp (y : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) (φ : Over.mk t ⟶ Over.mk t) :
    P t (y ≫ φ) = φ.left.base (P t y)
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.T_base_P
Source context 19 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
lemma T_base_P (y a : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) :
    (T t a).left.base (P t y) = P t (y * a)
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.S_base_P
Source context 19 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
lemma S_base_P (y c : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) :
    (S t c).left.base (P t y) = P t (c * y⁻¹)
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.surjective_left_base
Source context 20 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
omit [GrpObj (Over.mk t)] in
lemma surjective_left_base (φ : Over.mk t ⟶ Over.mk t) [IsIso φ] : Function.Surjective φ.left.base
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.compl_preimage
Source context 20 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
omit [GrpObj (Over.mk t)] in
lemma compl_preimage (φ : Over.mk t ⟶ Over.mk t) [IsIso φ] {D : Set X} (hD : IsClosed D) (hD' : D ≠
  Set.univ) :
    IsOpen (φ.left.base ⁻¹' D)ᶜ ∧ ((φ.left.base ⁻¹' D)ᶜ).Nonempty
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.exists_P_mem
Source context 22 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
section main
variable [IsAlgClosed k] [LocallyOfFiniteType t] [IsIntegral X] [IsCommMonObj (Over.mk t)]
omit [GrpObj (Over.mk t)] [IsIntegral X] [IsCommMonObj (Over.mk t)] in
lemma exists_P_mem {U : Set X} (hU : IsOpen U) (hne : U.Nonempty) :
    ∃ b : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t, P t b ∈ U
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.key
Source context 21 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
section main
variable [IsAlgClosed k] [LocallyOfFiniteType t] [IsIntegral X] [IsCommMonObj (Over.mk t)]
lemma key {D : Set X} (hD : IsClosed D) (hD' : D ≠ Set.univ) {Z : Set X} (_hZ' : IsIrreducible Z)
    (h : ∀ a b : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t,
      Z ⊆ ((T t a).left.base ⁻¹' D ∪ (T t b).left.base ⁻¹' D ∪ (T t (a * b)⁻¹).left.base ⁻¹' D) ∨
      Disjoint Z ((T t a).left.base ⁻¹' D ∪ (T t b).left.base ⁻¹' D ∪ (T t (a * b)⁻¹).left.base ⁻¹'
        D))
    (z z' d : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) (hz : P t z ∈ Z) (hz' : P t z' ∈ Z)
    (hd : P t d ∈ D) : P t (d * (z⁻¹ * z')) ∈ D
AlgebraicCurves.Geometry.Schemes.Proofs.Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint.AlgebraicGeometry.Scheme.TranslateCore.main
Source context 21 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
namespace AlgebraicGeometry
open _root_.AlgebraicGeometry
namespace Scheme
open _root_.AlgebraicGeometry.Scheme
namespace TranslateCore
open _root_.AlgebraicGeometry.Scheme
open _root_.AlgebraicGeometry
variable {k : Type u} [Field k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
  [GrpObj (Over.mk t)]
variable {t}
section main
variable [IsAlgClosed k] [LocallyOfFiniteType t] [IsIntegral X] [IsCommMonObj (Over.mk t)]
theorem main (D : Set X) (hD : IsClosed D) (hD' : D ≠ Set.univ) (Z : Set X) (_hZ : IsClosed Z)
    (hZ' : IsIrreducible Z)
    (h : ∀ a b : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t,
      Z ⊆ ((T t a).left.base ⁻¹' D ∪ (T t b).left.base ⁻¹' D ∪ (T t (a * b)⁻¹).left.base ⁻¹' D) ∨
      Disjoint Z ((T t a).left.base ⁻¹' D ∪ (T t b).left.base ⁻¹' D ∪ (T t (a * b)⁻¹).left.base ⁻¹'
        D))
    (z z' : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) (hz : P t z ∈ Z) (hz' : P t z' ∈ Z)
    (d : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) :
    P t d ∈ D ↔ P t (d * (z⁻¹ * z')) ∈ D
AlgebraicGeometry.Scheme.forall_mem_iff_of_subset_union_preimage_or_disjoint
Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Geometry.Schemes.Proofs
namespace Scheme_forall_mem_iff_of_subset_union_preimage_or_disjoint
universe u
open _root_.CategoryTheory
open _root_.CategoryTheory.Limits
open _root_.CategoryTheory.MonoidalCategory
open _root_.AlgebraicGeometry
open scoped CategoryTheory.MonObj
attribute [local instance] MvPolynomial.gradedAlgebra
theorem _root_.AlgebraicGeometry.Scheme.forall_mem_iff_of_subset_union_preimage_or_disjoint
    (k : Type u) [Field k] [IsAlgClosed k] {X : Scheme.{u}} (t : X ⟶ Spec (CommRingCat.of k))
    [LocallyOfFiniteType t] [IsIntegral X] [GrpObj (Over.mk t)] [IsCommMonObj (Over.mk t)]
    (D : Set X) (hD : IsClosed D) (hD' : D ≠ Set.univ) (Z : Set X) (hZ : IsClosed Z) (hZ' :
      IsIrreducible Z)
    (h : ∀ a b : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t,
      Z ⊆ ((𝟙 (Over.mk t) * (CartesianMonoidalCategory.toUnit (Over.mk t) ≫ a)).left.base ⁻¹' D ∪
            (𝟙 (Over.mk t) * (CartesianMonoidalCategory.toUnit (Over.mk t) ≫ b)).left.base ⁻¹' D ∪
            (𝟙 (Over.mk t) * (CartesianMonoidalCategory.toUnit (Over.mk t) ≫ (a * b)⁻¹)).left.base
              ⁻¹' D) ∨
      Disjoint Z ((𝟙 (Over.mk t) * (CartesianMonoidalCategory.toUnit (Over.mk t) ≫ a)).left.base
        ⁻¹' D ∪
            (𝟙 (Over.mk t) * (CartesianMonoidalCategory.toUnit (Over.mk t) ≫ b)).left.base ⁻¹' D ∪
            (𝟙 (Over.mk t) * (CartesianMonoidalCategory.toUnit (Over.mk t) ≫ (a * b)⁻¹)).left.base
              ⁻¹' D))
    (z z' : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t)
    (hz : z.left.base (IsLocalRing.closedPoint k) ∈ Z) (hz' : z'.left.base (IsLocalRing.closedPoint
      k) ∈ Z)
    (d : Over.mk (𝟙 (Spec (CommRingCat.of k))) ⟶ Over.mk t) :
    d.left.base (IsLocalRing.closedPoint k) ∈ D ↔ (d * (z⁻¹ * z')).left.base
      (IsLocalRing.closedPoint k) ∈ D