The actual geometric stalk is a domain when the base embeds integrally and locally into a normal local domain with purely inseparable residue field.
Source context 5 commands
Surrounding namespaces, section variables, and local commands at this declaration.
noncomputable section
open AlgebraicGeometry CategoryTheory
namespace EtaleFundamentalGroups.StrictHenselian
universe u
variable {R Ω : Type u} [CommRing R] [IsLocalRing R]
[Field Ω] (φ : R →+* Ω) [IsLocalHom φ]theorem geometricStalk_isDomain_of_integral_normal_extension
(N : Type u) [CommRing N] [IsLocalRing N] [IsDomain N] [IsIntegrallyClosed N]
[Algebra R N] [Algebra.IsIntegral R N] [IsLocalHom (algebraMap R N)]
[IsPurelyInseparable (IsLocalRing.ResidueField R) (IsLocalRing.ResidueField N)]
(hinj : Function.Injective (algebraMap R N)) :
IsDomain (geometricStalk (Spec.map (CommRingCat.ofHom φ)))