ProCGroups.CompletedGroupAlgebra.Basic.InClass.Topology
This module transports finite-stage topological structures through the named \(C\)-indexed inverse-limit carrier and records its compactness and separation properties.
theorem completedGroupAlgebraStageInClass_isTopologicalRing
(C : ProCGroups.FiniteGroupClass.{v})
(U : CompletedGroupAlgebraIndexInClass G C) :
letI : Finite (CompletedGroupAlgebraQuotientInClass G C U) :=
finite_completedGroupAlgebraQuotientInClass G C U
letI : TopologicalSpace (CompletedGroupAlgebraStageInClass C R G U) :=
(completedGroupAlgebraSystemInClass C R G).topologicalSpace U
IsTopologicalRing (CompletedGroupAlgebraStageInClass C R G U)Each \(C\)-indexed finite stage is a topological ring.
Show Lean proof
by
letI : Finite (CompletedGroupAlgebraQuotientInClass G C U) :=
finite_completedGroupAlgebraQuotientInClass G C U
letI : TopologicalSpace (CompletedGroupAlgebraStageInClass C R G U) :=
(completedGroupAlgebraSystemInClass C R G).topologicalSpace U
dsimp [completedGroupAlgebraSystemInClass, CompletedGroupAlgebraStageInClass]
exact finiteGroupAlgebra_isTopologicalRing R (CompletedGroupAlgebraQuotientInClass G C U)
instance instIsTopologicalRingCompletedGroupAlgebraSystemInClassX
(C : ProCGroups.FiniteGroupClass.{v})
(U : CompletedGroupAlgebraIndexInClass G C) :
IsTopologicalRing ((completedGroupAlgebraSystemInClass C R G).X U) :=
completedGroupAlgebraStageInClass_isTopologicalRing (R := R) (G := G) C UThe inverse system of finite-stage group algebras inherits a ring structure from the compatible finite-stage rings.
instance instIsTopologicalRingCompletedGroupAlgebraInClass
(C : ProCGroups.FiniteGroupClass.{v}) :
IsTopologicalRing (CompletedGroupAlgebraInClass C R G) := by
change IsTopologicalRing (completedGroupAlgebraSystemInClass C R G).inverseLimit
infer_instanceThe \(C\)-indexed completed group algebra inherits a ring structure from the compatible finite-stage rings.
instance instContinuousSMulCompletedGroupAlgebraInClass
(C : ProCGroups.FiniteGroupClass.{v}) :
ContinuousSMul R (CompletedGroupAlgebraInClass C R G) := by
letI : ∀ U : CompletedGroupAlgebraIndexInClass G C,
ContinuousSMul R ((completedGroupAlgebraSystemInClass C R G).X U) :=
fun U => by
letI : Finite (CompletedGroupAlgebraQuotientInClass G C U) :=
finite_completedGroupAlgebraQuotientInClass G C U
dsimp [completedGroupAlgebraSystemInClass, CompletedGroupAlgebraStageInClass]
exact finiteGroupAlgebra_continuousSMul R
(CompletedGroupAlgebraQuotientInClass G C U)
exact inferInstanceAs
(ContinuousSMul R (completedGroupAlgebraSystemInClass C R G).inverseLimit)Scalar multiplication is continuous for the relevant inverse-limit topology.
theorem continuous_completedGroupAlgebraAlgebraMapInClass
(C : ProCGroups.FiniteGroupClass.{v}) :
Continuous (algebraMap R (CompletedGroupAlgebraInClass C R G))The coefficient-ring map into the \(C\)-indexed completed group algebra is continuous.
Show Lean proof
by
let S := completedGroupAlgebraSystemInClass C R G
letI : ∀ U, TopologicalSpace (CompletedGroupAlgebraStageInClass C R G U) :=
fun U => (completedGroupAlgebraSystemInClass C R G).topologicalSpace U
let π : ∀ U : CompletedGroupAlgebraIndexInClass G C,
R → CompletedGroupAlgebraStageInClass C R G U :=
fun U r => algebraMap R (CompletedGroupAlgebraStageInClass C R G U) r
have hπ : ∀ U, Continuous (π U) := by
intro U
letI : Finite (CompletedGroupAlgebraQuotientInClass G C U) :=
finite_completedGroupAlgebraQuotientInClass G C U
exact finiteGroupAlgebra_algebraMap_continuous R
(CompletedGroupAlgebraQuotientInClass G C U)
have hcompat : S.CompatibleMaps π := by
intro U V hUV
funext r
exact completedGroupAlgebraTransitionInClass_algebraMap
(R := R) (G := G) C hUV r
change Continuous (S.inverseLimitLift π hcompat)
exact S.continuous_inverseLimitLift π hπ hcompat
theorem completedGroupAlgebraInClass_compactSpace
(C : ProCGroups.FiniteGroupClass.{v})
[CompactSpace R] [T2Space R] :
CompactSpace (CompletedGroupAlgebraInClass C R G)The \(C\)-indexed completed group algebra is compact for compact Hausdorff coefficients.
Show Lean proof
by
let S := completedGroupAlgebraSystemInClass C R G
letI : ∀ U : CompletedGroupAlgebraIndexInClass G C, CompactSpace (S.X U) := fun U =>
by
letI : Finite (CompletedGroupAlgebraQuotientInClass G C U) :=
finite_completedGroupAlgebraQuotientInClass G C U
dsimp [S, completedGroupAlgebraSystemInClass, CompletedGroupAlgebraStageInClass]
exact finiteGroupAlgebra_compactSpace R
(CompletedGroupAlgebraQuotientInClass G C U)
letI : ∀ U : CompletedGroupAlgebraIndexInClass G C, T2Space (S.X U) := fun U =>
by
letI : Finite (CompletedGroupAlgebraQuotientInClass G C U) :=
finite_completedGroupAlgebraQuotientInClass G C U
dsimp [S, completedGroupAlgebraSystemInClass, CompletedGroupAlgebraStageInClass]
exact finiteGroupAlgebra_t2Space R
(CompletedGroupAlgebraQuotientInClass G C U)
change CompactSpace S.inverseLimit
infer_instance
theorem completedGroupAlgebraInClass_t2Space
(C : ProCGroups.FiniteGroupClass.{v})
[T2Space R] :
T2Space (CompletedGroupAlgebraInClass C R G)The \(C\)-indexed completed group algebra is Hausdorff for Hausdorff coefficients.
Show Lean proof
by
let S := completedGroupAlgebraSystemInClass C R G
letI : ∀ U : CompletedGroupAlgebraIndexInClass G C, T2Space (S.X U) := fun U =>
by
letI : Finite (CompletedGroupAlgebraQuotientInClass G C U) :=
finite_completedGroupAlgebraQuotientInClass G C U
dsimp [S, completedGroupAlgebraSystemInClass, CompletedGroupAlgebraStageInClass]
exact finiteGroupAlgebra_t2Space R
(CompletedGroupAlgebraQuotientInClass G C U)
exact S.t2Space_inverseLimit
theorem completedGroupAlgebraInClass_totallyDisconnectedSpace
(C : ProCGroups.FiniteGroupClass.{v})
[TotallyDisconnectedSpace R] :
TotallyDisconnectedSpace (CompletedGroupAlgebraInClass C R G)The \(C\)-indexed completed group algebra is totally disconnected for totally disconnected coefficients.
Show Lean proof
by
let S := completedGroupAlgebraSystemInClass C R G
letI : ∀ U : CompletedGroupAlgebraIndexInClass G C, TotallyDisconnectedSpace (S.X U) :=
fun U =>
by
letI : Finite (CompletedGroupAlgebraQuotientInClass G C U) :=
finite_completedGroupAlgebraQuotientInClass G C U
dsimp [S, completedGroupAlgebraSystemInClass, CompletedGroupAlgebraStageInClass]
exact finiteGroupAlgebra_totallyDisconnectedSpace R
(CompletedGroupAlgebraQuotientInClass G C U)
exact S.totallyDisconnectedSpace_inverseLimit