Module

HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.lean

Nyll.AlgebraicCurves.Foundations.CommutativeAlgebra.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
24 declarations indexed from sourceView source ↗

Homogeneous Localization Away flat quotient Mk comp of forall flat piece

Declarations

AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.𝓑

The homogeneous piece of the quotient obtained as the image of the corresponding original piece.

Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
def 𝓑 (k : ℕ) : Submodule S (A ⧸ I)
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.mk_mem
Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
omit [GradedAlgebra 𝒜] in
theorem mk_mem {k : ℕ} {a : A} (ha : a ∈ 𝒜 k) : Ideal.Quotient.mk I a ∈ 𝓑 𝒜 I k
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.gradedMonoid
Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
instance gradedMonoid : SetLike.GradedMonoid (𝓑 𝒜 I) where
  one_mem := ⟨1, SetLike.one_mem_graded 𝒜, map_one (Ideal.Quotient.mkₐ S I)⟩
  mul_mem := by
    rintro i j x y ⟨a, ha, rfl⟩ ⟨b, hb, rfl⟩
    exact ⟨a * b, SetLike.mul_mem_graded ha hb, map_mul (Ideal.Quotient.mkₐ S I) a b⟩
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.g

The restriction of the quotient map to the indicated homogeneous piece.

Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
def g (k : ℕ) : 𝒜 k →ₗ[S] 𝓑 𝒜 I k
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.g_apply_coe
Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
omit [GradedAlgebra 𝒜] in
theorem g_apply_coe (k : ℕ) (a : 𝒜 k) : (g 𝒜 I k a : A ⧸ I) = Ideal.Quotient.mk I a
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.ψ

The linear map sending an element to its family of homogeneous components in the quotient.

Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
def ψ : A →ₗ[S] ⨁ k, 𝓑 𝒜 I k
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.ψ_apply
Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
theorem ψ_apply (a : A) : ψ 𝒜 I a = lmap (g 𝒜 I) (decompose 𝒜 a)
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.coe_lmap
Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
omit [GradedAlgebra 𝒜] in
theorem coe_lmap [DecidableEq ℕ] (x : ⨁ k, 𝒜 k) :
    DirectSum.coeLinearMap (𝓑 𝒜 I) (lmap (g 𝒜 I) x) =
      Ideal.Quotient.mkₐ S I (DirectSum.coeLinearMap 𝒜 x)
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.ψ_eq_zero
Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
theorem ψ_eq_zero (hI : ∀ a ∈ I, ∀ k : ℕ, (DirectSum.decompose 𝒜 a k : A) ∈ I)
    {a : A} (ha : a ∈ I) : ψ 𝒜 I a = 0
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.δ

The decomposition map on the quotient by a homogeneous ideal.

Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
def δ (hI : ∀ a ∈ I, ∀ k : ℕ, (DirectSum.decompose 𝒜 a k : A) ∈ I) :
    (A ⧸ I) →ₗ[S] ⨁ k, 𝓑 𝒜 I k where
  toFun q := Quotient.liftOn' q (ψ 𝒜 I) (fun a b hab => by
    have hab' : a - b ∈ I := (Submodule.quotientRel_def I).1 hab
    have h0 := ψ_eq_zero 𝒜 I hI hab'
    rwa [map_sub, sub_eq_zero] at h0)
  map_add' x y := by
    induction x using Quotient.inductionOn' with | h a =>
    induction y using Quotient.inductionOn' with | h b =>
    exact map_add (ψ 𝒜 I) a b
  map_smul' s x := by
    induction x using Quotient.inductionOn' with | h a =>
    exact map_smul (ψ 𝒜 I) s a
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.δ_mk
Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
theorem δ_mk (hI : ∀ a ∈ I, ∀ k : ℕ, (DirectSum.decompose 𝒜 a k : A) ∈ I) (a : A) :
    δ 𝒜 I hI (Ideal.Quotient.mk I a) = ψ 𝒜 I a
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.gradedAlgebra

The grading on the quotient induced by an ideal stable under homogeneous components.

Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
def gradedAlgebra
    (hI : ∀ a ∈ I, ∀ k : ℕ, (DirectSum.decompose 𝒜 a k : A) ∈ I) : GradedAlgebra (𝓑 𝒜 I)
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.flat_piece
Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
omit [GradedAlgebra 𝒜] in
theorem flat_piece (hflat : ∀ k : ℕ, Module.Flat S (↥(𝒜 k) ⧸ Submodule.comap (𝒜 k).subtype
  (I.restrictScalars S)))
    (k : ℕ) : Module.Flat S (𝓑 𝒜 I k)
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.algebraMap_mem
Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Grading
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A)
theorem algebraMap_mem (s : S) : algebraMap S A s ∈ 𝒜 0
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.θ

The graded ring homomorphism induced by the quotient map.

Source context 9 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Localise
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A) [GradedAlgebra (𝓑 𝒜 I)]
def θ : 𝒜 →+*ᵍ 𝓑 𝒜 I
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.θ_apply
Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Localise
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A) [GradedAlgebra (𝓑 𝒜 I)]
omit [GradedAlgebra 𝒜] [GradedAlgebra (𝓑 𝒜 I)] in
theorem θ_apply (a : A) : θ 𝒜 I a = Ideal.Quotient.mk I a
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.Φ

The map of homogeneous localizations induced by the graded quotient homomorphism.

Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Localise
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A) [GradedAlgebra (𝓑 𝒜 I)]
variable {d : ℕ} {f : A}
def Φ (f : A) : Away 𝒜 f →+* Away (𝓑 𝒜 I) (θ 𝒜 I f)
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.Φ_surjective
Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Localise
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A) [GradedAlgebra (𝓑 𝒜 I)]
variable {d : ℕ} {f : A}
theorem Φ_surjective (hf : f ∈ 𝒜 d) : Function.Surjective (Φ 𝒜 I f)
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.G

The homogeneous fractions admitting a numerator in the specified ideal.

Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Localise
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A) [GradedAlgebra (𝓑 𝒜 I)]
variable {d : ℕ} {f : A}
def G (f : A) : Set (Away 𝒜 f)
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.ker_Φ
Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Localise
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A) [GradedAlgebra (𝓑 𝒜 I)]
variable {d : ℕ} {f : A}
theorem ker_Φ (hf : f ∈ 𝒜 d) : RingHom.ker (Φ 𝒜 I f) = Ideal.span (G 𝒜 I f)
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.φ

The base-ring map to the homogeneous localization through the degree-zero projection.

Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Localise
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A) [GradedAlgebra (𝓑 𝒜 I)]
variable {d : ℕ} {f : A}
abbrev φ (f : A) : S →+* Away 𝒜 f
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.Φ_comp_φ
Source context 10 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
section Localise
variable {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
  (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜] (I : Ideal A) [GradedAlgebra (𝓑 𝒜 I)]
variable {d : ℕ} {f : A}
theorem Φ_comp_φ :
    (Φ 𝒜 I f).comp (φ 𝒜 f) =
      (HomogeneousLocalization.fromZeroRingHom (𝓑 𝒜 I) (Submonoid.powers (θ 𝒜 I f))).comp
        ((GradedRing.projZeroRingHom' (𝓑 𝒜 I)).comp (algebraMap S (A ⧸ I)))
AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs.HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece.AWAYQUOTSOL.flat_of_eq
Source context 7 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
namespace AWAYQUOTSOL
open DirectSum
theorem flat_of_eq {R : Type u} {B : Type v} [CommRing R] [CommRing B] (φ' : R →+* B)
    {J J' : Ideal B} (h : J = J') (hJ' : ((Ideal.Quotient.mk J').comp φ').Flat) :
    ((Ideal.Quotient.mk J).comp φ').Flat
HomogeneousLocalization.Away.flat_quotientMk_comp_of_forall_flat_piece
Source context 7 commands

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

section ProofImplementation
namespace AlgebraicCurves.Foundations.CommutativeAlgebra.Proofs
namespace HomogeneousLocalization_Away_flat_quotientMk_comp_of_forall_flat_piece
universe u v
open HomogeneousLocalization
attribute [local instance] AWAYQUOTSOL.gradedMonoid
open AWAYQUOTSOL DirectSum in
theorem _root_.HomogeneousLocalization.Away.flat_quotientMk_comp_of_forall_flat_piece
    {S : Type u} [CommRing S] {A : Type v} [CommRing A] [Algebra S A]
    (𝒜 : ℕ → Submodule S A) [GradedAlgebra 𝒜]
    (I : Ideal A) (hI : ∀ a ∈ I, ∀ k : ℕ, (DirectSum.decompose 𝒜 a k : A) ∈ I)
    (hflat : ∀ k : ℕ, Module.Flat S (↥(𝒜 k) ⧸ Submodule.comap (𝒜 k).subtype (I.restrictScalars S)))
    {d : ℕ} (f : A) (hf : f ∈ 𝒜 d) :
    ((Ideal.Quotient.mk (Ideal.span {x : Away 𝒜 f |
          ∃ y : NumDenSameDeg 𝒜 (Submonoid.powers f), (y.num : A) ∈ I ∧ HomogeneousLocalization.mk
            y = x})).comp
      ((HomogeneousLocalization.fromZeroRingHom 𝒜 (Submonoid.powers f)).comp
        ((GradedRing.projZeroRingHom' 𝒜).comp (algebraMap S A)))).Flat