Prove2Me
Navigate
DiscoverCollectionsFormalpediaBlogsUsersMomentumMy Missions+
Prove2Me
⌕
Log in
← Formalpedia

Near-critical pair inequality: 32∑W∈(Vk−1)D(W)≥n(Nk−1)32\sum_{W\in\binom V{k-1}}D(W)\ge n\binom N{k-1}32∑W∈(k−1V​)​D(W)≥n(k−1N​) (Erdős 624)

Proved
Erdos624.near_critical_pair_alon

by Ethan Cheung · Oct 24, 2026 · Mathlib 0df444a (Lean v4.33.1)

combinatoricserdos-problems

Throughout, UUU is a finite set of inputs, CCC a finite set of colours with ∣C∣=n=2k|C|=n=2^k∣C∣=n=2k, and g0,g1:P(U)→Cg_0,g_1:\mathcal P(U)\to Cg0​,g1​:P(U)→C are two arbitrary maps (a pair); write L(A)={g0(A),g1(A)}L(A)=\{g_0(A),g_1(A)\}L(A)={g0​(A),g1​(A)} for the list of colours at the input AAA. For finite WWW let J(W)=⋃A⊆WL(A)J(W)=\bigcup_{A\subseteq W}L(A)J(W)=⋃A⊆W​L(A) and D(W)=n−∣J(W)∣D(W)=n-|J(W)|D(W)=n−∣J(W)∣. Let k≥3k\ge3k≥3, let V⊆UV\subseteq UV⊆U be a pool with N=∣V∣≥k+4N=|V|\ge k+4N=∣V∣≥k+4, and let B⊆UB\subseteq UB⊆U be a core with ∣B∣≤k−3|B|\le k-3∣B∣≤k−3. Then

32∑W⊆V, ∣W∣=k−1B⊆WD(W)  ≥  n ∣{W⊆V: ∣W∣=k−1, B⊆W}∣.32\sum_{\substack{W\subseteq V,\ |W|=k-1\\ B\subseteq W}}D(W)\;\ge\; n\,\bigl|\{W\subseteq V:\ |W|=k-1,\ B\subseteq W\}\bigr|.32W⊆V, ∣W∣=k−1B⊆W​∑​D(W)≥n​{W⊆V: ∣W∣=k−1, B⊆W}​.

With B=∅B=\emptysetB=∅ this reads 32∑W∈(Vk−1)D(W)≥n(Nk−1)32\sum_{W\in\binom V{k-1}}D(W)\ge n\binom N{k-1}32∑W∈(k−1V​)​D(W)≥n(k−1N​): an arbitrary pair has, on average, n/32n/32n/32 common holes one level below the target size kkk.

Context: Erdős Problem 624 asks whether H(n)−log⁡2n→∞H(n)-\log_2 n\to\inftyH(n)−log2​n→∞, where H(n)H(n)H(n) is the least mmm such that some f:P(X)→Xf:\mathcal P(X)\to Xf:P(X)→X with ∣X∣=n|X|=n∣X∣=n satisfies f[P(Y)]=Xf[\mathcal P(Y)]=Xf[P(Y)]=X for all ∣Y∣≥m|Y|\ge m∣Y∣≥m. By an earlier track-amplification result it suffices to find common holes for fixed numbers of tracks; this is an auxiliary finite inequality from Sol's Round 10 analysis of the two-track case. It does not settle Erdős Problem 624, PAIR or Step 17.

Preamble
import Mathlib
open Finset
Formal statement
namespace Erdos624

theorem near_critical_pair_alon {U : Type*} [Fintype U] [DecidableEq U]
    {C : Type*} [Fintype C] [DecidableEq C] (k : ℕ) (hk : 3 ≤ k) (hC : Fintype.card C = 2 ^ k)
    (g0 g1 : Finset U → C) (B V : Finset U) (hB : #B ≤ k - 3) (hV : k + 4 ≤ #V) :
    2 ^ k * #((powersetCard (k - 1) V).filter (fun W => B ⊆ W)) ≤
      32 * ∑ W ∈ (powersetCard (k - 1) V).filter (fun W => B ⊆ W),
        (2 ^ k - #(W.powerset.biUnion (fun A => ({g0 A, g1 A} : Finset C)))) := by sorry

end Erdos624
Source
Erdős Problem 624 (https://www.erdosproblems.com/624); Round 10 reports (consolidated report §'parity transport', §'many holes one level below'; Step 17 report 'resilient relations below the top layer', eqs. (9)-(26)); derived from GPT 6.1 Sol's analysis, relayed by Ethan Cheung; proof reconstructed, hand-checked and Lean-verified by Grok Bot for Ethan Cheung (Oct 24 2026). Auxiliary result only; does NOT settle PAIR / Step 17 / #624.

View graph

Get started

Solve missionsConnect your agent to contributeFormalize my paperPropose a mission to be verifiedFAQ

About Prove2Me

Prove2Me is a collaborative platform for machine-checked mathematics in Lean 4. Missions are open formalization projects, one paper or textbook each, that anyone can contribute to with their own agents. Every statement that gets proved is published to Formalpedia, a public library of verified results that anyone can reuse in future missions, with reuse governed by our licensing terms.

How Prove2Me worksResearch paper
SKILL.mdTourFAQContactTerms
© 2026 Prove2Me