Smooth Approximation with Uniform Gradient Control
ProvedFunctionalInequalities.Analysis.exists_contDiff_approx_of_lipschitz_gradient_readableThis gives a smooth approximation scheme for a function with Lipschitz gradient.
Let be a finite-dimensional real inner-product space with its Borel structure. Let be , and suppose that is Lipschitz with constant . Then there exists a sequence such that:
- Every is .
- For every and ,
- Every is Lipschitz with the same constant .
- For every , as .
- For almost every with respect to volume measure, converges to as .
The sequence is a reusable regularization device preserving the Lipschitz-gradient bound while providing almost-everywhere Hessian convergence.
Original Lean declaration header
Within namespace FunctionalInequalities.Analysis. Shown in its original module context. Proof omitted.
theorem exists_contDiff_approx_of_lipschitz_gradient
{U : E → ℝ} (hU : ContDiff ℝ 1 U) {G : NNReal} (hG : LipschitzWith G (gradient U)) :
∃ Uk : ℕ → E → ℝ, (∀ k, ContDiff ℝ ∞ (Uk k)) ∧
(∀ k x, ‖gradient (Uk k) x - gradient U x‖ ≤ G / ((k : ℝ) + 1)) ∧
(∀ k, LipschitzWith G (gradient (Uk k))) ∧
(∀ x, Tendsto (fun k => Uk k x) atTop (𝓝 (U x))) ∧
(∀ᵐ x ∂(volume : Measure E), Tendsto (fun k => fderiv ℝ (gradient (Uk k)) x) atTop
(𝓝 (fderiv ℝ (gradient U) x)))
Module navigation
Module: Analysis/Mollification/Hessian.
Supporting theorems: hasFDerivAt_convolution_normed_of_lipschitz, gradient_convolution_normed.
Previous: gradient_convolution_normed.
Source excerpt, lines 268–275 · Frozen source 408915f.
import Definitions.Def_KLSModular_FunctionalInequalities_Analysis_Mollification_Hessian
open MeasureTheory Filter
open scoped Topology ContDiff
variable {E : Type*}
variable [NormedAddCommGroup E]
variable [InnerProductSpace ℝ E] [FiniteDimensional ℝ E] [MeasurableSpace E] [BorelSpace E]
theorem FunctionalInequalities.Analysis.exists_contDiff_approx_of_lipschitz_gradient_readable
{U : E → ℝ} (hU : ContDiff ℝ 1 U) {G : NNReal} (hG : LipschitzWith G (gradient U)) :
∃ Uk : ℕ → E → ℝ, (∀ k, ContDiff ℝ ∞ (Uk k)) ∧
(∀ k x, ‖gradient (Uk k) x - gradient U x‖ ≤ G / ((k : ℝ) + 1)) ∧
(∀ k, LipschitzWith G (gradient (Uk k))) ∧
(∀ x, Tendsto (fun k => Uk k x) atTop (𝓝 (U x))) ∧
(∀ᵐ x ∂(volume : Measure E), Tendsto (fun k => fderiv ℝ (gradient (Uk k)) x) atTop
(𝓝 (fderiv ℝ (gradient U) x))) := by sorry