Averaged radial segment integrals bounded by a local Riesz potential
ProvedMeasureTheory.lintegral_segment_ball_le_rieszPotentiallebesgue-integrationpolar-coordinatespotential-theory
Let . There is a finite constant such that every measurable , center , and radius satisfy
This is the measure-theoretic averaging step in the centered oscillation argument. It applies to arbitrary nonnegative measurable data, without differentiability, integrability, or finiteness assumptions. Polar coordinates and Tonelli's theorem give the bound with . Values at the center and at segment endpoints do not affect the integrals.
Formalization Note The functions take values in the extended nonnegative reals. The segment parameter uses Lebesgue measure restricted to the closed unit interval. The kernel is represented by a real power followed by conversion to the extended nonnegative reals.
Preamble
import Mathlib.Analysis.Calculus.Gradient.Basic import Mathlib.Analysis.Calculus.ContDiff.Basic import Mathlib.Analysis.InnerProductSpace.PiL2 import Mathlib.MeasureTheory.Function.LpSeminorm.Basic import Mathlib.MeasureTheory.Measure.Haar.InnerProductSpace import Mathlib.Analysis.SpecialFunctions.Pow.Real open MeasureTheory set_option autoImplicit false
Formal statement
theorem MeasureTheory.lintegral_segment_ball_le_rieszPotential {n : ℕ} (hn : 0 < n) :
∃ C : NNReal, ∀ g : EuclideanSpace ℝ (Fin n) → ENNReal,
Measurable g → ∀ (x : EuclideanSpace ℝ (Fin n)) (r : ℝ), 0 < r →
(∫⁻ z in Metric.ball x r, ENNReal.ofReal ‖z - x‖ *
(∫⁻ t in Set.Icc (0 : ℝ) 1, g (x + t • (z - x)))) ≤
volume (Metric.ball x r) * (C : ENNReal) *
(∫⁻ z in Metric.ball x r, g z *
ENNReal.ofReal (‖z - x‖ ^ (1 - (n : ℝ)))) := by sorrySource
Hunter, Notes on Partial Differential Equations (revised 6/18/2014), https://www.math.ucdavis.edu/~hunter/pdes/pde_notes.pdf, printed pp. 68–69 (PDF pp. 74–75), proof of Theorem 3.36, equation (3.14). The polar-coordinate/Tonelli averaging calculation is stated for arbitrary measurable nonnegative data instead of the gradient length.