ProCGroups.CompletedGroupAlgebra.InClassFunctoriality.Maps
This module lifts hereditary \(C\)-indexed finite-stage maps to the named completed carrier and proves their algebraic, topological, and dense-subalgebra characterizations.
def completedGroupAlgebraMapInClass
(C : ProCGroups.FiniteGroupClass.{v})
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
(R : Type u) [CommRing R] [TopologicalSpace R] [IsTopologicalRing R]
(φ : G →* H) (hφ : Continuous φ) :
CompletedGroupAlgebraInClass C R G →+* CompletedGroupAlgebraInClass C R H where
toFun x :=
(completedGroupAlgebraInClassCompatibleFamilyEquiv
(R := R) (G := H) C).symm
((completedGroupAlgebraSystemInClass C R H).inverseLimitLift
(fun V x =>
completedGroupAlgebraFunctorialStageMapInClass
(G := G) (H := H) C hHer (R := R) φ hφ V
(completedGroupAlgebraProjectionInClass C R G
(completedGroupAlgebraComapIndexInClass
(G := G) (H := H) C hHer φ hφ V) x))
(by
intro V W hVW
funext x
have hcomp := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraFunctorialStageMapInClass_transition
(R := R) (G := G) (H := H) C hHer φ hφ hVW))
(completedGroupAlgebraProjectionInClass C R G
(completedGroupAlgebraComapIndexInClass
(G := G) (H := H) C hHer φ hφ W) x)
rw [RingHom.comp_apply, RingHom.comp_apply] at hcomp
simp only [Function.comp_apply]
rw [← completedGroupAlgebraProjectionInClass_compatible
(R := R) (G := G) C
(completedGroupAlgebraComapIndexInClass_mono
(G := G) (H := H) C hHer φ hφ hVW) x]
exact hcomp) x)
map_zero' := by
apply completedGroupAlgebraInClass_ext (R := R) (G := H) C
intro V
exact map_zero (completedGroupAlgebraFunctorialStageMapInClass
(G := G) (H := H) C hHer (R := R) φ hφ V)
map_one' := by
apply completedGroupAlgebraInClass_ext (R := R) (G := H) C
intro V
exact map_one (completedGroupAlgebraFunctorialStageMapInClass
(G := G) (H := H) C hHer (R := R) φ hφ V)
map_add' x y := by
apply completedGroupAlgebraInClass_ext (R := R) (G := H) C
intro V
exact map_add (completedGroupAlgebraFunctorialStageMapInClass
(G := G) (H := H) C hHer (R := R) φ hφ V)
(completedGroupAlgebraProjectionInClass C R G
(completedGroupAlgebraComapIndexInClass (G := G) (H := H) C hHer φ hφ V) x)
(completedGroupAlgebraProjectionInClass C R G
(completedGroupAlgebraComapIndexInClass (G := G) (H := H) C hHer φ hφ V) y)
map_mul' x y := by
apply completedGroupAlgebraInClass_ext (R := R) (G := H) C
intro V
exact map_mul (completedGroupAlgebraFunctorialStageMapInClass
(G := G) (H := H) C hHer (R := R) φ hφ V)
(completedGroupAlgebraProjectionInClass C R G
(completedGroupAlgebraComapIndexInClass (G := G) (H := H) C hHer φ hφ V) x)
(completedGroupAlgebraProjectionInClass C R G
(completedGroupAlgebraComapIndexInClass (G := G) (H := H) C hHer φ hφ V) y)A continuous homomorphism of groups induces a ring homomorphism on \(C\)-indexed completed group algebras, when \(C\) is hereditary.
@[simp 900]
theorem completedGroupAlgebraProjectionInClass_map
(C : ProCGroups.FiniteGroupClass.{v})
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
(φ : G →* H) (hφ : Continuous φ)
(V : CompletedGroupAlgebraIndexInClass H C) (x : CompletedGroupAlgebraInClass C R G) :
completedGroupAlgebraProjectionInClass C R H V
(completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ x) =
completedGroupAlgebraFunctorialStageMapInClass
(G := G) (H := H) C hHer (R := R) φ hφ V
(completedGroupAlgebraProjectionInClass C R G
(completedGroupAlgebraComapIndexInClass (G := G) (H := H) C hHer φ hφ V) x)The in-class completed group-algebra map is characterized by its finite-stage projections.
Show Lean proof
rfl
def completedGroupAlgebraMapAlgHomInClass
(C : ProCGroups.FiniteGroupClass.{v})
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
(R : Type u) [CommRing R] [TopologicalSpace R] [IsTopologicalRing R]
(φ : G →* H) (hφ : Continuous φ) :
CompletedGroupAlgebraInClass C R G →ₐ[R] CompletedGroupAlgebraInClass C R H where
toRingHom := completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ
commutes' := by
intro r
apply completedGroupAlgebraInClass_ext (R := R) (G := H) C
intro V
change completedGroupAlgebraFunctorialStageMapInClass
(G := G) (H := H) C hHer (R := R) φ hφ V
(algebraMap R
(CompletedGroupAlgebraStageInClass C R G
(completedGroupAlgebraComapIndexInClass
(G := G) (H := H) C hHer φ hφ V)) r) =
algebraMap R (CompletedGroupAlgebraStageInClass C R H V) r
exact completedGroupAlgebraFunctorialStageMapInClass_algebraMap
(R := R) (G := G) (H := H) C hHer φ hφ V rA continuous group homomorphism \(\varphi:G\to H\) induces an \(R\)-algebra homomorphism between the corresponding \(C\)-indexed completed group algebras.
@[simp]
theorem completedGroupAlgebraMapAlgHomInClass_apply
(C : ProCGroups.FiniteGroupClass.{v})
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
(φ : G →* H) (hφ : Continuous φ) (x : CompletedGroupAlgebraInClass C R G) :
completedGroupAlgebraMapAlgHomInClass (G := G) (H := H) C hHer R φ hφ x =
completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ xEvaluating the algebra homomorphism induced by \(\varphi\) at \(x\) gives completedGroupAlgebraMapInClass applied to \(x\).
Show Lean proof
rfl
theorem continuous_completedGroupAlgebraMapInClass
(C : ProCGroups.FiniteGroupClass.{v})
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
(φ : G →* H) (hφ : Continuous φ) :
Continuous (completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ)The induced \(C\)-indexed completed-group-algebra map is continuous.
Show Lean proof
by
let S := completedGroupAlgebraSystemInClass C R H
letI : ∀ V, TopologicalSpace (CompletedGroupAlgebraStageInClass C R H V) :=
fun V => (completedGroupAlgebraSystemInClass C R H).topologicalSpace V
let π : ∀ V : CompletedGroupAlgebraIndexInClass H C,
CompletedGroupAlgebraInClass C R G →
CompletedGroupAlgebraStageInClass C R H V :=
fun V x =>
completedGroupAlgebraFunctorialStageMapInClass
(G := G) (H := H) C hHer (R := R) φ hφ V
(completedGroupAlgebraProjectionInClass C R G
(completedGroupAlgebraComapIndexInClass
(G := G) (H := H) C hHer φ hφ V) x)
have hπ : ∀ V, Continuous (π V) := by
intro V
letI : TopologicalSpace
(CompletedGroupAlgebraStageInClass C R G
(completedGroupAlgebraComapIndexInClass (G := G) (H := H) C hHer φ hφ V)) :=
(completedGroupAlgebraSystemInClass C R G).topologicalSpace
(completedGroupAlgebraComapIndexInClass (G := G) (H := H) C hHer φ hφ V)
exact (continuous_completedGroupAlgebraFunctorialStageMapInClass
(R := R) (G := G) (H := H) C hHer φ hφ V).comp
((completedGroupAlgebraSystemInClass C R G).continuous_projection
(completedGroupAlgebraComapIndexInClass (G := G) (H := H) C hHer φ hφ V))
have hcompat : S.CompatibleMaps π := by
intro V W hVW
funext x
have hcomp := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraFunctorialStageMapInClass_transition
(R := R) (G := G) (H := H) C hHer φ hφ hVW))
(completedGroupAlgebraProjectionInClass C R G
(completedGroupAlgebraComapIndexInClass
(G := G) (H := H) C hHer φ hφ W) x)
rw [RingHom.comp_apply, RingHom.comp_apply] at hcomp
simp only [S, π, Function.comp_apply]
rw [← completedGroupAlgebraProjectionInClass_compatible
(R := R) (G := G) C
(completedGroupAlgebraComapIndexInClass_mono
(G := G) (H := H) C hHer φ hφ hVW) x]
exact hcomp
change Continuous (S.inverseLimitLift π hcompat)
exact S.continuous_inverseLimitLift π hπ hcompat
theorem completedGroupAlgebraMapInClass_comp_toCompletedGroupAlgebraInClass
(C : ProCGroups.FiniteGroupClass.{v})
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
(φ : G →* H) (hφ : Continuous φ) :
(completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ).comp
(toCompletedGroupAlgebraInClassRingHom C R G) =
(toCompletedGroupAlgebraInClassRingHom C R H).comp
(MonoidAlgebra.mapDomainRingHom R φ)The in-class completed group-algebra map composes with the dense abstract map as expected.
Show Lean proof
by
apply RingHom.ext
intro x
apply completedGroupAlgebraInClass_ext (R := R) (G := H) C
intro V
have hstage := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraFunctorialStageMapInClass_comp_stageMap
(R := R) (G := G) (H := H) C hHer φ hφ V))
x
change completedGroupAlgebraFunctorialStageMapInClass
(G := G) (H := H) C hHer (R := R) φ hφ V
(completedGroupAlgebraStageMapInClass C R G
(completedGroupAlgebraComapIndexInClass (G := G) (H := H) C hHer φ hφ V) x) =
completedGroupAlgebraStageMapInClass C R H V (MonoidAlgebra.mapDomainRingHom R φ x)
exact hstage
theorem completedGroupAlgebraMapInClass_surjective_of_surjective
(C : ProCGroups.FiniteGroupClass.{v})
(hForm : ProCGroups.FiniteGroupClass.Formation C)
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
[CompactSpace R] [T2Space R] [TotallyDisconnectedSpace R]
(hH : HasOpenNormalBasisInClass C H)
(φ : G →* H) (hφ : Continuous φ) (hφsurj : Function.Surjective φ) :
Function.Surjective
(completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ)A surjective continuous homomorphism onto a pro-\(C\) group induces a surjective map on \(C\)-indexed completed group algebras.
Show Lean proof
by
let f := completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ
letI : CompactSpace (CompletedGroupAlgebraInClass C R G) :=
completedGroupAlgebraInClass_compactSpace (R := R) (G := G) C
letI : T2Space (CompletedGroupAlgebraInClass C R H) :=
completedGroupAlgebraInClass_t2Space (R := R) (G := H) C
have hfcont : Continuous f :=
continuous_completedGroupAlgebraMapInClass (R := R) (G := G) (H := H)
C hHer φ hφ
have hclosed : IsClosed (Set.range f) := (isCompact_range hfcont).isClosed
have hdense : DenseRange (toCompletedGroupAlgebraInClassRingHom C R H) := by
change DenseRange (toCompletedGroupAlgebraInClass C R H)
exact denseRange_toCompletedGroupAlgebraInClass (R := R) (G := H) C hForm hH
have hcanonical_subset :
Set.range (toCompletedGroupAlgebraInClassRingHom C R H) ⊆ Set.range f := by
intro y hy
rcases hy with ⟨a, rfl⟩
obtain ⟨bCoeff, hbCoeff⟩ :=
Finsupp.mapDomain_surjective (M := R) hφsurj a.coeff
let b : MonoidAlgebra R G := MonoidAlgebra.ofCoeff bCoeff
have hb : MonoidAlgebra.mapDomainRingHom R φ b = a := by
apply MonoidAlgebra.coeff_injective
exact hbCoeff
refine ⟨toCompletedGroupAlgebraInClassRingHom C R G b, ?_⟩
have hcomp := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraMapInClass_comp_toCompletedGroupAlgebraInClass
(R := R) (G := G) (H := H) C hHer φ hφ))
b
simpa [f, RingHom.comp_apply, hb] using hcomp
intro y
have hycanonical :
y ∈ closure (Set.range (toCompletedGroupAlgebraInClassRingHom C R H)) := by
rw [hdense.closure_range]
exact Set.mem_univ y
have hyf : y ∈ closure (Set.range f) :=
closure_mono hcanonical_subset hycanonical
exact hclosed.closure_subset_iff.2 (fun z hz => hz) hyf
theorem completedGroupAlgebraInClassRingHom_ext_of_comp_toCompleted
(C : ProCGroups.FiniteGroupClass.{v})
(hForm : ProCGroups.FiniteGroupClass.Formation C)
[CompactSpace R] [T2Space R] [TotallyDisconnectedSpace R]
(hG : HasOpenNormalBasisInClass C G)
{f g : CompletedGroupAlgebraInClass C R G →+*
CompletedGroupAlgebraInClass C R H}
(hf : Continuous f) (hg : Continuous g)
(hfg : f.comp (toCompletedGroupAlgebraInClassRingHom C R G) =
g.comp (toCompletedGroupAlgebraInClassRingHom C R G)) :
f = gContinuous ring homomorphisms out of \(\widehat{R[G]}_C\) are determined by their values on the dense abstract group algebra.
Show Lean proof
by
letI : T2Space (CompletedGroupAlgebraInClass C R H) :=
completedGroupAlgebraInClass_t2Space (R := R) (G := H) C
have hdense : DenseRange (toCompletedGroupAlgebraInClassRingHom C R G) := by
change DenseRange (toCompletedGroupAlgebraInClass C R G)
exact denseRange_toCompletedGroupAlgebraInClass (R := R) (G := G) C hForm hG
have hcomp : (f : CompletedGroupAlgebraInClass C R G →
CompletedGroupAlgebraInClass C R H) ∘
(toCompletedGroupAlgebraInClassRingHom C R G) =
(g : CompletedGroupAlgebraInClass C R G →
CompletedGroupAlgebraInClass C R H) ∘
(toCompletedGroupAlgebraInClassRingHom C R G) := by
funext x
exact congrFun (congrArg DFunLike.coe hfg) x
have hfun : (f : CompletedGroupAlgebraInClass C R G →
CompletedGroupAlgebraInClass C R H) = g :=
DenseRange.equalizer hdense hf hg hcomp
exact RingHom.ext fun x => congrFun hfun x
theorem completedGroupAlgebraMapInClass_id
(C : ProCGroups.FiniteGroupClass.{v})
(hForm : ProCGroups.FiniteGroupClass.Formation C)
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
[CompactSpace R] [T2Space R] [TotallyDisconnectedSpace R]
(hG : HasOpenNormalBasisInClass C G) :
completedGroupAlgebraMapInClass (G := G) (H := G) C hHer R
(MonoidHom.id G) continuous_id =
RingHom.id (CompletedGroupAlgebraInClass C R G)Identity law for the \(C\)-indexed completed-group-algebra functor.
Show Lean proof
by
apply completedGroupAlgebraInClassRingHom_ext_of_comp_toCompleted
(R := R) (G := G) (H := G) C hForm hG
· exact continuous_completedGroupAlgebraMapInClass (R := R) (G := G) (H := G)
C hHer (MonoidHom.id G) continuous_id
· exact continuous_id
· rw [completedGroupAlgebraMapInClass_comp_toCompletedGroupAlgebraInClass,
finiteGroupAlgebra_mapDomainRingHom_id]
rfl
theorem completedGroupAlgebraMapAlgHomInClass_id
(C : ProCGroups.FiniteGroupClass.{v})
(hForm : ProCGroups.FiniteGroupClass.Formation C)
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
[CompactSpace R] [T2Space R] [TotallyDisconnectedSpace R]
(hG : HasOpenNormalBasisInClass C G) :
completedGroupAlgebraMapAlgHomInClass (G := G) (H := G) C hHer R
(MonoidHom.id G) continuous_id =
AlgHom.id R (CompletedGroupAlgebraInClass C R G)Identity law for the \(C\)-indexed completed-group-algebra functor, as an \(R\)-algebra homomorphism.
Show Lean proof
by
apply AlgHom.ext
intro x
have h := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraMapInClass_id (R := R) (G := G) C hForm hHer hG))
x
simpa using h
theorem completedGroupAlgebraMapInClass_comp
{K : Type v} [Group K] [TopologicalSpace K] [IsTopologicalGroup K]
(C : ProCGroups.FiniteGroupClass.{v})
(hForm : ProCGroups.FiniteGroupClass.Formation C)
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
[CompactSpace R] [T2Space R] [TotallyDisconnectedSpace R]
(hG : HasOpenNormalBasisInClass C G)
(φ : G →* H) (hφ : Continuous φ) (ψ : H →* K) (hψ : Continuous ψ) :
(completedGroupAlgebraMapInClass (G := H) (H := K) C hHer R ψ hψ).comp
(completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ) =
completedGroupAlgebraMapInClass (G := G) (H := K) C hHer R
(ψ.comp φ) (hψ.comp hφ)Composition law for the \(C\)-indexed completed-group-algebra functor.
Show Lean proof
by
apply completedGroupAlgebraInClassRingHom_ext_of_comp_toCompleted
(R := R) (G := G) (H := K) C hForm hG
· exact (continuous_completedGroupAlgebraMapInClass (R := R) (G := H) (H := K)
C hHer ψ hψ).comp
(continuous_completedGroupAlgebraMapInClass (R := R) (G := G) (H := H)
C hHer φ hφ)
· exact continuous_completedGroupAlgebraMapInClass (R := R) (G := G) (H := K)
C hHer (ψ.comp φ) (hψ.comp hφ)
· apply RingHom.ext
intro x
have hφdense := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraMapInClass_comp_toCompletedGroupAlgebraInClass
(R := R) (G := G) (H := H) C hHer φ hφ))
x
have hψdense := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraMapInClass_comp_toCompletedGroupAlgebraInClass
(R := R) (G := H) (H := K) C hHer ψ hψ))
(MonoidAlgebra.mapDomainRingHom R φ x)
have hdomain := congrFun
(congrArg DFunLike.coe
(finiteGroupAlgebra_mapDomainRingHom_comp R G H K φ ψ))
x
have hcompdense := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraMapInClass_comp_toCompletedGroupAlgebraInClass
(R := R) (G := G) (H := K) C hHer (ψ.comp φ) (hψ.comp hφ)))
x
calc
(((completedGroupAlgebraMapInClass (G := H) (H := K) C hHer R ψ hψ).comp
(completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ)).comp
(toCompletedGroupAlgebraInClassRingHom C R G)) x
=
completedGroupAlgebraMapInClass (G := H) (H := K) C hHer R ψ hψ
(completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ
(toCompletedGroupAlgebraInClassRingHom C R G x)) := rfl
_ =
completedGroupAlgebraMapInClass (G := H) (H := K) C hHer R ψ hψ
(toCompletedGroupAlgebraInClassRingHom C R H
(MonoidAlgebra.mapDomainRingHom R φ x)) := by
have hφdense' :
completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ
(toCompletedGroupAlgebraInClassRingHom C R G x) =
toCompletedGroupAlgebraInClassRingHom C R H
(MonoidAlgebra.mapDomainRingHom R φ x) := by
simpa [RingHom.comp_apply] using hφdense
exact congrArg (completedGroupAlgebraMapInClass (G := H) (H := K)
C hHer R ψ hψ) hφdense'
_ =
toCompletedGroupAlgebraInClassRingHom C R K
(MonoidAlgebra.mapDomainRingHom R ψ (MonoidAlgebra.mapDomainRingHom R φ x)) := by
simpa [RingHom.comp_apply] using hψdense
_ =
toCompletedGroupAlgebraInClassRingHom C R K
(MonoidAlgebra.mapDomainRingHom R (ψ.comp φ) x) := by
exact congrArg (toCompletedGroupAlgebraInClassRingHom C R K) (by
change (MonoidAlgebra.mapDomainRingHom R ψ)
((MonoidAlgebra.mapDomainRingHom R φ) x) =
(MonoidAlgebra.mapDomainRingHom R (ψ.comp φ)) x at hdomain
exact hdomain)
_ =
((completedGroupAlgebraMapInClass (G := G) (H := K) C hHer R
(ψ.comp φ) (hψ.comp hφ)).comp
(toCompletedGroupAlgebraInClassRingHom C R G)) x := by
simpa [RingHom.comp_apply] using hcompdense.symm
theorem completedGroupAlgebraMapAlgHomInClass_comp
{K : Type v} [Group K] [TopologicalSpace K] [IsTopologicalGroup K]
(C : ProCGroups.FiniteGroupClass.{v})
(hForm : ProCGroups.FiniteGroupClass.Formation C)
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
[CompactSpace R] [T2Space R] [TotallyDisconnectedSpace R]
(hG : HasOpenNormalBasisInClass C G)
(φ : G →* H) (hφ : Continuous φ) (ψ : H →* K) (hψ : Continuous ψ) :
(completedGroupAlgebraMapAlgHomInClass (G := H) (H := K) C hHer R ψ hψ).comp
(completedGroupAlgebraMapAlgHomInClass (G := G) (H := H) C hHer R φ hφ) =
completedGroupAlgebraMapAlgHomInClass (G := G) (H := K) C hHer R
(ψ.comp φ) (hψ.comp hφ)Composition law for the \(C\)-indexed completed-group-algebra functor, as an \(R\)-algebra homomorphism.
Show Lean proof
by
apply AlgHom.ext
intro x
have h := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraMapInClass_comp (R := R) (G := G) (H := H) (K := K)
C hForm hHer hG φ hφ ψ hψ))
x
simpa using h
@[simp]
theorem completedGroupAlgebraMapInClass_toCompletedGroupAlgebraInClass_of
(C : ProCGroups.FiniteGroupClass.{v})
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
(φ : G →* H) (hφ : Continuous φ) (g : G) :
completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ
(toCompletedGroupAlgebraInClass C R G (MonoidAlgebra.of R G g)) =
toCompletedGroupAlgebraInClass C R H (MonoidAlgebra.of R H (φ g))The in-class completed group-algebra map sends group-like elements to group-like elements.
Show Lean proof
by
have h := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraMapInClass_comp_toCompletedGroupAlgebraInClass
(R := R) (G := G) (H := H) C hHer φ hφ))
(MonoidAlgebra.of R G g)
simpa [RingHom.comp_apply, finiteGroupAlgebra_mapDomainRingHom_of] using h
@[simp]
theorem completedGroupAlgebraMapInClass_toCompletedGroupAlgebraInClass_sub_one_of
(C : ProCGroups.FiniteGroupClass.{v})
(hHer : ProCGroups.FiniteGroupClass.Hereditary C)
(φ : G →* H) (hφ : Continuous φ) (g : G) :
completedGroupAlgebraMapInClass (G := G) (H := H) C hHer R φ hφ
(toCompletedGroupAlgebraInClass C R G (MonoidAlgebra.of R G g) - 1) =
toCompletedGroupAlgebraInClass C R H (MonoidAlgebra.of R H (φ g)) - 1The in-class completed group-algebra map sends group-like augmentation generators to their images.
Show Lean proof
by
rw [map_sub, completedGroupAlgebraMapInClass_toCompletedGroupAlgebraInClass_of, map_one]