Radial convolution reproduces a constant spherical mean
ProvedMeasureTheory.radial_convolution_eq_of_sphere_averageconvolutionharmonic-functionsmean-value-propertyregularity
Let . Suppose is continuous, compactly supported, radial with profile , vanishes when , and has integral one. Let be locally integrable. If every spherical average of centered at with radius equals , then
No global continuity of is required.
Preamble
import Theorems.Thm_MeasureTheory_integral_polar_sphere_centered import Mathlib.Analysis.Calculus.ContDiff.Convolution import Mathlib.MeasureTheory.Function.LocallyIntegrable open MeasureTheory Set Metric Filter open scoped Topology Convolution set_option autoImplicit false
Formal statement
theorem MeasureTheory.radial_convolution_eq_of_sphere_average {n : ℕ} (hn : 0 < n)
{k g : EuclideanSpace ℝ (Fin n) → ℝ} {κ : ℝ → ℝ} {R : ℝ}
(hk : Continuous k) (hkc : HasCompactSupport k)
(hkr : ∀ y, k y = κ ‖y‖) (hks : ∀ y, R ≤ ‖y‖ → k y = 0)
(hki : ∫ y, k y = 1) (hg : LocallyIntegrable g)
(x : EuclideanSpace ℝ (Fin n))
(hmean : ∀ r : ℝ, 0 < r → r < R →
(⨍ ω : sphere (0 : EuclideanSpace ℝ (Fin n)) 1,
g (x + r • ω.1) ∂volume.toSphere) = g x) :
(k ⋆[ContinuousLinearMap.lsmul ℝ ℝ, volume] g) x = g x := by sorrySource
Hunter, Notes on PDEs (revised 6/18/2014), printed p. 21, proof of Theorem 2.2; https://www.math.ucdavis.edu/~hunter/pdes/ch2.pdf. Kernel construction: Mathlib Analysis/Calculus/BumpFunction/InnerProduct.lean.