Centered Gradient Difference Under Adjacent Permutation
ProvedFunctionalInequalities.KLS.LogConcave.PoissonIterate.grad0_step_sub_permField_succ_readableThis formalizes BKL (42).
Let be finite-dimensional, let with , assume , and let be a level- field. For an index position satisfying , let swap positions and , and let be the corresponding swap after the new index is added. Then
The permutations are represented by permField using Equiv.swap and finRotate.
This identity propagates approximate symmetry from one iterate to the next.
Original Lean declaration header
Within namespace FunctionalInequalities.KLS.LogConcave.PoissonIterate. Shown in its original module context. Proof omitted.
theorem grad0_step_sub_permField_succ {k : ℕ} (h : Field ν k) (ℓ : Fin (k + 1))
(hℓ : ℓ.val + 1 < k + 1) :
grad0 T̄ (step T̄ h) -
permField (Equiv.swap ℓ.succ (finRotate (k + 2) ℓ.succ)) (grad0 T̄ (step T̄ h)) =
scale T̄ h • grad0 T̄ (invField T̄
(grad0 T̄ h - permField (Equiv.swap ℓ (finRotate (k + 1) ℓ)) (grad0 T̄ h)))
Module navigation
Module: KLS/BKL/PoissonIterate/Symmetry.
Definition modules: KLS/LogConcave/WeightedGradient/Closure, KLS/BKL/PoissonIterate/Basic, Probability/LogConcave, Poincare/LocalSlope/Basic.
Supporting theorems: grad0_sub, existsUnique_centered_adjointComp_eq.
Previous: grad0_sub · Next: normSq_grad0_iter_sub_symField_le.
Source excerpt, lines 191–196 · Frozen source 408915f.
import Definitions.Def_KLSModular_FunctionalInequalities_KLS_BKL_PoissonIterate_Symmetry
variable {V : Type*} [NormedAddCommGroup V] [InnerProductSpace ℝ V] [CompleteSpace V]
[MeasurableSpace V] [BorelSpace V] [SecondCountableTopology V] [FiniteDimensional ℝ V]
{ν : MeasureTheory.ProbabilityMeasure V} (m : MeasureTheory.Measure V) [m.IsAddHaarMeasure] (hν : FunctionalInequalities.KLS.LogConcave ν)
(hi : (interior (ν : MeasureTheory.Measure V).support).Nonempty) {U : V → ℝ}
(hνU : (ν : MeasureTheory.Measure V) = m.tilted (-U)) (hU : ContDiff ℝ 2 U)
{C : NNReal} (hC : FunctionalInequalities.Poincare.LocalSlope.Intrinsic.constant ν ≤ (C : ENNReal))
local notation "T̄" => hν.closedWeightedOperator m (ContinuousLinearMap.id ℝ V) hi
include hνU hU hC
theorem FunctionalInequalities.KLS.LogConcave.PoissonIterate.grad0_step_sub_permField_succ_readable {k : ℕ} (h : Field ν k) (ℓ : Fin (k + 1))
(hℓ : ℓ.val + 1 < k + 1) :
grad0 T̄ (step T̄ h) -
permField (Equiv.swap ℓ.succ (finRotate (k + 2) ℓ.succ)) (grad0 T̄ (step T̄ h)) =
scale T̄ h • grad0 T̄ (invField T̄
(grad0 T̄ h - permField (Equiv.swap ℓ (finRotate (k + 1) ℓ)) (grad0 T̄ h))) := by sorry