Common-Compact-Support Approximation of Two Weak Derivatives
ProvedFunctionalInequalities.Analysis.exists_contDiff_compact_weak_deriv_approximation_readableThis formalizes a supporting density component associated with Lemma 2.4 of Letwin (arXiv:2607.24164v1), with a reviewed relation to the cited result.
Let and let be vectors. Assume:
- is a weak derivative of along , and is a weak derivative of along ;
- , , and have compact support;
- .
Then there exist a compact set and smooth compactly supported functions such that the supports of , and the directional derivatives lie in , while both derivatives belong to and
The conclusion is a two-direction compact approximation result and does not assert approximation of all coordinate derivatives.
Original Lean declaration header
Within namespace FunctionalInequalities.Analysis. Shown in its original module context. Proof omitted.
theorem exists_contDiff_compact_weak_deriv_approximation {n : ℕ}
{η a b : EuclideanSpace ℝ (Fin n) → ℝ} {v w : EuclideanSpace ℝ (Fin n)}
(hηv : HasWeakDerivAlong η a v) (hηw : HasWeakDerivAlong η b w)
(hηc : HasCompactSupport η) (hac : HasCompactSupport a) (hbc : HasCompactSupport b)
(ha2 : MemLp a 2 (volume : Measure (EuclideanSpace ℝ (Fin n))))
(hb2 : MemLp b 2 (volume : Measure (EuclideanSpace ℝ (Fin n)))) :
∃ S : Set (EuclideanSpace ℝ (Fin n)), IsCompact S ∧
Function.support (η) ⊆ S ∧ Function.support (a) ⊆ S ∧
Function.support (b) ⊆ S ∧
∃ θ : ℕ → EuclideanSpace ℝ (Fin n) → ℝ,
(∀ m, ContDiff ℝ ∞ (θ m) ∧ HasCompactSupport (θ m) ∧
Function.support (θ m) ⊆ S ∧
Function.support (fun x => fderiv ℝ (θ m) x (v)) ⊆ S ∧
Function.support (fun x => fderiv ℝ (θ m) x (w)) ⊆ S ∧
MemLp (fun x => fderiv ℝ (θ m) x (v)) 2 (volume : Measure (EuclideanSpace ℝ (Fin n))) ∧
MemLp (fun x => fderiv ℝ (θ m) x (w)) 2 (volume : Measure (EuclideanSpace ℝ (Fin n)))) ∧
Tendsto (fun m => eLpNorm (fun x => fderiv ℝ (θ m) x (v) - (a) x)
2 (volume : Measure (EuclideanSpace ℝ (Fin n)))) atTop (𝓝 0) ∧
Tendsto (fun m => eLpNorm (fun x => fderiv ℝ (θ m) x (w) - (b) x)
2 (volume : Measure (EuclideanSpace ℝ (Fin n)))) atTop (𝓝 0)
Module navigation
Module: Analysis/WeakDerivative/Approximation.
Definition modules: Analysis/WeakDerivative/Basic.
Supporting theorems: lintegral_enorm_convolution_sq_le, tendsto_eLpNorm_convolution_sub, fderiv_convolution_eq_of_hasWeakDerivAlong.
Previous: exists_hasWeakDerivAlong_of_forall_cutoff · Next: exists_contDiff_compact_bounded_weak_deriv_approximation_of_support_subset.
Source excerpt, lines 158–177 · Frozen source 408915f.
import Definitions.Def_KLSModular_FunctionalInequalities_Analysis_WeakDerivative_Approximation open MeasureTheory Filter Set Metric InnerProductSpace open scoped Convolution ContDiff ENNReal RealInnerProductSpace Topology set_option maxHeartbeats 800000
theorem FunctionalInequalities.Analysis.exists_contDiff_compact_weak_deriv_approximation_readable {n : ℕ}
{η a b : EuclideanSpace ℝ (Fin n) → ℝ} {v w : EuclideanSpace ℝ (Fin n)}
(hηv : HasWeakDerivAlong η a v) (hηw : HasWeakDerivAlong η b w)
(hηc : HasCompactSupport η) (hac : HasCompactSupport a) (hbc : HasCompactSupport b)
(ha2 : MemLp a 2 (volume : Measure (EuclideanSpace ℝ (Fin n))))
(hb2 : MemLp b 2 (volume : Measure (EuclideanSpace ℝ (Fin n)))) :
∃ S : Set (EuclideanSpace ℝ (Fin n)), IsCompact S ∧
Function.support (η) ⊆ S ∧ Function.support (a) ⊆ S ∧
Function.support (b) ⊆ S ∧
∃ θ : ℕ → EuclideanSpace ℝ (Fin n) → ℝ,
(∀ m, ContDiff ℝ ∞ (θ m) ∧ HasCompactSupport (θ m) ∧
Function.support (θ m) ⊆ S ∧
Function.support (fun x => fderiv ℝ (θ m) x (v)) ⊆ S ∧
Function.support (fun x => fderiv ℝ (θ m) x (w)) ⊆ S ∧
MemLp (fun x => fderiv ℝ (θ m) x (v)) 2 (volume : Measure (EuclideanSpace ℝ (Fin n))) ∧
MemLp (fun x => fderiv ℝ (θ m) x (w)) 2 (volume : Measure (EuclideanSpace ℝ (Fin n)))) ∧
Tendsto (fun m => eLpNorm (fun x => fderiv ℝ (θ m) x (v) - (a) x)
2 (volume : Measure (EuclideanSpace ℝ (Fin n)))) atTop (𝓝 0) ∧
Tendsto (fun m => eLpNorm (fun x => fderiv ℝ (θ m) x (w) - (b) x)
2 (volume : Measure (EuclideanSpace ℝ (Fin n)))) atTop (𝓝 0) := by sorry