Theorem 10.3 — central anchor in (n,2n] with its exact residual (source-faithful)
ProvedErdos390.eventual_central_anchor_and_residual_existsFix a real constant with and write for the tail length. For all sufficiently large , there exist a natural number , a finite set , and a finite set , disjoint from , such that
This is the source-faithful core of the paper's Theorem 10.3 upper-bound construction. The central binomial coefficient is absorbed by a set of factors confined to the central interval , up to an auxiliary divisor (the anchor cofactor), and the residual set then realizes the tail product divided by that same , using factors drawn from the full interval and disjoint from the anchor set. The disjoint union is then a subset of with product , the complement quotient of Theorem 10.3.
Unlike a statement that quantifies universally over an arbitrary anchor pair , the residual here is bound to the same and produced by the anchor construction, which is the form in which the paper's guarded assembly is proved.
Formalization Note No divisibility hypothesis is placed on : the identity itself implies . The residual set may use factors of outside , exactly as in the source assembly; in particular it is not confined to the tail interval .
import Definitions.Def_erdos390_problem open Filter
namespace Erdos390
/-- **Theorem 10.3 (central anchor and residual, source-faithful binding).**
For every constant `c > C0`, for sufficiently large `n`, there is a divisor `D`,
a central anchor subset `central ⊆ (n, 2n]` whose product is `binom(2n, n) * D`,
and a residual subset of `(n, 2n + ⌈c n / log n⌉]`, disjoint from `central`,
whose product times `D` equals the full upper tail product on `(2n, 2n + ⌈c n / log n⌉]`. -/
theorem eventual_central_anchor_and_residual_exists :
∀ c : ℝ, C0 < c →
∀ᶠ n : ℕ in atTop,
∃ (D : ℕ) (central residual : Finset ℕ),
central ⊆ factorInterval n (2 * n) ∧
central.prod id = Nat.choose (2 * n) n * D ∧
residual ⊆ factorInterval n (2 * n + Nat.ceil (c * secondOrderScale n)) ∧
Disjoint central residual ∧
residual.prod id * D =
(factorInterval (2 * n) (2 * n + Nat.ceil (c * secondOrderScale n))).prod id := by sorry
end Erdos390