Module

PrimaryDetection.lean

Nyll.ProCGroups.Abelian.PrimaryDetection
1 declaration indexed from sourceView source ↗

Primary quotients separate profinite abelian groups

Declarations

ProCGroups.ProC.eq_one_of_forall_primaryQuotient
Source context 2 commands

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

namespace ProCGroups.ProC
universe u
theorem eq_one_of_forall_primaryQuotient
    {A : Type u} [CommGroup A] [TopologicalSpace A] [IsTopologicalGroup A]
    [CompactSpace A] [T2Space A] [TotallyDisconnectedSpace A]
    (a : A)
    (ha : ∀ (p : ℕ) [Fact p.Prime],
      QuotientGroup.mk' (proCResidualCore (FiniteGroupClass.pGroup p) A) a = 1) :
    a = 1