OAI/GroupTheory/PolycyclicRecognition/Algebra/DynkinProductTails.lean

GitHub source file

8 declarations, 0 contain sorry, 0 declared as axioms

Convergence of products with summable logarithmic increments

Finite BCH gives a common bound on every tail product in terms of the sum of its logarithmic increments. The global exponential chart then gives convergence, without identifying its coordinate metric with a left invariant metric.

  1. def OAI.PolycyclicRecognition.exponentialPartialProduct line 29

    Source documentation

    The ordered product of the first m exponential increments.

    def exponentialPartialProduct
        (Exp : GroupLieAlgebra (š“˜(ā„, E)) G → G)
        (X : ā„• → GroupLieAlgebra (š“˜(ā„, E)) G) (m : ā„•) : G :=
    …
  2. theorem OAI.PolycyclicRecognition.exponentialPartialProduct_add line 35
  3. theorem OAI.PolycyclicRecognition.exists_tail_product_log_bound line 46

    Source documentation

    Summability controls the logarithm of every finite tail product, uniformly in the number of tail factors.

    theorem exists_tail_product_log_bound
        (dynkin : NilpotentDynkinExpansionInput E G)
        (Exp : GroupLieAlgebra (š“˜(ā„, E)) G → G) (hExp : IsGroupExponential Exp)
        {c : ā„•} (hc : lowerCentralSeries ā„ (GroupLieAlgebra (š“˜(ā„, E)) G)
          (GroupLieAlgebra (š“˜(ā„, E)) G) c = ⊄)
        (b : Basis J ā„ (GroupLieAlgebra (š“˜(ā„, E)) G))
        {C : ā„} (hC : 0 ≤ C) (hbracket : āˆ€ i j k, |b.repr ⁅b i, b j⁆ k| ≤ C)
        (X : ā„• → GroupLieAlgebra (š“˜(ā„, E)) G) (d : ā„• → ā„) (hd : Summable d)
        (hX : āˆ€ n, ‖b.equivFun (X n)‖ ≤ d n) (n m : ā„•) :
        ∃ z, exponentialPartialProduct Exp (fun k => X (n + k)) m = Exp z ∧
          ‖b.equivFun z‖ ≤
            (c : ā„) * 2 ^ c * (1 + (Fintype.card J : ā„) ^ 2 * C) ^ c *
    …

    Mentions: OAI.PolycyclicRecognition.NilpotentDynkinExpansionInput, OAI.PolycyclicRecognition.exponentialPartialProduct

  4. theorem OAI.PolycyclicRecognition.dynkin_tail_bound_tendsto_zero line 76

    Source documentation

    The common bound for all finite tail products tends to zero.

    theorem dynkin_tail_bound_tendsto_zero
        (A : ā„) (c : ā„•) (d : ā„• → ā„) :
        Tendsto (fun n => A * (āˆ‘' k, d (n + k)) * (1 + āˆ‘' k, d (n + k)) ^ c)
          atTop (š“ 0) := by
    …
  5. theorem OAI.PolycyclicRecognition.exponentialPartialProduct_tendsto_of_summable line 87

    Source documentation

    Actual ordered products with summable logarithmic increments converge in the global exponential chart. The proof uses the common finite-tail bound and compactness in coordinates, not a metric invariance assumption.

    theorem exponentialPartialProduct_tendsto_of_summable
        (dynkin : NilpotentDynkinExpansionInput E G)
        (Exp : GroupLieAlgebra (š“˜(ā„, E)) G → G) (hExp : IsGroupExponential Exp)
        (chart : GroupLieAlgebra (š“˜(ā„, E)) G ā‰ƒā‚œ G) (hchart : āˆ€ v, chart v = Exp v)
        {c : ā„•} (hc : lowerCentralSeries ā„ (GroupLieAlgebra (š“˜(ā„, E)) G)
          (GroupLieAlgebra (š“˜(ā„, E)) G) c = ⊄)
        (b : Basis J ā„ (GroupLieAlgebra (š“˜(ā„, E)) G))
        {C : ā„} (hC : 0 ≤ C) (hbracket : āˆ€ i j k, |b.repr ⁅b i, b j⁆ k| ≤ C)
        (X : ā„• → GroupLieAlgebra (š“˜(ā„, E)) G) (d : ā„• → ā„) (hd : Summable d)
        (hX : āˆ€ n, ‖b.equivFun (X n)‖ ≤ d n) :
        ∃ g : G, Tendsto (exponentialPartialProduct Exp X) atTop (š“ g) := by
    …

    Mentions: OAI.PolycyclicRecognition.NilpotentDynkinExpansionInput, OAI.PolycyclicRecognition.exponentialPartialProduct

  6. theorem OAI.PolycyclicRecognition.trajectory_tendsto_of_summable_log_increments line 141

    Source documentation

    The same conclusion for an actual trajectory specified by its successive exponential increments.

    theorem trajectory_tendsto_of_summable_log_increments
        (dynkin : NilpotentDynkinExpansionInput E G)
        (Exp : GroupLieAlgebra (š“˜(ā„, E)) G → G) (hExp : IsGroupExponential Exp)
        (chart : GroupLieAlgebra (š“˜(ā„, E)) G ā‰ƒā‚œ G) (hchart : āˆ€ v, chart v = Exp v)
        {c : ā„•} (hc : lowerCentralSeries ā„ (GroupLieAlgebra (š“˜(ā„, E)) G)
          (GroupLieAlgebra (š“˜(ā„, E)) G) c = ⊄)
        (b : Basis J ā„ (GroupLieAlgebra (š“˜(ā„, E)) G))
        {C : ā„} (hC : 0 ≤ C) (hbracket : āˆ€ i j k, |b.repr ⁅b i, b j⁆ k| ≤ C)
        (X : ā„• → GroupLieAlgebra (š“˜(ā„, E)) G) (d : ā„• → ā„) (hd : Summable d)
        (hX : āˆ€ n, ‖b.equivFun (X n)‖ ≤ d n)
        (f : ā„• → G) (hstep : āˆ€ n, f (n + 1) = f n * Exp (X n)) :
        ∃ g : G, Tendsto f atTop (š“ g) := by
    …

    Mentions: OAI.PolycyclicRecognition.NilpotentDynkinExpansionInput

  7. theorem OAI.PolycyclicRecognition.finite_exp_products_tendsto_one line 169

    Source documentation

    Finite chains whose total logarithmic increment size tends to zero have endpoint product tending to the identity, even if their lengths grow.

    theorem finite_exp_products_tendsto_one
        (dynkin : NilpotentDynkinExpansionInput E G)
        (Exp : GroupLieAlgebra (š“˜(ā„, E)) G → G) (hExp : IsGroupExponential Exp)
        (hcontinuous : Continuous Exp)
        {c : ā„•} (hc : lowerCentralSeries ā„ (GroupLieAlgebra (š“˜(ā„, E)) G)
          (GroupLieAlgebra (š“˜(ā„, E)) G) c = ⊄)
        (b : Basis J ā„ (GroupLieAlgebra (š“˜(ā„, E)) G))
        {C : ā„} (hC : 0 ≤ C) (hbracket : āˆ€ i j k, |b.repr ⁅b i, b j⁆ k| ≤ C)
        (m : ā„• → ā„•) (X : (n : ā„•) → Fin (m n) → GroupLieAlgebra (š“˜(ā„, E)) G)
        (hsmall : Tendsto (fun n => āˆ‘ i, ‖b.equivFun (X n i)‖) atTop (š“ 0)) :
        Tendsto (fun n => (List.ofFn (fun i => Exp (X n i))).prod) atTop (š“ (1 : G)) := by
    …

    Mentions: OAI.PolycyclicRecognition.NilpotentDynkinExpansionInput

  8. theorem OAI.PolycyclicRecognition.sum_norm_tendsto_zero_of_polynomial_count_exp_steps line 198

    Source documentation

    Polynomially many exponentially small increments have vanishing total size. This is the endpoint estimate for the representative-independence paths in boundary.tex.

    theorem sum_norm_tendsto_zero_of_polynomial_count_exp_steps
        (b : Basis J ā„ (GroupLieAlgebra (š“˜(ā„, E)) G))
        (m : ā„• → ā„•) (X : (n : ā„•) → Fin (m n) → GroupLieAlgebra (š“˜(ā„, E)) G)
        (A K c : ā„) (p q : ā„•) (hA : 0 ≤ A) (hc : 0 < c)
        (hcount : āˆ€ n, (m n : ā„) ≤ K * (1 + (n : ā„)) ^ q)
        (hstep : āˆ€ n i, ‖b.equivFun (X n i)‖ ≤
          A * (1 + (n : ā„)) ^ p * Real.exp (-c * n)) :
        Tendsto (fun n => āˆ‘ i, ‖b.equivFun (X n i)‖) atTop (š“ 0) := by
    …