Documentation

LeanPool.Superdiffusion.Algsuperdiff.Section3.Provider.Diffusivity.ApproximateRecurrence.LocalizationFluctuationNumericOctic

LocalizationFluctuationNumericOctic #

Ported from scottnarmstrong/Superdiffusion at 7f20476385d4af418f110303085ad0740c9eba46. Module imports, support namespace and local option directives adapted for Lean Pool.

hmem8: the L^2-in-the-sample membership of the oscillation cells #

LocalizationOscillationFullMesh carries two e.nablaw.in.L.eight side conditions into the Step-5 shape. The first of them is

  forall R in the mesh,
    MemLp (fun omega => osc(z_R + cu_n; grad w_omega) ^ 4) 2 P ,

i.e. the finiteness of the eighth moment of the oscillation cell together with its measurability in the sample. This module discharges it.

The two halves #

Measurability. CorrectorMeasurableQuartic and LocalizationFluctuationCellIntegrable supply the quartic and the quadratic window observables; what the oscillation cell needs on top of the quadratic one is the centring, and the centring is a difference of two window observables:

  osc^2(V; u) = fint_V |u|^2 - |fint_V u|^2 ,

meanSquareOscillationVecOn_eq_sub_vecNormSq_volumeAverageVec below. The first term is measurable by measurable_volumeAverage_vecNormSq_freshShellDirichletGrad; the second is a finite sum of squares of the linear window observables of Corrector.measurable_setIntegral_gradCoordL2, which are continuous. So the oscillation cell -- more precisely its fourth power, which is osc^2 squared and therefore free of the square root -- is measurable in the sample.

Finiteness. Domination, exactly as in LocalizationFluctuationCellIntegrable, one power up:

  osc^8 <= fint_{z+cu_n} |u|^8                         (per-cell Jensen)
        <= |cu_K| |z+cu_n|^{-1} fint_{cu_K} |u|^8      (window <= cube)
         = |cu_K| |z+cu_n|^{-1} (‖u‖^2_{L8bar(cu_K)})^4
        <= |cu_K| |z+cu_n|^{-1} (Chead + T')^4 ,

with T' = max((fint_{cu_K} |u|^8)^{1/4} - Chead, 0) the measurable dominating fluctuation -- the octic analogue of the device of LocalizationFluctuationCellIntegrable, measurable because CorrectorMeasurableOctic makes fint_{cu_K} |u|^8 measurable -- whose fourth power is integrable from the Gamma_1 tail of e.nablaw.in.L.eight (LocalizationFluctuationGridEighth.integrable_rpow_four_of_isBigOWith_gammaSigma_one).

Main results #

Scope #

There is no sorry.

References #

The oscillation cell as a square #

The fourth power of the oscillation cell is the square of the mean-square oscillation over the cell's own realization.

only on the scale identification hsc, which names the cell.

The square of the fourth power of the oscillation cell is its eighth power. Unconditional apart from the nonnegativity, which is automatic.

Measurability of the oscillation cell #

A representative identified almost everywhere gives the same coordinate window integral.

theorem Algsuperdiff.Section3.Provider.Diffusivity.ApproximateRecurrence.measurable_meanSquareOscillationVecOn_of_measurable_representative {d : ℕ} {Omega : Type u_1} [MeasurableSpace Omega] (Q : HCPolySupport.TriadicCube d) {S : Set (HCPolySupport.Vec d)} (hS : MeasurableSet S) (hSU : S ⊆ HCPolySupport.openCubeSet Q) (hfin : MeasureTheory.volume S ≠ ⊤) (hpos : 0 < (MeasureTheory.volume S).toReal) {F : Omega → ↥(HCPolySupport.HilbertVectorL2 (HCPolySupport.openCubeSet Q))} (hF : Measurable F) {u : Omega → HCPolySupport.Vec d → HCPolySupport.Vec d} (hFu : ∀ (omega : Omega), ↑↑(F omega) =ᵐ[HCPolySupport.volumeMeasureOn (HCPolySupport.openCubeSet Q)] HCPolySupport.hilbertifyVecField (u omega)) (hsqMeas : Measurable fun (omega : Omega) => HCPolySupport.volumeAverage S fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq (u omega x)) (hcoord : ∀ (omega : Omega) (k : Fin d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => u omega x k) S MeasureTheory.volume) (hcoordsq : ∀ (omega : Omega) (k : Fin d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => u omega x k ^ 2) S MeasureTheory.volume) :

Oscillation is measurable for arbitrary representatives of measurable L² classes. Quadratic-observable measurability and the window integrabilities remain explicit premises.

Unconditional in the sample: the fourth power of the oscillation cell of e.nablaw.oscillations is a measurable function of the sample, for an arbitrary family of zero-trace weak solutions of e.def.w.

on the cell data hsc, hsub and on the two coordinate integrability families on the cell.

The cell is dominated by the cube #

The integrability core #

theorem Algsuperdiff.Section3.Provider.Diffusivity.ApproximateRecurrence.integrable_and_integral_le_freshShellEighthEnergyConst_of_envelope {Omega : Type u_1} [MeasurableSpace Omega] {mu : MeasureTheory.Measure Omega} [MeasureTheory.IsProbabilityMeasure mu] {G : Omega → ℝ} (hG0 : ∀ (omega : Omega), 0 ≤ G omega) (hglobMeas : Measurable G) {Chead A : ℝ} (hChead : 0 ≤ Chead) (hA : 0 < A) {T : Omega → ℝ} (hT0 : ∀ (omega : Omega), 0 ≤ T omega) (hT : HCPolySupport.IndependentSums.IsBigOWith mu (HCPolySupport.IndependentSums.gammaSigma 1) T A) (hGT : ∀ (omega : Omega), G omega ≤ (Chead + T omega) ^ 4) :
MeasureTheory.Integrable G mu ∧ ∫ (omega : Omega), G omega ∂mu ≤ freshShellEighthEnergyConst Chead A

A measurable nonnegative fourth-power envelope inherits integrability and the explicit eighth-energy bound, even when the dominating fluctuation is not measurable.

theorem Algsuperdiff.Section3.Provider.Diffusivity.ApproximateRecurrence.memLp_two_meshOscillationCell_rpow_four_of_measurable {d : ℕ} {Omega : Type u_1} [MeasurableSpace Omega] {mu : MeasureTheory.Measure Omega} [MeasureTheory.IsProbabilityMeasure mu] {K n : ℤ} {R : HCPolySupport.TriadicCube d} (u : Omega → HCPolySupport.Vec d → HCPolySupport.Vec d) {Chead A : ℝ} (hChead : 0 ≤ Chead) (hA : 0 < A) {T : Omega → ℝ} (hT0 : ∀ (omega : Omega), 0 ≤ T omega) (hT : HCPolySupport.IndependentSums.IsBigOWith mu (HCPolySupport.IndependentSums.gammaSigma 1) T A) (hmem : ∀ (omega : Omega), MeasureTheory.MemLp (fun (x : HCPolySupport.Vec d) => HCPolySupport.Book.Ch02.vecNorm (u omega x)) 8 (HCPolySupport.normalizedCubeMeasure (HCPolySupport.originCube d K))) (hpath : ∀ (omega : Omega), Corrector.cubeEuclideanLpNorm (HCPolySupport.originCube d K) 8 (u omega) ^ 2 ≤ Chead + T omega) (hcoord : ∀ (omega : Omega) (k : Fin d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => u omega x k) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) (hcoordsq : ∀ (omega : Omega) (k : Fin d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => u omega x k ^ 2) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) (hsq : ∀ (omega : Omega), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq (u omega x)) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) (hfour : ∀ (omega : Omega), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq (u omega x) ^ 2) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) (height : ∀ (omega : Omega), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq (u omega x) ^ 4) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) (hsc : R.scale = n) (hsub : HCPolySupport.openCubeSet R ⊆ HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) (hglobMeas : Measurable fun (omega : Omega) => HCPolySupport.volumeAverage (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq (u omega x) ^ 4) (hcellMeas : Measurable fun (omega : Omega) => meshOscillationCell n (u omega) R ^ 4) :
MeasureTheory.MemLp (fun (omega : Omega) => meshOscillationCell n (u omega) R ^ 4) 2 mu

The generic MemLp step. Given the pathwise L^8 bound with a Gamma_1 fluctuation, the measurability of the two octic observables, and the six spatial families on cu_K, the fourth power of the oscillation cell is L^2 in the sample.

: complete binder census beyond the typing binders d, Omega, its MeasurableSpace instance, mu, K, n, R, u, Chead, A, T: [IsProbabilityMeasure mu]; hChead : 0 <= Chead; hA : 0 < A; hT0, hT (the Gamma_1 tail); hmem, hpath (the spatial L^8 membership and the pathwise L^8 bound); hcoord, hcoordsq, hsq, hfour, height on cu_K; hsc, hsub (the cell data); and hglobMeas, hcellMeas (measurability in the sample of the cube's eighth energy and of the fourth power of the cell). No integrability in the sample is assumed.

The two wired consumers #

theorem Algsuperdiff.Section3.Provider.Diffusivity.ApproximateRecurrence.exists_gamma0_memLp_two_freshShellDirichlet_meshOscillationCell_rpow_four (d : ℕ) (hd : 2 ≤ d) :
∃ (gamma0 : ℝ), 0 < gamma0 ∧ gamma0 ≤ 1 / 4 ∧ ∀ (M : ABKModel d), M.gamma ≤ gamma0 → ∀ (m0 : ℤ) (Eind : { E : ℝ // 1 ≤ E }), Frozen.Section3.inductionState M m0 Eind → ∀ (m K : ℤ) (hh : ℕ), 0 < hh → m - ↑hh ≤ m0 → ↑hh ≤ 6 * Disorder.cstar M * M.gamma⁻¹ → 10 ^ 10 * M.gamma⁻¹ ≤ ↑K - ↑m → ∀ (e e' : HCPolySupport.Vec d), HCPolySupport.Book.Ch02.vecNorm e ≤ 1 → HCPolySupport.Book.Ch02.vecNorm e' ≤ 1 → ∀ (wD : Cutoff.ShellSeq d → HCPolySupport.H10Function (HCPolySupport.openCubeSet (HCPolySupport.originCube d K))), (∀ (omega : Cutoff.ShellSeq d), HCPolySupport.IsZeroTraceDirichletRhsWeakSolution (fun (x : HCPolySupport.Vec d) => 1) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) (wD omega) fun (x : HCPolySupport.Vec d) => -Corrector.streamForcing (↑(Annealed.sigmaBar M (m - ↑hh)))⁻¹ omega (m - ↑hh) m e x) → (∀ (omega : Cutoff.ShellSeq d), MeasureTheory.MemLp (fun (x : HCPolySupport.Vec d) => HCPolySupport.Book.Ch02.vecNorm ((wD omega).grad x)) 8 (HCPolySupport.normalizedCubeMeasure (HCPolySupport.originCube d K))) → (∀ (omega : Cutoff.ShellSeq d) (k : Fin d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => (wD omega).grad x k) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) → (∀ (omega : Cutoff.ShellSeq d) (k : Fin d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => (wD omega).grad x k ^ 2) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) → (∀ (omega : Cutoff.ShellSeq d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq ((wD omega).grad x)) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) → (∀ (omega : Cutoff.ShellSeq d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq ((wD omega).grad x) ^ 2) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) → (∀ (omega : Cutoff.ShellSeq d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq ((wD omega).grad x) ^ 4) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) → ∀ (n : ℤ) (R : HCPolySupport.TriadicCube d), R.scale = n → HCPolySupport.openCubeSet R ⊆ HCPolySupport.openCubeSet (HCPolySupport.originCube d K) → MeasureTheory.MemLp (fun (omega : Cutoff.ShellSeq d) => meshOscillationCell n (wD omega).grad R ^ 4) 2 ↑M.P

hmem8 for the Dirichlet corrector of e.def.w, as a theorem.

For every gamma below one explicit threshold, in the whole parameter range of e.recurrence.params, and for every sample family of zero-trace weak solutions of e.def.w obeying the six spatial families on cu_K, the fourth power of the oscillation cell of any cell contained in cu_K is L^2 in the sample.

Reaches exactly the external anchor Algsuperdiff.Frozen.External.calderon_zygmund, a proved external, inherited from exists_freshShell_cubeEuclideanL8_leg_bound.

theorem Algsuperdiff.Section3.Provider.Diffusivity.ApproximateRecurrence.exists_gamma0_memLp_two_freshShellNeumann_meshOscillationCell_rpow_four (d : ℕ) (hd : 2 ≤ d) :
∃ (gamma0 : ℝ), 0 < gamma0 ∧ gamma0 ≤ 1 / 4 ∧ ∀ (M : ABKModel d), M.gamma ≤ gamma0 → ∀ (m0 : ℤ) (Eind : { E : ℝ // 1 ≤ E }), Frozen.Section3.inductionState M m0 Eind → ∀ (m K : ℤ) (hh : ℕ), 0 < hh → m - ↑hh ≤ m0 → ↑hh ≤ 6 * Disorder.cstar M * M.gamma⁻¹ → 10 ^ 10 * M.gamma⁻¹ ≤ ↑K - ↑m → ∀ (e e' : HCPolySupport.Vec d), HCPolySupport.Book.Ch02.vecNorm e ≤ 1 → HCPolySupport.Book.Ch02.vecNorm e' ≤ 1 → ∀ (wN : Cutoff.ShellSeq d → HCPolySupport.H1MeanZeroFunction (HCPolySupport.openCubeSet (HCPolySupport.originCube d K))), (∀ (omega : Cutoff.ShellSeq d), HCPolySupport.IsMeanZeroNeumannRhsWeakSolution (fun (x : HCPolySupport.Vec d) => 1) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) (wN omega) fun (x : HCPolySupport.Vec d) => -Corrector.streamForcing (↑(Annealed.sigmaBar M (m - ↑hh)))⁻¹ omega (m - ↑hh) m e' x) → (∀ (omega : Cutoff.ShellSeq d), MeasureTheory.MemLp (fun (x : HCPolySupport.Vec d) => HCPolySupport.Book.Ch02.vecNorm ((wN omega).toH1Function.grad x)) 8 (HCPolySupport.normalizedCubeMeasure (HCPolySupport.originCube d K))) → (∀ (omega : Cutoff.ShellSeq d) (k : Fin d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => (wN omega).toH1Function.grad x k) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) → (∀ (omega : Cutoff.ShellSeq d) (k : Fin d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => (wN omega).toH1Function.grad x k ^ 2) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) → (∀ (omega : Cutoff.ShellSeq d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq ((wN omega).toH1Function.grad x)) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) → (∀ (omega : Cutoff.ShellSeq d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq ((wN omega).toH1Function.grad x) ^ 2) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) → (∀ (omega : Cutoff.ShellSeq d), MeasureTheory.IntegrableOn (fun (x : HCPolySupport.Vec d) => HCPolySupport.vecNormSq ((wN omega).toH1Function.grad x) ^ 4) (HCPolySupport.openCubeSet (HCPolySupport.originCube d K)) MeasureTheory.volume) → ∀ (n : ℤ) (R : HCPolySupport.TriadicCube d), R.scale = n → HCPolySupport.openCubeSet R ⊆ HCPolySupport.openCubeSet (HCPolySupport.originCube d K) → MeasureTheory.MemLp (fun (omega : Cutoff.ShellSeq d) => meshOscillationCell n (wN omega).toH1Function.grad R ^ 4) 2 ↑M.P

hmem8 for the Neumann corrector of e.def.w, as a theorem. The mean-zero Neumann mirror of the previous statement.