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 uLean source · statement
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