Documentation

LeanPool.Superdiffusion.Algsuperdiff.Section4.Provider.Annular.UglyLatticeChain

UglyLatticeChain #

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

e.ugly.estimate.for.J read at a lattice cube z + cu_n #

ABK26, Section 4.1. Step 2 of p.mathcalE.annular.decomp states the ugly estimate "on each cube z + cu_n", while the Section 2.4 sensitivity anchor it cites lives on the unit cube cu_0. Four slot transports close the gap, and this module runs all four at once:

The output is Ugly.IsUglyJEstimate with every slot at a manuscript object on the lattice cube ⟨n, v⟩ = 3^n v + cu_n: the response of tilde a_{L,m}, the annular (2,2) error atom at the translated sample, the sigma-bar ratio, the L^infinity content of k_m - k_{n-2} on z + cu_n, the W^{1,infinity} gauge of grad (k_L - k_{n-2}) on z + cu_n and the same gauge of grad (k_L - k_m) on cu_m.

The s <= 1/4 residual, carried honestly #

The anchor needs both of its exponent slots in (0, 1/4]; the enclosing proposition admits s in [8 gamma, 1/2]. hs14 below is that restriction, stated and never hidden.

The conservative L^infinity reading #

The third slot is produced at the L^infinity norm of k_m - k_{n-2} on z + cu_n where the manuscript prints the volume-normalized L^2 norm of the same increment on the same cube. This is the dominating direction and it is exactly the reading A2b's annularL2Block consumes; see ValueBridge.lean for the carrier discussion.

Part A -- splitting the gradient gauge at an intermediate scale #

The gradient gauge splits at an intermediate scale.

|| grad (k_c - k_a) ||_{W^{1,infinity}(z+cu_k)} is at most the sum of the two partial gauges. This is the Lean form of the manuscript's m-versus-L bookkeeping: the head block (a, b] feeds e.mathcalE.annular.decomp.pre.zero's fourth term and the tail block (b, c] its fifth.

The cross-scale comparison of the gradient gauge, at a lattice centre.

For a scale-n lattice point z of cu_m the annulus cube z + cu_n sits inside cu_m, so the volume-normalized W^{1,infinity} gauge on z + cu_n is at most 3^{m-n} times the one on cu_m. This is the manuscript's auxiliary step (|| grad j_k ||_{W^{1,infinity}(z+cu_n)} replaced by 3^{m-n} || grad j_k ||_{W^{1,infinity}(cu_m)}), which Support.shellW1InfGradNorm_le_zpow_mul_of_le supplies only at a common centre.

theorem Algsuperdiff.Section4.Provider.Annular.isUglyJEstimate_mono_gradM {Jval E2 sigDiff L2 gradN gradM gradM' cstar gam w wgam C : ℝ} (hC0 : 0 ≤ C) (hcstar0 : 0 ≤ cstar⁻¹) (hgam0 : 0 ≤ gam) (hwgam0 : 0 ≤ wgam) (hgrad : gradM ≤ gradM') (h : IsUglyJEstimate Jval E2 sigDiff L2 gradN gradM cstar gam w wgam C) :
IsUglyJEstimate Jval E2 sigDiff L2 gradN gradM' cstar gam w wgam C

The gradM-slot monotonicity of the five-term display, at the fifth slot's weight C c_*^{-1} gamma w_gamma.

Part B -- the composed per-cube estimate at a lattice cube #

theorem Algsuperdiff.Section4.Provider.Annular.exists_uglyJEstimate_lattice_cube (d : ℕ) (dimension : 2 ≤ d) :
∃ (Cs : ℝ), 0 < Cs ∧ ∀ (M : Section3.ABKModel d) (m n L : ℤ) (v : Fin d → ℤ) (e : HCPolySupport.Vec d) (omega : Section3.Cutoff.CutoffSample d) (s kap Cl Cr Ash C : ℝ), n ≤ m → m ≤ L → v ∈ Support.latticeCubeSet d n m → 0 < s → s ≤ 1 / 4 → 8 * M.gamma ≤ s → HCPolySupport.Book.Ch02.vecNorm e = 1 → 0 ≤ Ash → 0 < kap → M.gamma * kap ^ 2 = Section3.Disorder.cstar M → 1 / 2 * (kap * 3 ^ (M.gamma * ↑m)) ≤ ↑(Section3.Annealed.sigmaBar M m) → 1 / 4 * (kap * 3 ^ (M.gamma * ↑n)) ≤ ↑(Section3.Annealed.sigmaBar M (n - 2)) → ↑(Section3.Annealed.sigmaBar M (n - 2)) * (Frozen.Section24.unitCubeLambda (2 * M.gamma) (HCPolySupport.Book.Ch02.MultiscaleExponent.finite 2) (Section3.Provider.BadEvents.unitRescaledCutoffCoeff M { scale := n, index := v } (n - 2) omega))⁻¹ ≤ Cl * 3 ^ (M.gamma * (↑m - ↑n)) → (↑(Section3.Annealed.sigmaBar M (n - 2)))⁻¹ * (3 ^ (2 * ↑n) * Support.shellW1InfGradNorm n (Frozen.Assumptions.ShellField.translate (Support.triadicLatticePoint n v) (Section3.Provider.Stream.shellIncrement (↑omega) (n - 2) L))) ≤ Ash * 3 ^ (s / 4 * (↑m - ↑n)) → (↑(Section3.Annealed.sigmaBar M m))⁻¹ * ↑(Section3.Annealed.sigmaBar M (n - 2)) ≤ Cr → Cs * (1 + Ash * Cl) ^ 2 * Cr * (1 + Cl) + 16 * Cs * (1 + Ash * Cl) ^ 2 * Cl * (1 + Section3.Provider.Diffusivity.ApproximateRecurrence.centeringConst d ^ 2) + 4 * Cs * (1 + 4 * Cl ^ 2) ≤ C → IsUglyJEstimate (HCPolySupport.Book.Ch02.responseJ (HCPolySupport.Book.Ch02.cubeDomain { scale := n, index := v }) ((subConstCutoffTriadicCoeffFamily M L (Support.fluxIncrementAverage M L m (HCPolySupport.originCube d m) omega) ⋯ omega).coeffOn { scale := n, index := v }) (Section3.Observable.inverseSqrtLoad (Section3.Annealed.sigmaBar M m) e) (Section3.Observable.sqrtLoad (Section3.Annealed.sigmaBar M m) e)) (Support.annularErrorAtom M n s (Section3.Cutoff.translateCutoffSample (Support.triadicLatticePoint n v) omega) ^ 2) ((↑(Section3.Annealed.sigmaBar M m) * (↑(Section3.Annealed.sigmaBar M (n - 2)))⁻¹ - 1) ^ 2) ((3 ^ (-(M.gamma * ↑n)) * Section3.Cutoff.localCubeControl n (Frozen.Assumptions.ShellField.translate (Support.triadicLatticePoint n v) (Section3.Provider.Stream.shellIncrement (↑omega) (n - 2) m))) ^ 2) ((3 ^ ((2 - M.gamma) * ↑n) * Support.shellW1InfGradNorm n (Frozen.Assumptions.ShellField.translate (Support.triadicLatticePoint n v) (Section3.Provider.Stream.shellIncrement (↑omega) (n - 2) L))) ^ 2) ((3 ^ ((2 - M.gamma) * ↑m) * Support.shellW1InfGradNorm m (Section3.Provider.Stream.shellIncrement (↑omega) m L)) ^ 2) (Section3.Disorder.cstar M) M.gamma (3 ^ (s * (↑m - ↑n))) (3 ^ ((s + M.gamma) * (↑m - ↑n))) C

e.ugly.estimate.for.J at the lattice cube ⟨n, v⟩.

The Section 2.4 sensitivity anchor, collapsed by UglyChain and read through the four slot transports, at the manuscript's own perturbation `h = k_L - (k_L

  • k_m){cu_m} - k{n-2}and its own coefficienttilde a_{L,m} = a_L - (k_L - k_m)_{cu_m}`.

Every quantity on both sides is a manuscript object on 3^n v + cu_n; nothing unit-cube remains.