Skip to content

Commit 9e65971

Browse files
authored
Merge branch 'main' into renameBusyBeaver
2 parents 7820f5f + 612182c commit 9e65971

File tree

33 files changed

+599
-174
lines changed

33 files changed

+599
-174
lines changed

.github/workflows/build-and-docs.yml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -130,7 +130,7 @@ jobs:
130130
shell: bash
131131
run: |
132132
cd docbuild
133-
lake exe overwrite_index ./out/index.html ./out/file_counts.html | tee -a "$GITHUB_STEP_SUMMARY"
133+
lake exe overwrite_index ./out/index.html ./out/file_counts_dark.html ./out/file_counts_white.html | tee -a "$GITHUB_STEP_SUMMARY"
134134
135135
- name: Upload docs
136136
id: deployment

FormalConjectures/ErdosProblems/1043.lean

Lines changed: 11 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -18,7 +18,14 @@ import FormalConjectures.Util.ProblemImports
1818
/-!
1919
# Erdős Problem 1043
2020
21-
*Reference:* [erdosproblems.com/1043](https://www.erdosproblems.com/1043)
21+
*References:*
22+
- [erdosproblems.com/1043](https://www.erdosproblems.com/1043)
23+
- [EHP58] Erdős, P. and Herzog, F. and Piranian, G., Metric properties of polynomials. J.
24+
Analyse Math. (1958), 125-148.
25+
- [Po59] Pommerenke, Ch., On some problems by Erdős, Herzog and Piranian. Michigan Math. J.
26+
(1959), 221-225.
27+
- [Po61] Pommerenke, Ch., On metric properties of complex polynomials. Michigan Math. J. (1961),
28+
97-115.
2229
-/
2330

2431
namespace Erdos1043
@@ -38,10 +45,10 @@ onto $\ell$ has measure at most $2$?
3845
3946
Pommerenke [Po61] proved that the answer is no.
4047
41-
[Po61] Pommerenke, Ch., _On metric properties of complex polynomials._ Michigan Math. J. (1961),
42-
97-115.
48+
This was formalized in Lean by Alexeev using Aristotle.
4349
-/
44-
@[category research solved, AMS 28 30]
50+
@[category research formally solved using lean4 at
51+
"https://github.com/plby/lean-proofs/blob/main/src/v4.24.0/ErdosProblems/Erdos1043.lean", AMS 28 30]
4552
theorem erdos_1043 :
4653
answer(False) ↔ ∀ (f : ℂ[X]), f.Monic → f.degree ≥ 1
4754
∃ (u : ℂ), ‖u‖ = 1

FormalConjectures/ErdosProblems/1067.lean

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -50,8 +50,11 @@ chromatic number $\aleph_1$?
5050
Komjáth [Ko13] proved that it is consistent that the answer is no. This was improved by
5151
Soukup [So15], who constructed a counterexample using no extra set-theoretical assumptions. A
5252
simpler elementary example was given by Bowler and Pitz [BoPi24].
53+
54+
This was formalized in Lean by Alexeev using Aristotle and Aleph Prover.
5355
-/
54-
@[category research solved, AMS 5]
56+
@[category research formally solved using lean4 at
57+
"https://github.com/plby/lean-proofs/blob/main/src/v4.24.0/ErdosProblems/Erdos1067.lean", AMS 5]
5558
theorem erdos_1067 :
5659
answer(False) ↔ ∀ (V : Type) (G : SimpleGraph V), G.chromaticCardinal = ℵ_ 1
5760
∃ (H : G.Subgraph), H.coe.chromaticCardinal = ℵ_ 1 ∧ InfinitelyConnected H.coe := by

FormalConjectures/ErdosProblems/1071.lean

Lines changed: 8 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -32,9 +32,14 @@ namespace Erdos1071
3232
def SegmentsDisjoint (seg1 seg2 : ℝ² × ℝ²) : Prop :=
3333
segment ℝ seg1.1 seg1.2 ∩ segment ℝ seg2.1 seg2.2 ⊆ {seg1.1, seg1.2, seg2.1, seg2.2}
3434

35-
/-- Can a finite set of disjoint unit segments in a unit square be maximal?
36-
Solved affirmatively by [Da85], who gave an explicit construction. -/
37-
@[category research solved, AMS 52]
35+
/--
36+
Can a finite set of disjoint unit segments in a unit square be maximal?
37+
Solved affirmatively by [Da85], who gave an explicit construction.
38+
39+
This was formalized in Lean by Alexeev using Aristotle and ChatGPT.
40+
-/
41+
@[category research formally solved using lean4 at
42+
"https://github.com/plby/lean-proofs/blob/main/src/v4.24.0/ErdosProblems/Erdos1071.lean", AMS 52]
3843
theorem erdos_1071a :
3944
answer(True) ↔ ∃ S : Finset (ℝ² × ℝ²),
4045
Maximal (fun T : Finset (ℝ² × ℝ²) =>
Lines changed: 69 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,69 @@
1+
/-
2+
Copyright 2026 The Formal Conjectures Authors.
3+
4+
Licensed under the Apache License, Version 2.0 (the "License");
5+
you may not use this file except in compliance with the License.
6+
You may obtain a copy of the License at
7+
8+
https://www.apache.org/licenses/LICENSE-2.0
9+
10+
Unless required by applicable law or agreed to in writing, software
11+
distributed under the License is distributed on an "AS IS" BASIS,
12+
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13+
See the License for the specific language governing permissions and
14+
limitations under the License.
15+
-/
16+
import FormalConjectures.Util.ProblemImports
17+
18+
/-!
19+
# Erdős Problem 1082
20+
21+
*Reference:* [erdosproblems.com/1082](https://www.erdosproblems.com/1082)
22+
-/
23+
24+
namespace Erdos1082
25+
26+
open EuclideanGeometry
27+
28+
/-- Given a finite set of points in the plane, we define the number of distinct distances between
29+
pairs of points.
30+
31+
TODO(csonne): Remove this once formal conjectures is bumped.
32+
-/
33+
noncomputable def distinctDistances (points : Finset ℝ²) : ℕ :=
34+
(points.offDiag.image fun (pair : ℝ² × ℝ²) => dist pair.1 pair.2).card
35+
36+
/-- The number of distinct distances from a finite set `points` to a point `pt`.
37+
38+
TODO(csonne): Move to ForMathlib.
39+
-/
40+
noncomputable def distinctDistancesFrom (points : Finset ℝ²) (pt : ℝ²) : ℕ :=
41+
(points.image fun x => dist x pt).card
42+
43+
/--
44+
Let $A\subset \mathbb{R}^2$ be a set of $n$ points with no three on a line.
45+
Does $A$ determine at least $\lfloor n/2\rfloor$ distinct distances?
46+
-/
47+
@[category research open, AMS 51]
48+
theorem erdos_1082a : answer(sorry) ↔ ∀ (A : Finset ℝ²) (hA_n3c : NonTrilinear A.toSet),
49+
A.card / 2 ≤ distinctDistances A:= by
50+
sorry
51+
52+
/--
53+
Let $A\subset \mathbb{R}^2$ be a set of $n$ points with no three on a line.
54+
Must there exist a single point from which there are at least $\lfloor n/2\rfloor$ distinct
55+
distances?
56+
57+
This question has been answered negatively by Xichuan in the
58+
[comments](https://www.erdosproblems.com/forum/thread/1082), who gave a set of $42$ points in
59+
$\mathbb{R}^2$, with no three on a line, such that each point determines only $20$ distinct distances.
60+
61+
A smaller counterexample has been formalised here: it comprised of $8$ points, where each point only
62+
determines $3$ distances.
63+
-/
64+
@[category research formally solved using formal_conjectures at "https://github.com/google-deepmind/formal-conjectures/blob/0aca4d71095301c0fd2dca32611b7addb2ea735c/FormalConjectures/ErdosProblems/1082.lean", AMS 51]
65+
theorem erdos_1082b : answer(False) ↔
66+
∀ (A : Finset ℝ²) (hA : A.Nonempty) (hA_n3c : NonTrilinear A.toSet),
67+
∃ (a : ℝ²) (ha : a ∈ A), A.card / 2 ≤ distinctDistancesFrom A a - 1 := by
68+
sorry
69+
end Erdos1082

FormalConjectures/ErdosProblems/125.lean

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -33,9 +33,9 @@ be the set of integers which have only the digits $0, 1$ when written base 4.
3333
Does $A + B$ have positive density?
3434
-/
3535

36-
@[category research open, AMS 11]
36+
@[category research formally solved using formal_conjectures at "https://github.com/google-deepmind/formal-conjectures/blob/300bf771bdbef43d7b9aa2521e633a50fd54dd28/FormalConjectures/ErdosProblems/125.lean", AMS 11]
3737
theorem erdos_125 :
38-
answer(sorry) ↔ ({ x : ℕ | (digits 3 x).toFinset ⊆ {0, 1} } +
38+
answer(False) ↔ ({ x : ℕ | (digits 3 x).toFinset ⊆ {0, 1} } +
3939
{ x : ℕ | (digits 4 x).toFinset ⊆ {0, 1} }).HasPosDensity := by
4040
sorry
4141

FormalConjectures/ErdosProblems/189.lean

Lines changed: 6 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -45,8 +45,12 @@ Solved (with answer `False`, as formalised below) in:
4545
Vjekoslav Kovač, "Coloring and density theorems for configurations of a given volume", 2023
4646
https://arxiv.org/abs/2309.09973
4747
In fact, Kovač's colouring is even Jordan measurable (the topological boundary of each
48-
monochromatic region is Lebesgue measurable and has measure zero). -/
49-
@[category research solved, AMS 5 51]
48+
monochromatic region is Lebesgue measurable and has measure zero).
49+
50+
This was formalized in Lean by Alexeev and Kovac using Aristotle.
51+
-/
52+
@[category research formally solved using lean4 at
53+
"https://github.com/plby/lean-proofs/blob/main/src/v4.24.0/ErdosProblems/Erdos189.lean", AMS 5 51]
5054
theorem erdos_189 :
5155
answer(False) ↔ Erdos189For
5256
(fun a b c d ↦

FormalConjectures/ErdosProblems/198.lean

Lines changed: 20 additions & 25 deletions
Original file line numberDiff line numberDiff line change
@@ -19,7 +19,10 @@ import FormalConjectures.Util.ProblemImports
1919
/-!
2020
# Erdős Problem 198
2121
22-
*Reference:* [erdosproblems.com/198](https://www.erdosproblems.com/198)
22+
*References:*
23+
- [erdosproblems.com/198](https://www.erdosproblems.com/198)
24+
- [Ba75] Baumgartner, James E., Partitioning vector spaces. J. Combinatorial Theory Ser. A (1975),
25+
231-233.
2326
-/
2427

2528
open Function Set Nat
@@ -31,9 +34,8 @@ positive integer. Then there is a set $X_k \subseteq V$ such that $X_k$ meets
3134
every infinite arithmetic progression in $V$ but $X_k$ intersects every
3235
$k$-element arithmetic progression in at most two points.
3336
34-
At the end of:
35-
* Baumgartner, James E., Partitioning vector spaces. J. Combinatorial Theory Ser. A (1975), 231-233.
36-
the author claims that by "slightly modifying the method of [his proof]", one can prove this. -/
37+
At the end of [Ba75] the author claims that by "slightly modifying the method of [his proof]", one
38+
can prove this. -/
3739
@[category research solved, AMS 5]
3840
lemma baumgartner_strong (V : Type*) [AddCommGroup V] [Module ℚ V] (k : ℕ) :
3941
∃ X : Set V,
@@ -50,31 +52,24 @@ lemma baumgartner_headline (V : Type*) [AddCommGroup V] [Module ℚ V] :
5052
baumgartner_strong V 3
5153

5254
/--
53-
If $A \subseteq \mathbb{N}$ is a Sidon set then must the complement of $A$ contain an infinite arithmetic
54-
progression?
55+
The answer is no; Erdős and Graham report this was proved by Baumgartner, presumably referring to
56+
the paper [Ba75], which does not state this exactly, but the following simple construction is
57+
implicit in [Ba75].
5558
56-
Answer "yes" according to remark on page 23 of:
59+
Let $P_1,P_2,\ldots$ be an enumeration of all countably many infinite arithmetic progressions. We
60+
choose $a_1$ to be the minimal element of $P_1\cap \mathbb{N}$, and in general choose $a_n$ to be an
61+
element of $P_n\cap \mathbb{N}$ such that $a_n>2a_{n-1}$. By construction $A=\{a_1 < a_2 < \cdots\}$
62+
contains at least one element from every infinite arithmetic progression, and is a lacunary set, so
63+
is certainly Sidon.
5764
65+
AlphaProof has found the following explicit construction: $A = \{ (n+1)!+n : n\geq 0\}$. This is a
66+
Sidon set, and intersects every arithmetic progression, since for any $a,d\in \mathbb{N}$,
67+
$(a+d+1)!+(a+d)\in A$, and $d$ divides $(a+d+1)!+d$.
5868
59-
- Erdös and Graham, "Old and new problems and results in combinatorial number theory", 1980.
60-
61-
62-
"Baumgartner also proved the conjecture of Erdös that if $A$ is a sequence of positive integers with
63-
all sums $a + a'$ distinct for $a, a' \in A$ then the complement of $A$ contains an
64-
infinite A.P."
65-
66-
67-
But this seems to be a misprint, since the opposite is true:
68-
There is a sequence of positive integers with all $a + a'$ distinct for $a, a' \in A$ such that the
69-
complement of $A$ contains no infinite A.P., i.e. there is a Sidon set $A$ which intersects all
70-
arithmetic progressions.
71-
72-
So the answer should be "no".
73-
74-
This can be seen, as pointed out by Thomas Bloom [erdosproblems.com/198](https://www.erdosproblems.com/198),
75-
by an elementary argument.
69+
This was formalized in Lean by Alexeev using Aristotle.
7670
-/
77-
@[category research solved, AMS 5 11]
71+
@[category research formally solved using lean4 at
72+
"https://github.com/plby/lean-proofs/blob/main/src/v4.24.0/ErdosProblems/Erdos198.lean", AMS 5 11]
7873
theorem erdos_198 : (∀ A : Set ℕ, IsSidon A → (∃ Y, IsAPOfLength Y ⊤ ∧ Y ⊆ Aᶜ)) ↔
7974
answer(False) := by
8075
sorry

FormalConjectures/ErdosProblems/229.lean

Lines changed: 12 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -19,24 +19,28 @@ import FormalConjectures.Util.ProblemImports
1919
/-!
2020
# Erdős Problem 229
2121
22-
*Reference:* [erdosproblems.com/229](https://www.erdosproblems.com/229)
22+
*References:*
23+
- [erdosproblems.com/229](https://www.erdosproblems.com/229)
24+
- [BaSc72] Barth, K. F. and Schneider, W. J., On a problem of Erd\H{o}s concerning the zeros of the
25+
derivatives of an entire function. Proc. Amer. Math. Soc. (1972), 229--232.
26+
- [Ha74] Hayman, W. K., Research problems in function theory: new problems. (1974), 155--180.
2327
-/
2428

2529
namespace Erdos229
2630

2731
/--
2832
Let $(S_n)_{n \ge 1}$ be a sequence of sets of complex numbers, none of which have a finite
2933
limit point. Does there exist an entire transcendental function $f(z)$ such that, for all $n \ge 1$, there
30-
exists some $k_n \ge 0$ such that
31-
$$
32-
f^{(k_n)}(z) = 0 \quad \text{for all } z \in S_n?
33-
$$
34+
exists some $k_n \ge 0$ such that $f^{(k_n)}(z) = 0$ for all $z \in S_n$.
35+
36+
This is Problem 2.30 in [Ha74], where it is attributed to Erdős.
3437
3538
Solved in the affirmative by Barth and Schneider [BaSc72].
3639
37-
[BaSc72] Barth, K. F. and Schneider, W. J., _On a problem of Erdős concerning the zeros of_
38-
_the derivatives of an entire function_. Proc. Amer. Math. Soc. (1972), 229--232. -/
39-
@[category research solved, AMS 30]
40+
This was formalized in Lean by Alexeev using Aristotle.
41+
-/
42+
@[category research formally solved using lean4 at
43+
"https://github.com/plby/lean-proofs/blob/main/src/v4.24.0/ErdosProblems/Erdos229.lean", AMS 30]
4044
theorem erdos_229 :
4145
letI := Polynomial.algebraPi ℂ ℂ ℂ
4246
answer(True) ↔ ∀ (S : ℕ → Set ℂ), (∀ n, derivedSet (S n) = ∅) →
Lines changed: 105 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,105 @@
1+
/-
2+
Copyright 2026 The Formal Conjectures Authors.
3+
4+
Licensed under the Apache License, Version 2.0 (the "License");
5+
you may not use this file except in compliance with the License.
6+
You may obtain a copy of the License at
7+
8+
https://www.apache.org/licenses/LICENSE-2.0
9+
10+
Unless required by applicable law or agreed to in writing, software
11+
distributed under the License is distributed on an "AS IS" BASIS,
12+
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13+
See the License for the specific language governing permissions and
14+
limitations under the License.
15+
-/
16+
17+
import FormalConjectures.Util.ProblemImports
18+
19+
/-!
20+
# Erdős Problem 241
21+
22+
*References:*
23+
- [erdosproblems.com/30](https://www.erdosproblems.com/30)
24+
- [erdosproblems.com/241](https://www.erdosproblems.com/241)
25+
- [BoCh62] Bose, R. C. and Chowla, S., Theorems in the additive theory of numbers. Comment. Math.
26+
Helv. (1962/63), 141-147.
27+
- [Gr01] Green, Ben, The number of squares and {$B_h[g]$} sets. Acta Arith. (2001), 365-390.
28+
- [Gu04] Guy, Richard K., Unsolved problems in number theory. (2004), xviii+437.
29+
-/
30+
31+
open Filter Finset
32+
open scoped Asymptotics Classical
33+
34+
namespace Erdos241
35+
36+
/--
37+
Let $f(N)$ be the maximum size of $A\subseteq \{1,\ldots,N\}$ such that the sums $a+b+c$ with
38+
$a,b,c\in A$ are all distinct (aside from the trivial coincidences).
39+
40+
Formalization note: this is generalized to allow for different $r$.
41+
-/
42+
noncomputable def f (N r : ℕ) : ℕ :=
43+
letI candidates := (Icc 1 N).powerset.filter (fun A ↦
44+
∀ m₁ m₂ : Multiset ℕ,
45+
m₁.card = r → m₂.card = r →
46+
(∀ x ∈ m₁, x ∈ A) → (∀ x ∈ m₂, x ∈ A) →
47+
m₁.sum = m₂.sum → m₁ = m₂)
48+
candidates.sup card
49+
50+
/--
51+
Is it true that $f(N)\sim N^{1/3}$?
52+
53+
Originally asked to Erdős by Bose.
54+
55+
This is discussed in problem C11 of Guy's collection [Gu04].
56+
-/
57+
@[category research open, AMS 5]
58+
theorem erdos_241 :
59+
answer(sorry) ↔ (fun N ↦ (f N 3 : ℝ)) ~[atTop] (fun N ↦ (N : ℝ) ^ ((1 : ℝ) / 3)) := by
60+
sorry
61+
62+
/--
63+
Bose and Chowla [BoCh62] provided a construction proving one half of this, namely
64+
$(1+o(1))N^{1/3}\leq f(N)$.
65+
-/
66+
@[category research solved, AMS 5]
67+
theorem erdos_241.variants.lower_bound :
68+
∃ ε : ℕ → ℝ, ε =o[atTop] (fun _ ↦ (1 : ℝ)) ∧
69+
∀ᶠ N in atTop, (1 + ε N) * (N : ℝ) ^ ((1 : ℝ) / 3) ≤ (f N 3 : ℝ) := by
70+
sorry
71+
72+
/--
73+
The best upper bound known to date is due to Green [Gr01], $f(N) \leq ((7/2)^{1/3}+o(1))N^{1/3}$.
74+
(note that $(7/2)^{1/3}\approx 1.519$).
75+
-/
76+
@[category research solved, AMS 5]
77+
theorem erdos_241.variants.upper_bound :
78+
∃ ε : ℕ → ℝ, ε =o[atTop] (fun _ ↦ (1 : ℝ)) ∧
79+
∀ᶠ N in atTop, (f N 3 : ℝ) ≤ ((7 / 2 : ℝ) ^ ((1 : ℝ) / 3) + ε N) * (N : ℝ) ^ ((1 : ℝ) / 3) := by
80+
sorry
81+
82+
/--
83+
The conjecture that the size of the set $A\subseteq \{1,\ldots,N\}$ is asymptotically $N^{1/r}$.
84+
-/
85+
def BoseChowlaConjecture (r : ℕ) : Prop :=
86+
(fun N ↦ (f N r : ℝ)) ~[atTop] (fun N ↦ (N : ℝ) ^ ((1 : ℝ) / r))
87+
88+
/--
89+
More generally, Bose and Chowla [BoCh62] conjectured that the maximum size of
90+
$A\subseteq \{1,\ldots,N\}$ with all $r$-fold sums distinct (aside from the trivial coincidences)
91+
then $\lvert A\rvert \sim N^{1/r}.$
92+
-/
93+
@[category research open, AMS 5]
94+
theorem erdos_241.variants.generalization (r : ℕ) (hr : r ≥ 2) : BoseChowlaConjecture r := by
95+
sorry
96+
97+
/--
98+
This is known only for $r=2$ (see [erdosproblems.com/30]).
99+
-/
100+
@[category research solved, AMS 5]
101+
theorem erdos_241.variants.r_eq_2 :
102+
BoseChowlaConjecture 2 := by
103+
sorry
104+
105+
end Erdos241

0 commit comments

Comments
 (0)