EtaleFundamentalGroups.Cohomology.finiteH1DeckKernel
The genuine kernel of pullback on actual derived H¹.
Source context 4 commands
Surrounding namespaces, section variables, and local commands at this declaration.
noncomputable section
open CategoryTheory AlgebraicGeometry
namespace EtaleFundamentalGroups.Cohomology
variable {S : Scheme} (A : FiniteEtale S) [ConnectedSpace A.left]
{Ω : Type} [Field Ω] [IsSepClosed Ω]
(geom : Spec (.of Ω) ⟶ A.left) (B : AddCommGrpCat.{0}) [Finite B]Lean source · full declaration
def finiteH1DeckKernel : Subgroup (Aut A) where
carrier := { σ | ∀ c, constantCohomologyPullback σ.hom.left B 1 c = c }
one_mem' := by
intro c
exact constantFiniteH1Pullback_id geom B c
mul_mem' := by
intro σ τ hσ hτ c
change constantCohomologyPullback (τ.hom.left ≫ σ.hom.left) B 1 c = c
rw [constantFiniteH1Pullback_comp τ.hom.left σ.hom.left geom B c, hσ c, hτ c]
inv_mem' := by
intro σ hσ c
have he : σ.hom.left ≫ σ.inv.left = 𝟙 A.left :=
congrArg (fun f : A ⟶ A => f.left) σ.hom_inv_id
have h := constantFiniteH1Pullback_comp σ.hom.left σ.inv.left geom B c
rw [he, constantFiniteH1Pullback_id geom B c,
hσ (constantCohomologyPullback σ.inv.left B 1 c)] at h
exact h.symm