CompletedGroupAlgebra.Basic.AllFinite.Topology

8 Theorem | 5 Instance

This module supplies the topological part of the construction. It checks continuity and stagewise neighborhood properties so that the completed object inherits the required topology.

import
Imported by

Declarations

theorem completedGroupAlgebraStage_isTopologicalRing (U : CompletedGroupAlgebraIndex G) :
    IsTopologicalRing ((completedGroupAlgebraSystem R G).X U)

Each finite stage \(R[G/U]\) is a topological ring for its product topology.

Show proof
instance instContinuousSMulCompletedGroupAlgebra :
    ContinuousSMul R (Carrier R G) where
  continuous_smul := by
    let A := Carrier R G
    letI : ∀ U : CompletedGroupAlgebraIndex G, TopologicalSpace (CompletedGroupAlgebraStage R G U) :=
      fun U => (completedGroupAlgebraSystem R G).topologicalSpace U
    have hval : Continuous fun p : R × A =>
        fun U : CompletedGroupAlgebraIndex G =>
          (show CompletedGroupAlgebraStage R G U from (p.1 • p.2).1 U) := by
      change Continuous fun p : R × A =>
        fun U : CompletedGroupAlgebraIndex G =>
          p.1 • completedGroupAlgebraProjection R G U p.2
      apply continuous_pi
      intro U
      letI : TopologicalSpace (CompletedGroupAlgebraStage R G U) :=
        (completedGroupAlgebraSystem R G).topologicalSpace U
      letI : ContinuousSMul R (CompletedGroupAlgebraStage R G U) :=
        finiteGroupAlgebra_continuousSMul R (CompletedGroupAlgebraQuotient G U)
      exact continuous_fst.smul
        (((completedGroupAlgebraSystem R G).continuous_projection U).comp continuous_snd)
    exact Continuous.subtype_mk hval fun p => (p.1 • p.2).2

Scalar multiplication is continuous for the relevant inverse-limit topology.

instance instContinuousAddCompletedGroupAlgebra :
    ContinuousAdd (Carrier R G) where
  continuous_add := by
    let A := Carrier R G
    letI : ∀ U : CompletedGroupAlgebraIndex G, TopologicalSpace (CompletedGroupAlgebraStage R G U) :=
      fun U => (completedGroupAlgebraSystem R G).topologicalSpace U
    have hval : Continuous fun p : A × A =>
        ((p.1 + p.2 : A) :
          (U : CompletedGroupAlgebraIndex G) → (completedGroupAlgebraSystem R G).X U) := by
      change Continuous fun p : A × A =>
        fun U : CompletedGroupAlgebraIndex G =>
          completedGroupAlgebraProjection R G U p.1 +
            completedGroupAlgebraProjection R G U p.2
      apply continuous_pi
      intro U
      letI : IsTopologicalRing ((completedGroupAlgebraSystem R G).X U) :=
        completedGroupAlgebraStage_isTopologicalRing (R := R) (G := G) U
      exact (((completedGroupAlgebraSystem R G).continuous_projection U).comp continuous_fst).add
        (((completedGroupAlgebraSystem R G).continuous_projection U).comp continuous_snd)
    exact Continuous.subtype_mk hval fun p => (p.1 + p.2).2

Addition on the all-finite completed group algebra is continuous for the inverse-limit topology.

instance instContinuousNegCompletedGroupAlgebra :
    ContinuousNeg (Carrier R G) where
  continuous_neg := by
    let A := Carrier R G
    letI : ∀ U : CompletedGroupAlgebraIndex G, TopologicalSpace (CompletedGroupAlgebraStage R G U) :=
      fun U => (completedGroupAlgebraSystem R G).topologicalSpace U
    have hval : Continuous fun x : A =>
        ((-x : A) :
          (U : CompletedGroupAlgebraIndex G) → (completedGroupAlgebraSystem R G).X U) := by
      change Continuous fun x : A =>
        fun U : CompletedGroupAlgebraIndex G => -completedGroupAlgebraProjection R G U x
      apply continuous_pi
      intro U
      letI : IsTopologicalRing ((completedGroupAlgebraSystem R G).X U) :=
        completedGroupAlgebraStage_isTopologicalRing (R := R) (G := G) U
      exact ((completedGroupAlgebraSystem R G).continuous_projection U).neg
    exact Continuous.subtype_mk hval fun x => (-x).2

Negation on the completed group algebra is continuous for the inverse-limit topology.

instance instContinuousMulCompletedGroupAlgebra :
    ContinuousMul (Carrier R G) where
  continuous_mul := by
    let A := Carrier R G
    letI : ∀ U : CompletedGroupAlgebraIndex G, TopologicalSpace (CompletedGroupAlgebraStage R G U) :=
      fun U => (completedGroupAlgebraSystem R G).topologicalSpace U
    have hval : Continuous fun p : A × A =>
        ((p.1 * p.2 : A) :
          (U : CompletedGroupAlgebraIndex G) → (completedGroupAlgebraSystem R G).X U) := by
      change Continuous fun p : A × A =>
        fun U : CompletedGroupAlgebraIndex G =>
          completedGroupAlgebraProjection R G U p.1 *
            completedGroupAlgebraProjection R G U p.2
      apply continuous_pi
      intro U
      letI : IsTopologicalRing ((completedGroupAlgebraSystem R G).X U) :=
        completedGroupAlgebraStage_isTopologicalRing (R := R) (G := G) U
      exact (((completedGroupAlgebraSystem R G).continuous_projection U).comp continuous_fst).mul
        (((completedGroupAlgebraSystem R G).continuous_projection U).comp continuous_snd)
    exact Continuous.subtype_mk hval fun p => (p.1 * p.2).2

Multiplication on the completed group algebra is continuous for the inverse-limit topology.

instance instIsTopologicalRingCompletedGroupAlgebra :
    IsTopologicalRing (Carrier R G) := by
  letI : ContinuousAdd (Carrier R G) :=
    instContinuousAddCompletedGroupAlgebra (R := R) (G := G)
  letI : ContinuousMul (Carrier R G) :=
    instContinuousMulCompletedGroupAlgebra (R := R) (G := G)
  letI : ContinuousNeg (Carrier R G) :=
    instContinuousNegCompletedGroupAlgebra (R := R) (G := G)
  letI : IsTopologicalSemiring (Carrier R G) := IsTopologicalSemiring.mk
  exact IsTopologicalRing.mk

The completed group algebra carries the canonical algebra structure over the coefficient ring.

theorem completedGroupAlgebraStage_isProfiniteRing
    (hR : IsProfiniteRing R) (U : CompletedGroupAlgebraIndex G) :
    IsProfiniteRing ((completedGroupAlgebraSystem R G).X U)

Each finite stage is profinite when the coefficient ring is profinite.

Show proof
theorem completedGroupAlgebra_compactSpace (hR : IsProfiniteRing R) :
    CompactSpace (Carrier R G)

The completed group algebra is compact when the coefficient ring is profinite.

Show proof
theorem completedGroupAlgebra_t2Space (hR : IsProfiniteRing R) :
    T2Space (Carrier R G)

The completed group algebra is Hausdorff when the coefficient ring is profinite.

Show proof
theorem completedGroupAlgebra_totallyDisconnectedSpace (hR : IsProfiniteRing R) :
    TotallyDisconnectedSpace (Carrier R G)

The completed group algebra is totally disconnected when the coefficient ring is profinite.

Show proof
theorem completedGroupAlgebra_isProfiniteRing (hR : IsProfiniteRing R) :
    IsProfiniteRing (Carrier R G)

The Section 5.3 completed group algebra is a profinite topological ring.

Show proof
theorem completedGroupAlgebra_isProfiniteModule (hR : IsProfiniteRing R) :
    IsProfiniteModule R (Carrier R G)

The completed group algebra is a profinite module over its profinite coefficient ring.

Show proof
theorem completedGroupAlgebraProjection_compatible
    (x : Carrier R G) {U V : CompletedGroupAlgebraIndex G} (hUV : U ≤ V) :
    completedGroupAlgebraTransition R G hUV (completedGroupAlgebraProjection R G V x) =
      completedGroupAlgebraProjection R G U x

The finite-stage projection is compatible with the transition maps.

Show proof