Penalized Maximum and Density Comparison
ProvedFunctionalInequalities.Analysis.exists_penalized_maximum_with_comparison_readableThis is a weak-route supporting theorem for Letwin’s second-difference argument.
Let . Assume: is convex, globally Lipschitz, and has compact sublevel sets; is continuous; and for every open , the Alexandrov identity
holds. Let and satisfy uniform approximation with , local uniform convergence , positive-definite , and . For every and , there exists such that is maximal and
This is an auxiliary existence and comparison result, not a dimension-free bound.
Original Lean declaration header
Within namespace FunctionalInequalities.Analysis. Shown in its original module context. Proof omitted.
theorem exists_penalized_maximum_with_comparison {n : ℕ} {u F : EuclideanSpace ℝ (Fin n) → ℝ}
(hconv : ConvexOn ℝ univ u) {L : NNReal} (hLip : LipschitzWith L u)
(hcoer : ∀ R : ℝ, IsCompact {x | u x ≤ R}) (hF : Continuous F)
(hMA : ∀ G : Set (EuclideanSpace ℝ (Fin n)), IsOpen G →
(volume : Measure (EuclideanSpace ℝ (Fin n))) (subgradientImage u G) =
∫⁻ x in G, ENNReal.ofReal (Real.exp (F x)) ∂(volume : Measure (EuclideanSpace ℝ (Fin n))))
{uk Fk : ℕ → EuclideanSpace ℝ (Fin n) → ℝ} (huk : ∀ k, ContDiff ℝ 2 (uk k))
{δ : ℕ → ℝ} (hδ : Tendsto δ atTop (𝓝 0)) (hclose : ∀ k x, |uk k x - u x| ≤ δ k)
(hFk : TendstoLocallyUniformly Fk F atTop)
(hpos : ∀ k x, (hessianMatrix (uk k) x).PosDef)
(hlog : ∀ k x, Fk k x ≤ Real.log (hessianMatrix (uk k) x).det)
(h : EuclideanSpace ℝ (Fin n)) {η : ℝ} (hη : 0 < η) :
∃ x₀ : EuclideanSpace ℝ (Fin n),
(∀ y, u (y + h) + u (y - h) - 2 * u y - η * u y ≤
u (x₀ + h) + u (x₀ - h) - 2 * u x₀ - η * u x₀) ∧
F (x₀ + h) + F (x₀ - h) - 2 * F x₀ ≤ η * n
Module navigation
Module: Analysis/Convex/Viscosity.
Definition modules: Analysis/BakryEmery/HessianOperator, Analysis/Convex/Subgradient.
Supporting theorems: det_hessianMatrix_le_of_lower_touch, forall_posDef_add_log_det_le_trace_iff.
Previous: ae_exists_quadraticAt_expansion · Next: ae_hessian_increment_le_generator.
Source excerpt, lines 1707–1722 · Frozen source 408915f.
import Definitions.Def_KLSModular_FunctionalInequalities_Analysis_Convex_Viscosity open FunctionalInequalities.Probability.Stein open MeasureTheory Set Metric Filter open scoped RealInnerProductSpace ENNReal Topology set_option maxHeartbeats 800000
theorem FunctionalInequalities.Analysis.exists_penalized_maximum_with_comparison_readable {n : ℕ} {u F : EuclideanSpace ℝ (Fin n) → ℝ}
(hconv : ConvexOn ℝ univ u) {L : NNReal} (hLip : LipschitzWith L u)
(hcoer : ∀ R : ℝ, IsCompact {x | u x ≤ R}) (hF : Continuous F)
(hMA : ∀ G : Set (EuclideanSpace ℝ (Fin n)), IsOpen G →
(volume : Measure (EuclideanSpace ℝ (Fin n))) (subgradientImage u G) =
∫⁻ x in G, ENNReal.ofReal (Real.exp (F x)) ∂(volume : Measure (EuclideanSpace ℝ (Fin n))))
{uk Fk : ℕ → EuclideanSpace ℝ (Fin n) → ℝ} (huk : ∀ k, ContDiff ℝ 2 (uk k))
{δ : ℕ → ℝ} (hδ : Tendsto δ atTop (𝓝 0)) (hclose : ∀ k x, |uk k x - u x| ≤ δ k)
(hFk : TendstoLocallyUniformly Fk F atTop)
(hpos : ∀ k x, (hessianMatrix (uk k) x).PosDef)
(hlog : ∀ k x, Fk k x ≤ Real.log (hessianMatrix (uk k) x).det)
(h : EuclideanSpace ℝ (Fin n)) {η : ℝ} (hη : 0 < η) :
∃ x₀ : EuclideanSpace ℝ (Fin n),
(∀ y, u (y + h) + u (y - h) - 2 * u y - η * u y ≤
u (x₀ + h) + u (x₀ - h) - 2 * u x₀ - η * u x₀) ∧
F (x₀ + h) + F (x₀ - h) - 2 * F x₀ ≤ η * n := by sorry