CrowellExactSequence.Profinite.FiniteRank

2 Theorem | 2 Definition

This module develops the Crowell--Blanchfield--Lyndon exact sequence and its completed coordinate forms.

import
Imported by

Declarations

noncomputable def finiteRank_freeProCSourceData
    {sigma : Set ℕ} {r : ℕ} (X : Fin r → F)
    (hFree : ProCGroups.FreeProC.IsFreeProCGroupOnConvergingSet
      (ProC := ProCGroups.ProC.finiteGroupClassProCPredicate
        (ProCGroups.FiniteGroupClass.sigmaGroup.{u} sigma))
      (Fin r) F X) :
    FreeProCSourceData (ProCGroups.ProC.proSigmaProC.{u} sigma) where
  basis := ULift.{u} (Fin r)
  carrier := F
  instGroup := inferInstance
  instTopologicalSpace := inferInstance
  instIsTopologicalGroup := inferInstance
  inclusion := fun i => X i.down
  isFree := by
    simpa [ProCGroups.ProC.proSigmaProC] using
      hFree.precompEquiv (Equiv.ulift : ULift.{u} (Fin r) ≃ Fin r)
  proCGroup := by
    refine
      { isProC := by
          simpa [ProCGroups.ProC.proSigmaProC] using hFree.isProC
        isProCGroup := ?_ }
    exact hFree.isProC.mono (D :=
      (ProCGroups.ProC.proSigmaProC.{u} sigma).finiteQuotientClass) (by
      intro Q _ hQ
      letI : Finite Q := ProCGroups.FiniteGroupClass.finite hQ
      exact (ProCGroups.ProC.proSigmaProC_finiteQuotientClass_iff
        (sigma := sigma) (Q := Q)).2 hQ)

Package a finite-rank free pro-\(\Sigma\) group as CES free-source data.

theorem finiteRank_freeProCSourceData_basis_card
    {sigma : Set ℕ} {r : ℕ} (X : Fin r → F)
    (hFree : ProCGroups.FreeProC.IsFreeProCGroupOnConvergingSet
      (ProC := ProCGroups.ProC.finiteGroupClassProCPredicate
        (ProCGroups.FiniteGroupClass.sigmaGroup.{u} sigma))
      (Fin r) F X) :
    Cardinal.mk (finiteRank_freeProCSourceData (F := F) X hFree).basis = r

The finite-rank CES source data has the expected basis cardinality.

Show proof
noncomputable def finiteRank_topologicalAbelianization_sepCoordinateMap
    {sigma : Set ℕ} {r : ℕ} (X : Fin r → F)
    (hFree : ProCGroups.FreeProC.IsFreeProCGroupOnConvergingSet
      (ProC := ProCGroups.ProC.finiteGroupClassProCPredicate
        (ProCGroups.FiniteGroupClass.sigmaGroup.{u} sigma))
      (Fin r) F X) :=
  freeProCChosenULift_sepCoordinateMap
    (H := TopologicalAbelianization F)
    (ProC := ProCGroups.ProC.proSigmaProC.{u} sigma)
    (finiteRank_freeProCSourceData (F := F) X hFree)
    (finiteRank_freeProCSourceData_basis_card (F := F) X hFree)
    (TopologicalAbelianization.mkₜ F)
    (by
      change Function.Surjective (TopologicalAbelianization.mk F)
      exact TopologicalAbelianization.surjective_mk F)

The separated coordinate map for the topological abelianization of a finite-rank free pro-\(\Sigma\) group.

theorem mem_topDerivedTop_two_of_finiteRank_topologicalAbelianization_sepCoordinateMap_eq_zero
    {sigma : Set ℕ} {r : ℕ} (X : Fin r → F)
    (hFree : ProCGroups.FreeProC.IsFreeProCGroupOnConvergingSet
      (ProC := ProCGroups.ProC.finiteGroupClassProCPredicate
        (ProCGroups.FiniteGroupClass.sigmaGroup.{u} sigma))
      (Fin r) F X)
    {a : F}
    (haψ : TopologicalAbelianization.mkₜ F a = 1)
    (hzero :
      finiteRank_topologicalAbelianization_sepCoordinateMap (F := F) X hFree
        (FoxDifferential.zcSeparatedUniversalDifferential
          (ProCGroups.ProC.proSigmaProC.{u} sigma).finiteQuotientClass
          (TopologicalAbelianization.mkₜ F).toMonoidHom a) = 0) :
    a ∈ topDerivedTop F 2

If the separated abelianized CES coordinate vector of a kernel element vanishes, the element lies in the second closed derived subgroup.

Show proof