OAI/Analysis/DiskMaximal/Refinement.lean
69 declarations, 0 contain sorry, 0 declared as axioms
- def
OAI.LabelSwitches.activeline 49Source documentation
Whether a switch has occurred since the most recent exceptional level.
def active (bad sw : ℕ → Bool) : ℕ → Bool | 0 => false | n+1 => if bad n then false else active bad sw n || sw n
- def
OAI.LabelSwitches.countline 53 - lemma
OAI.LabelSwitches.active_witnessline 55 - theorem
OAI.LabelSwitches.count_leline 77 - theorem
OAI.LabelSwitches.count_energyline 109Source documentation
Quantitative energy version. The exceptional set is the union of marks and levels with energy exceeding c. This includes an arbitrary birth offset.
theorem count_energy (mark sw : ℕ → Bool) (E : ℕ → ℝ) (n : ℕ) {c : ℝ} (hc : 0 < c) (hE : ∀ i < n, 0 ≤ E i) (hsep : ∀ i j, i < j → j < n → sw i = true → sw j = true → ∃ k, i ≤ k ∧ k ≤ j ∧ (mark k = true ∨ c < E k)) : ((count sw n : ℕ) : ℝ) ≤ 1+2*((count mark n : ℕ) : ℝ)+(2/c)*∑ i ∈ range n, E i := by …Mentions: OAI.LabelSwitches.count
- lemma
OAI.PlanePotential.green_eq_zero_of_outsideline 149Source documentation
The global segment kernel vanishes off the region on which the actual finite density decomposition is valid.
lemma green_eq_zero_of_outside {ψ : ℂ → ℝ} {R X : ℝ} (hs : ∀ z, ψ z ≠ 0 → ‖z‖ ≤ R) (hRX : R ≤ X) {x y : ℂ} (hx : ‖x‖ ≤ X) (hy : X < ‖y‖) : green ψ x y = 0 := by …Mentions: OAI.PlanePotential.green
- lemma
OAI.PlanePotential.green_gradient_representationline 171 - theorem
OAI.PlanePotential.green_finite_decompositionline 178 - theorem
OAI.PlanePotential.green_decomposition_normline 201Source documentation
The complete finite Minkowski step, after genuine kernel insertion.
theorem green_decomposition_norm {ι : Type*} [Fintype ι] {ψ g : ℂ → ℝ} (hψ : Continuous ψ) (hψc : HasCompactSupport ψ) (hg : ContDiff ℝ 1 g) {D R X Y B : ℝ} (hD : ∀ y, ‖fderiv ℝ g y‖ ≤ D) (hψ1 : ∫ z, ψ z = 1) (hψs : ∀ z, ψ z ≠ 0 → ‖z‖ ≤ R) (hψB : ∀ z, |ψ z| ≤ B) (hRX : R ≤ X) (hM : 0 < R+X) (hB : 0 ≤ B) (hXY : 0 < X+Y) (β : ι → ℂ → ℂ) (hβ : ∀ i, Integrable (β i)) (hβs : ∀ i y, β i y ≠ 0 → ‖y‖ ≤ Y) (hdecomp : ∀ᵐ y, ‖y‖ ≤ X → gradient g y = ∑ i, β i y) : eLpNorm (fun x => g x-∫ z, ψ z*g z) (3/2) (volume.restrict {x : ℂ | ‖x‖ ≤ X}) ≤ ∑ i, eLpNorm (fun x => ∫ y, ⟪green ψ x y,β i y⟫) (3/2) (volume.restrict {x : ℂ | ‖x‖ ≤ X}) := by …Mentions: OAI.PlanePotential.green
- def
OAI.RadiusEnvelope.envelopeline 234Source documentation
The signed envelope over the entire compact real-radius interval.
def envelope (u : ℝ → E → ℝ) (a b : ℝ) (x : E) : ℝ := …
- lemma
OAI.RadiusEnvelope.attainsline 237 - lemma
OAI.RadiusEnvelope.le_envelopeline 249 - lemma
OAI.RadiusEnvelope.lipschitzline 255 - lemma
OAI.RadiusEnvelope.zero_of_all_zeroline 278 - theorem
OAI.RadiusEnvelope.fderiv_touchingline 286Source documentation
Differentiable touching holds for every attaining radius; no derivative of an argmax selector is taken.
theorem fderiv_touching [NormedAddCommGroup E] [NormedSpace ℝ E] {u : ℝ → E → ℝ} {a b r : ℝ} {x : E} (hr : r ∈ Icc a b) (hc : ∀ y, ContinuousOn (fun t => u t y) (Icc a b)) (he : envelope u a b x = u r x) (hd : DifferentiableAt ℝ (envelope u a b) x) (hu : DifferentiableAt ℝ (u r) x) : fderiv ℝ (envelope u a b) x = fderiv ℝ (u r) x := by …Mentions: OAI.RadiusEnvelope.envelope
- lemma
OAI.DiskMoments.signedAverage_lipschitzline 304 - lemma
OAI.DiskMoments.signedAverage_radius_continuousOnline 328 - lemma
OAI.DiskMoments.hasFDerivAt_signedAverageline 334 - theorem
OAI.DiskMoments.run_envelope_lipschitzline 358Source documentation
Actual signed run envelopes: locally differentiable almost everywhere, over all radii in their compact interval.
theorem run_envelope_lipschitz {g : ℂ → ℝ} (hg : ContDiff ℝ 1 g) (hgc : HasCompactSupport g) {a b : ℝ} (ha : 0 < a) (hab : a ≤ b) : ∃ L : ℝ≥0, LipschitzWith L (RadiusEnvelope.envelope (fun r x => signedAverage g x r) a b) := by …Mentions: OAI.RadiusEnvelope.envelope, OAI.DiskMoments.signedAverage
- lemma
OAI.DiskMoments.signedAverage_eq_zero_of_outsideline 369 - theorem
OAI.DiskMoments.run_envelope_hasCompactSupportline 385Source documentation
Every radius in the run is retained, but a common compact spatial support still exists.
theorem run_envelope_hasCompactSupport {g : ℂ → ℝ} (hg : ContDiff ℝ 1 g) (hgc : HasCompactSupport g) {a b : ℝ} (ha : 0 < a) (hab : a ≤ b) : HasCompactSupport (RadiusEnvelope.envelope (fun r x => signedAverage g x r) a b) := by …Mentions: OAI.RadiusEnvelope.envelope, OAI.DiskMoments.signedAverage
- theorem
OAI.DiskMoments.run_envelope_ae_touchingline 404Source documentation
AE differentiability and universal touching of actual run gradients.
theorem run_envelope_ae_touching {g : ℂ → ℝ} (hg : ContDiff ℝ 1 g) (hgc : HasCompactSupport g) {a b : ℝ} (ha : 0 < a) (hab : a ≤ b) : ∀ᵐ x, ∀ r ∈ Icc a b, RadiusEnvelope.envelope (fun r x => signedAverage g x r) a b x = signedAverage g x r → fderiv ℝ (RadiusEnvelope.envelope (fun r x => signedAverage g x r) a b) x = (1/Real.pi) • ∫ z in Metric.ball 0 1, fderiv ℝ g (x+r • z) := by …Mentions: OAI.RadiusEnvelope.envelope, OAI.DiskMoments.signedAverage
- def
OAI.DyadicHats.pointline 423 - def
OAI.DyadicHats.boxNormline 424 - lemma
OAI.DyadicHats.boxNorm_nonnegline 426 - lemma
OAI.DyadicHats.boxNorm_le_normline 427 - lemma
OAI.DyadicHats.norm_le_two_boxNormline 429 - lemma
OAI.DyadicHats.boxNorm_add_leline 434 - lemma
OAI.DyadicHats.boxNorm_negline 438 - lemma
OAI.DyadicHats.boxNorm_sub_commline 439 - lemma
OAI.DyadicHats.hat_pos_iffline 442 - lemma
OAI.DyadicHats.hat_ne_zero_iffline 457 - lemma
OAI.DyadicHats.support_hat_subsetline 465 - lemma
OAI.DyadicHats.hasCompactSupport_hatline 471 - lemma
OAI.DyadicHats.lipschitz_hatline 477Source documentation
Globally uniform spatial Lipschitz bound for the literal bilinear hats.
lemma lipschitz_hat {r : ℝ} (hr : 0 < r) (p : ℤ × ℤ) : LipschitzWith (Real.toNNReal (2/r)) (hat r p) := by …Mentions: OAI.DyadicHats.hat
- lemma
OAI.DyadicHats.step_localityline 510 - def
OAI.DyadicHats.childrenline 544Source documentation
Literal nine-child support of an adjacent dyadic refinement row.
def children (p : ℤ × ℤ) : Finset (ℤ × ℤ) := …
- lemma
OAI.DyadicHats.tent_half_zeroline 547 - lemma
OAI.DyadicHats.step_zero_of_not_childline 557 - lemma
OAI.DyadicHats.hat_refine_finiteline 565 - def
OAI.DyadicHats.vectorMassline 572Source documentation
The vector mass of the actual density, not an abstract additive tree.
def vectorMass (h : ℂ → ℂ) (r : ℝ) (p : ℤ × ℤ) : ℂ := ∫ y, hat r p y • h y
Mentions: OAI.DyadicHats.hat
- def
OAI.DyadicHats.scalarMassline 574 - lemma
OAI.DyadicHats.integrable_hat_smulline 576 - lemma
OAI.DyadicHats.vectorMass_refineline 582 - lemma
OAI.DyadicHats.scalarMass_le_integralline 593 - lemma
OAI.DyadicHats.sum_scalarMass_leline 601Source documentation
Any finite set of roots carries at most the total L1 density, uniformly in the scale. This proves the full-grid mass budget once finite support is used.
lemma sum_scalarMass_le {h : ℂ → ℂ} (hh : Integrable h) (r : ℝ) (S : Finset (ℤ × ℤ)) : ∑ p ∈ S, scalarMass h r p ≤ ∫ y, ‖h y‖ := by …Mentions: OAI.DyadicHats.scalarMass
- lemma
OAI.DyadicHats.scalarMass_refine_leline 618 - def
OAI.DyadicHats.boundedIndicesline 626Source documentation
A finite index set that contains every hat meeting a fixed bounded region.
def boundedIndices (r R : ℝ) : Finset (ℤ × ℤ) := …
- lemma
OAI.DyadicHats.mem_boundedIndicesline 629 - lemma
OAI.DyadicHats.vectorMass_zero_of_not_indexline 654 - lemma
OAI.DyadicHats.finite_vectorMass_supportline 668Source documentation
Compactly supported actual densities have finitely many nonzero vector masses at each positive scale.
lemma finite_vectorMass_support {h : ℂ → ℂ} (hc : HasCompactSupport h) {r : ℝ} (hr : 0 < r) : (Function.support (vectorMass h r)).Finite := by …Mentions: OAI.DyadicHats.vectorMass
- theorem
OAI.LipschitzWith.integral_fderiv_mul_eq_negline 692Source documentation
Genuine integration by parts for Lipschitz weights and compact Lipschitz potentials. Differentiability is required only almost everywhere, and follows from Rademacher rather than being a new premise.
theorem integral_fderiv_mul_eq_neg (hf : LipschitzWith L f) (hg : LipschitzWith K g) (hgc : HasCompactSupport g) (v : E) : (∫ x, fderiv ℝ f x v * g x ∂μ) = -∫ x, fderiv ℝ g x v * f x ∂μ := by … - theorem
OAI.LipschitzWith.locallyIntegrable_gradientline 705Source documentation
The total gradient version obtained from Riesz and measurable fderiv is locally integrable, including on the nondifferentiability set.
theorem locallyIntegrable_gradient (hf : LipschitzWith L f) : LocallyIntegrable (gradient f) μ := by … - theorem
OAI.LipschitzWith.integrable_gradientline 716 - theorem
OAI.LipschitzWith.integral_mul_fderiv_eq_negline 723 - def
OAI.DyadicHats.indexBoxline 739 - abbrev
OAI.DyadicHats.Gridline 741 - lemma
OAI.DyadicHats.parent_in_boxline 743 - lemma
OAI.DyadicHats.grid_step_columnline 769Source documentation
Restriction to a finite box retains the exact column normalization of the positive dyadic refinement matrix; it does not normalize its rows.
lemma grid_step_column (N : ℕ) (q : Grid N) : (∑ p : Grid N, step p q) = 1 := by …
Mentions: OAI.DyadicHats.Grid, OAI.DyadicHats.step
- lemma
OAI.DyadicHats.mem_indexBox_of_leline 777 - lemma
OAI.DyadicHats.hat_mul_zero_outsideline 787 - lemma
OAI.DyadicHats.density_partition_gridline 797 - lemma
OAI.DyadicHats.density_refine_gridline 805 - lemma
OAI.DyadicHats.integrable_hat_mulline 817 - def
OAI.DyadicHats.scaleline 823 - lemma
OAI.DyadicHats.scale_posline 824 - lemma
OAI.DyadicHats.scale_succline 825 - lemma
OAI.DyadicHats.le_scaleline 829 - lemma
OAI.DyadicHats.scale_index_boundline 833