ProCGroups.FiniteStepSolvableQuotients.exists_faithful_primeKernel_embedding_solution
An elementary-kernel solver produces a suitable finite extension with faithful abelian singleton-Sigma kernel for every actual finite quotient.
Source context 3 commands
Surrounding namespaces, section variables, and local commands at this declaration.
namespace ProCGroups.FiniteStepSolvableQuotients
open ProCGroups.FreeProC.Characterization ProCGroups.WreathProducts
universe uLean source · statement
theorem exists_faithful_primeKernel_embedding_solution
{H : Type u} [Group H] [TopologicalSpace H] [IsTopologicalGroup H]
(q : ℕ) [Fact q.Prime]
(hsolve : HasFiniteSplitAbelianKernelEmbeddingSolutions
(FiniteGroupClass.abelianExponent q) H)
(B : TopGrp.{u}) [Finite B] [DiscreteTopology B]
(π : H →ₜ* B) (hπ : Function.Surjective π) :
∃ E : TopGrp.{u}, Finite E ∧ DiscreteTopology E ∧
∃ α : E →ₜ* B, ∃ hα : Function.Surjective α,
∃ hcomm : ∀ a b : α.toMonoidHom.ker, Commute (a : E) (b : E),
FiniteGroupClass.sigmaGroup {q} α.toMonoidHom.ker ∧
Function.Injective (abelianKernelConjugation α.toMonoidHom hα hcomm) ∧
Nonempty (⟨E, B, α, hα, π, hπ⟩ : TopologicalEmbeddingProblem H).ProperSolution