In Lemma 5.3.5(e), map construction, a continuous homomorphism of profinite groups \(\varphi : G \to H\) induces a continuous ring homomorphism \(\widehat{R[G]} \to \widehat{R[H]}\).
Source context 9 commands
Surrounding namespaces, section variables, and local commands at this declaration.
open scoped Topology
namespace CompletedGroupAlgebra
noncomputable section
open ProCGroups
open ProCGroups.ProC
universe u v w
variable (R : Type u) [CommRing R] [TopologicalSpace R] [IsTopologicalRing R]
variable (G : Type v) [Group G] [TopologicalSpace G] [IsTopologicalGroup G]
variable {H : Type v} [Group H] [TopologicalSpace H] [IsTopologicalGroup H]def completedGroupAlgebraMap
(R : Type u) [CommRing R] [TopologicalSpace R] [IsTopologicalRing R]
(φ : G →* H) (hφ : Continuous φ) :
CompletedGroupAlgebraCarrier R G →+* CompletedGroupAlgebraCarrier R H where
toFun x :=
(completedGroupAlgebraCompatibleFamilyEquiv (R := R) (G := H)).symm
((completedGroupAlgebraSystem R H).inverseLimitLift
(fun V x =>
completedGroupAlgebraFunctorialStageMap
(G := G) (H := H) (R := R) φ hφ V
(completedGroupAlgebraProjection R G
(completedGroupAlgebraComapIndex (G := G) φ hφ V) x))
(by
intro V W hVW
funext x
have hcomp := congrFun
(congrArg DFunLike.coe
(completedGroupAlgebraFunctorialStageMap_transition
(R := R) (G := G) (H := H) φ hφ hVW))
(completedGroupAlgebraProjection R G
(completedGroupAlgebraComapIndex (G := G) φ hφ W) x)
rw [RingHom.comp_apply, RingHom.comp_apply] at hcomp
simp only
rw [← completedGroupAlgebraProjection_compatible
(R := R) (G := G) x
(completedGroupAlgebraComapIndex_mono
(G := G) φ hφ hVW)]
exact hcomp) x)
map_zero' := by
apply completedGroupAlgebra_ext (R := R) (G := H)
intro V
exact map_zero (completedGroupAlgebraFunctorialStageMap (G := G) (H := H) (R := R)
φ hφ V)
map_one' := by
apply completedGroupAlgebra_ext (R := R) (G := H)
intro V
exact map_one (completedGroupAlgebraFunctorialStageMap (G := G) (H := H) (R := R)
φ hφ V)
map_add' x y := by
apply completedGroupAlgebra_ext (R := R) (G := H)
intro V
exact map_add (completedGroupAlgebraFunctorialStageMap (G := G) (H := H) (R := R)
φ hφ V)
(completedGroupAlgebraProjection R G
(completedGroupAlgebraComapIndex (G := G) φ hφ V) x)
(completedGroupAlgebraProjection R G
(completedGroupAlgebraComapIndex (G := G) φ hφ V) y)
map_mul' x y := by
apply completedGroupAlgebra_ext (R := R) (G := H)
intro V
exact map_mul (completedGroupAlgebraFunctorialStageMap (G := G) (H := H) (R := R)
φ hφ V)
(completedGroupAlgebraProjection R G
(completedGroupAlgebraComapIndex (G := G) φ hφ V) x)
(completedGroupAlgebraProjection R G
(completedGroupAlgebraComapIndex (G := G) φ hφ V) y)