The idempotent supplied by the étale local structure theorem gives an actual finite open factor with a singleton fiber. The point of this factor maps to the prescribed prime of the original algebra, and the residue field of the chosen point on the étale base is unchanged.
Source context 5 commands
Surrounding namespaces, section variables, and local commands at this declaration.
@[expose] public noncomputable section
open CategoryTheory Limits TopologicalSpace
open scoped TensorProduct
universe u
namespace AlgebraicGeometrytheorem exists_etale_finite_factor_of_quasiFiniteAt
{R S : Type u} [CommRing R] [CommRing S] [Algebra R S]
[Algebra.FiniteType R S] (p : Ideal R) [p.IsPrime]
(q : Ideal S) [q.IsPrime] [q.LiesOver p] [Algebra.QuasiFiniteAt R q] :
∃ (R' : Type u) (_ : CommRing R') (_ : Algebra R R') (_ : Algebra.Etale R R')
(P : Ideal R') (_ : P.IsPrime) (_ : P.LiesOver p)
(e : R' ⊗[R] S) (_ : IsIdempotentElem e),
Function.Bijective (Ideal.ResidueField.mapₐ p P (Algebra.ofId _ _) (P.over_def p)) ∧
Module.Finite R' (Localization.Away e) ∧
IsFinite (Spec.map (CommRingCat.ofHom (algebraMap R' (Localization.Away e)))) ∧
IsOpenImmersion (Spec.map (CommRingCat.ofHom
(algebraMap (R' ⊗[R] S) (Localization.Away e)))) ∧
∃ z : Spec (CommRingCat.of (Localization.Away e)),
Spec.map (CommRingCat.ofHom (algebraMap R' (Localization.Away e))) z =
⟨P, inferInstance⟩ ∧
(Spec.map (CommRingCat.ofHom (algebraMap (R' ⊗[R] S) (Localization.Away e))) ≫
Spec.map (CommRingCat.ofHom
(Algebra.TensorProduct.includeRight : S →ₐ[R] R' ⊗[R] S).toRingHom)) z =
(⟨q, inferInstance⟩ : Spec (CommRingCat.of S)) ∧
∀ z' : Spec (CommRingCat.of (Localization.Away e)),
Spec.map (CommRingCat.ofHom (algebraMap R' (Localization.Away e))) z' =
⟨P, inferInstance⟩ → z' = z