Gaussian Directional Integration by Parts
ProvedFunctionalInequalities.KLS.LogConcave.GaussianSmoothing.gaussianLaw_directional_identity_of_bounded_lipschitz_test_readableThis statement gives Gaussian integration by parts for bounded globally Lipschitz tests.
Let , let , let be and globally Lipschitz with Lipschitz constant represented by L : NNReal, and suppose there is such that for every . For every , both functions and are integrable with respect to gaussianLaw s, and
This is the directional Gaussian identity with the exact parameterization used by gaussianLaw s, valid in all finite dimensions including .
Original Lean declaration header
Within namespace FunctionalInequalities.KLS.LogConcave.GaussianSmoothing. Shown in its original module context. Proof omitted.
theorem gaussianLaw_directional_identity_of_bounded_lipschitz_test {n : ℕ}
{s : ℝ} (hs : 0 < s) {f : EuclideanSpace ℝ (Fin n) → ℝ} {L : NNReal}
(hf : ContDiff ℝ 1 f) (hLip : LipschitzWith L f) (C : ℝ) (hbound : ∀ x, ‖f x‖ ≤ C)
(v : EuclideanSpace ℝ (Fin n)) :
Integrable (fun x => ⟪x, v⟫ * f x) (gaussianLaw s) ∧
Integrable (fun x => fderiv ℝ f x v) (gaussianLaw s) ∧
(∫ x, ⟪x, v⟫ * f x ∂(gaussianLaw s)) =
(2 * s)⁻¹ * ∫ x, fderiv ℝ f x v ∂(gaussianLaw s)
Module navigation
Module: KLS/LogConcave/Density/GaussianSmoothing/Moments.
Definition modules: KLS/LogConcave/Density/GaussianSmoothing/Basic.
Supporting theorems: hasWeakDerivAlong_of_contDiff, integral_eq_zero_of_integrable_weak_derivative, gaussianLaw_exp_norm_integrable.
Previous: smoothedLaw_norm_sq · Next: gaussianLaw_translated_directional_identity_of_bounded_lipschitz_test.
Source excerpt, lines 409–416 · Frozen source 408915f.
import Definitions.Def_KLSModular_FunctionalInequalities_KLS_LogConcave_Density_GaussianSmoothing_Moments open MeasureTheory Filter open scoped ContDiff Topology RealInnerProductSpace set_option maxHeartbeats 800000
theorem FunctionalInequalities.KLS.LogConcave.GaussianSmoothing.gaussianLaw_directional_identity_of_bounded_lipschitz_test_readable {n : ℕ}
{s : ℝ} (hs : 0 < s) {f : EuclideanSpace ℝ (Fin n) → ℝ} {L : NNReal}
(hf : ContDiff ℝ 1 f) (hLip : LipschitzWith L f) (C : ℝ) (hbound : ∀ x, ‖f x‖ ≤ C)
(v : EuclideanSpace ℝ (Fin n)) :
Integrable (fun x => ⟪x, v⟫ * f x) (gaussianLaw s) ∧
Integrable (fun x => fderiv ℝ f x v) (gaussianLaw s) ∧
(∫ x, ⟪x, v⟫ * f x ∂(gaussianLaw s)) =
(2 * s)⁻¹ * ∫ x, fderiv ℝ f x v ∂(gaussianLaw s) := by sorry