Nonempty graded tolerance stages for all released positive frames at square scales
Provedmme_released_square_scale_graded_tolerance_stagesFor each of the six released inner regions , choose a nonnegative requested rate strictly below its canonical central regional entropy rate. Given any positive parent-tolerance cap, there are a common child-band radius , with , and a common scale threshold with the following property.
For every sufficiently large natural number and every positive integer frame at scale in any region, set
Then , , , and the exact size test holds with minimum and repair base . The transparent frame constructor gives a central step with its original counts, positions, and reference address. There exists a graded extraction stage from the common-coordinate parent-graded band of radius cap to the whole child window of radius around that central step. Its logarithmic rate is exactly , and its number of cases is at most
The scale threshold precedes quantification over the region, frame, reference, and varying child profiles. Every supported triple in the target window belongs to exactly one case. A supported triple with the exact central child histograms exists for the same frame, so the number of cases is at least one. The strict central-rate margins remain explicit hypotheses. The uniform varying-profile budget, central supported witness, and extraction stage follow from accepted interfaces. Numerical rate certification and the recursive continuation are separate obligations.
import Definitions.Def_mme_released_positive_integer_frame_data import Definitions.Def_mme_regional_tolerance_window_data open BigOperators Filter MME MME.ProfiledCW MME.RecursiveYZ MME.RegionRealization MME.CompleteSplit MME.MoreAsymmetryExactSeed MME.ReleasedPositiveInteger set_option autoImplicit false
theorem mme_released_square_scale_graded_tolerance_stages
(rates : Fin 6 → ℝ) (rates_nonneg : ∀ region, 0 ≤ rates region)
(rates_below : ∀ region, rates region < RegionRate.regionalRate
(RecStage.htotal3 region) (RecStage.n3 region)
(RecStage.m3 region) (RecStage.mu3 region))
(cap : ℝ) (cap_pos : 0 < cap) :
∃ delta : ℝ, 0 < delta ∧ 4 * delta ≤ cap ∧
∀ᶠ k : ℕ in atTop,
∃ repair_gt_one : 1 < k,
∃ epsilon_pos : 0 < (Real.sqrt ((8 * 25 * 88 * (Fintype.card (CompleteWord 2) : ℝ) ^ 2 / (denominator : ℝ) ^ 2) * ((k + 2 : ℕ) : ℝ) / (k : ℝ) ^ 2)),
∃ size_test : (8 * k : ℝ) *
(25 * 88 * (Fintype.card (CompleteWord 2) : ℝ) ^ 2) ≤
((k ^ 2 * denominator ^ 2 : ℕ) : ℝ) * ((Real.sqrt ((8 * 25 * 88 * (Fintype.card (CompleteWord 2) : ℝ) ^ 2 / (denominator : ℝ) ^ 2) * ((k + 2 : ℕ) : ℝ) / (k : ℝ) ^ 2))) ^ 2,
(Real.sqrt ((8 * 25 * 88 * (Fintype.card (CompleteWord 2) : ℝ) ^ 2 / (denominator : ℝ) ^ 2) * ((k + 2 : ℕ) : ℝ) / (k : ℝ) ^ 2)) + 2 * delta ≤ cap ∧
∀ (region : Fin 6) (frame : Frame region (k ^ 2)),
∃ stage : LogPartStageG (ReleasedJointInterior.blocks region (k ^ 2) * 4)
2 (fun i x => ParentGraded (ReleasedJointInterior.parent region) (ReleasedJointInterior.size region (k ^ 2)) i (split (ell := 2) (ReleasedJointInterior.positions region (k ^ 2)) (ReleasedJointInterior.positions_length region (k ^ 2)) x) ∧ ReleasedJointInterior.source region (k ^ 2) cap i x) (childWindow (frame.step (pow_pos (lt_trans Nat.zero_lt_one repair_gt_one) 2) k repair_gt_one (Real.sqrt ((8 * 25 * 88 * (Fintype.card (CompleteWord 2) : ℝ) ^ 2 / (denominator : ℝ) ^ 2) * ((k + 2 : ℕ) : ℝ) / (k : ℝ) ^ 2)) epsilon_pos size_test) delta),
stage.rate = rates region * (k : ℝ) ^ 2 ∧
stage.types ≤ (2 * ReleasedJointInterior.blocks region (k ^ 2) + 1) ^
(27 * Fintype.card (Cell 4 88 (RecStage.parent3 region))) ∧
1 ≤ stage.types := by sorry