Documentation

LeanPool.AnomalousDiffusion.AVenhance.Infra.Section5.Terms.R46FluxEstimate

Finite convex-combination bounds for the transition flux.

theorem AVenhance.Infra.Section5.R46FluxEstimate.r46_abs_weighted_sum_le {ι : Type u_1} (S : Finset ι) (w f : ι → ℝ) (B : ℝ) (hw : ∀ i ∈ S, 0 ≤ w i) (hsum : ∑ i ∈ S, w i = 1) (hf : ∀ i ∈ S, |f i| ≤ B) :
|∑ i ∈ S, w i * f i| ≤ B
theorem AVenhance.Infra.Section5.R46FluxEstimate.r46_matrix_diff_component {A B : Matrix (Fin 2) (Fin 2) ℝ} (η : ℝ) (hAB : ∀ (i j : Fin 2), |(A - B) i j| ≤ η / 2) (v : Homogenization.Vec 2) (i : Fin 2) :
|(A - B).mulVec v i| ≤ η * (|v 0| + |v 1|) / 2
theorem AVenhance.Infra.Section5.R46FluxEstimate.r46_finite_mixture_distortion {κ : Type u_1} {ι : Type u_2} (U : Finset κ) (S : Finset ι) (wk : κ → ℝ) (wl : ι → ℝ) (A : ι → Matrix (Fin 2) (Fin 2) ℝ) (B : κ → Matrix (Fin 2) (Fin 2) ℝ) (v : Homogenization.Vec 2) (η : ℝ) (hwk : ∀ k ∈ U, 0 ≤ wk k) (hsumk : ∑ k ∈ U, wk k = 1) (hwl : ∀ l ∈ S, 0 ≤ wl l) (hsuml : ∑ l ∈ S, wl l = 1) (hclose : ∀ k ∈ U, ∀ l ∈ S, ∀ (i j : Fin 2), |(A l - B k) i j| ≤ η / 2) (hη : 0 ≤ η) :
Homogenization.vecNormSq (∑ k ∈ U, wk k • ∑ l ∈ S, wl l • (A l - B k).mulVec v) ≤ η ^ 2 * Homogenization.vecNormSq v

Two successive finite convex averages preserve the entrywise flow distortion bound, with the sharp two-dimensional Euclidean square constant.

theorem AVenhance.Infra.Section5.R46FluxEstimate.r46_xFlowInv_right_inverse_at {β : ℝ} {I : Ingredients β} {Φ : ℕ → ℝ → Homogenization.Vec 2 → ℝ} (hΦ : IsStreamSeq I Φ) (m : ℕ) (l : ℤ) (t : ℝ) (x : Homogenization.Vec 2) :
I.xFlow hΦ m l t (I.xFlowInv hΦ m l t x) = x
theorem AVenhance.Infra.Section5.R46FluxEstimate.r46_defect_eq_finite_mixture {β : ℝ} (I : Ingredients β) {Φ : ℕ → ℝ → Homogenization.Vec 2 → ℝ} (hΦ : IsStreamSeq I Φ) (m : ℕ) (hm : 1 ≤ m) (T : ℝ → Homogenization.Vec 2 → ℝ) (t : ℝ) (hT : ContDiff ℝ 1 (T t)) (x : Homogenization.Vec 2) :
∑' (k : { k : ℤ // Odd k }), I.xiMK m (↑k) t • (Gbar I hΦ m T t x - G I hΦ m T (lIdx β I.Λ m ↑k) t x) = ∑ k ∈ ⋯.toFinset, I.xiMK m (↑k) t • ∑ l ∈ ⋯.toFinset, I.hatXiML m l t • (I.flowGrad hΦ m l t x - I.flowGrad hΦ m (lIdx β I.Λ m ↑k) t x).mulVec (spaceGrad (T t) x)

The two cutoff partitions turn the defect into a finite double convex average of differences of flow Jacobians.

theorem AVenhance.Infra.Section5.R46FluxEstimate.r46_flowGrad_one_eq {β : ℝ} (I : Ingredients β) {Φ : ℕ → ℝ → Homogenization.Vec 2 → ℝ} (hΦ : IsStreamSeq I Φ) (l : ℤ) (t : ℝ) (x : Homogenization.Vec 2) :
I.flowGrad hΦ 1 l t x = 1
theorem AVenhance.Infra.Section5.r46Flux_pointwise_sq_le_of_flowBounds {β : ℝ} (I : Ingredients β) {Φ : ℕ → ℝ → Homogenization.Vec 2 → ℝ} (hΦ : IsStreamSeq I Φ) (Cmat : ℝ) (hflow : FlowBoundsData I Φ hΦ Cmat) (m : ℕ) (hm : 1 ≤ m) (κm : ℝ) (T : ℝ → Homogenization.Vec 2 → ℝ) {t : ℝ} (hT : ContDiff ℝ 1 (T t)) (x : Homogenization.Vec 2) :
Homogenization.vecNormSq (r46Flux I hΦ m κm T t x) ≤ κm ^ 2 * (epsilon β I.Λ (m - 1) ^ (2 * delta β)) ^ 2 * Homogenization.vecNormSq (spaceGrad (T t) x)

Actual pointwise flux bound from stream-function estimates flow_close. On refresh windows the defect vanishes exactly; off them the odd-mode flux is molecular, and the two cutoff partitions average Jacobian differences.

theorem AVenhance.Infra.Section5.R46FluxEstimate.r46_slice_contDiff {T : ℝ → Homogenization.Vec 2 → ℝ} (hT : ContDiffOn ℝ (↑⊤) (fun (p : ℝ × Homogenization.Vec 2) => T p.1 p.2) (Set.Ici 0 ×ˢ Set.univ)) {t : ℝ} (ht : 0 ≤ t) :
ContDiff ℝ (↑⊤) (T t)

The source n=0 energy norm is the same slice norm as the one consumed by the R46 time estimate. Joint smoothness gives the Fubini identification.

theorem AVenhance.Infra.Section5.gradNormSq_r46Flux_sq_le_of_flowBounds {β : ℝ} (I : Ingredients β) {Φ : ℕ → ℝ → Homogenization.Vec 2 → ℝ} (hΦ : IsStreamSeq I Φ) (Cmat : ℝ) (hflow : FlowBoundsData I Φ hΦ Cmat) (m : ℕ) (hm : 1 ≤ m) (κm : ℝ) (T : ℝ → Homogenization.Vec 2 → ℝ) (hT : ContDiffOn ℝ (↑⊤) (fun (p : ℝ × Homogenization.Vec 2) => T p.1 p.2) (Set.Ici 0 ×ˢ Set.univ)) (t : ℝ) (ht : 0 ≤ t) (hF : ContDiff ℝ (↑⊤) (r46Flux I hΦ m κm T t)) :
gradNormSq (r46Flux I hΦ m κm T t) ≤ (κm * epsilon β I.Λ (m - 1) ^ (2 * delta β)) ^ 2 * gradNormSq fun (x : Homogenization.Vec 2) => spaceGrad (T t) x

Spatial integration preserves the sharp pointwise estimate.

theorem AVenhance.Infra.Section5.r46TimeL2_flux_le_of_flowBounds {β : ℝ} (I : Ingredients β) {Φ : ℕ → ℝ → Homogenization.Vec 2 → ℝ} (hΦ : IsStreamSeq I Φ) (Cmat : ℝ) (hflow : FlowBoundsData I Φ hΦ Cmat) (m : ℕ) (hm : 1 ≤ m) (κm : ℝ) (T : ℝ → Homogenization.Vec 2 → ℝ) (hT : ContDiffOn ℝ (↑⊤) (fun (p : ℝ × Homogenization.Vec 2) => T p.1 p.2) (Set.Ici 0 ×ˢ Set.univ)) (hF : ∀ t ∈ Set.Ioo 0 1, ContDiff ℝ (↑⊤) (r46Flux I hΦ m κm T t)) (hκm : 0 ≤ κm) :
(r46TimeL2 fun (t : ℝ) => r46Flux I hΦ m κm T t) ≤ ENNReal.ofReal (κm * epsilon β I.Λ (m - 1) ^ (2 * delta β)) * r46TimeL2 fun (t : ℝ) (x : Homogenization.Vec 2) => spaceGrad (T t) x

The actual stream-function flow estimate gives the sharp R46 flux-to-gradient space-time bound, with the stronger intermediate exponent 2δ.