FormalConjectures/ErdosProblems/56.lean
Explanation legend Lean4 Domain Explanation Language (L4DEL)
L4DEL explanations are a separate layer. They do not change the Lean source. Intuition is explanatory prose; numbered items are a reading path; sources link the wording back to evidence.
- L4DEL
- Lean4 Domain Explanation Language
Credit: The upstream authors and contributors retain credit for the project and mathematics. lean4-explainer only renders their pinned source and adds the separately disclosed explanation layer.
Project sources: Pinned project documentation, Formal Conjectures paper, arXiv v1
14 declarations, 1 contain sorry, 0 declared as axioms
Erdős Problem 56
Reference: erdosproblems.com/56
Imports (1)
Imported by 1 file
- def
Erdos56.WeaklyDivisibleSay a set of natural numbers isk-weakly divisible if anyk+1elements ofAare not relatively prime line 35 sourceSource documentation
Say a set of natural numbers is
k-weakly divisible if anyk+1elements ofAare not relatively prime.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,FinsetProof uses:
Membership.mem,Finset.powersetCard,HAdd.hAdd,OfNat.ofNat,Not,Set.Pairwise,Nat.Coprime6 instances, coercions and auxiliary constants left out.
def WeaklyDivisible (k : ℕ) (A : Finset ℕ) : Prop := …
- lemma
Erdos56.weaklyDivisible_emptyline 39 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat, Erdos56.WeaklyDivisible,EmptyCollection.emptyCollection,FinsetProof uses:
of_eq_true,Membership.mem,Finset.powersetCard,HAdd.hAdd,OfNat.ofNat,Not,Set.Pairwise,Nat.Coprime,Eq.trans,Eq,Finset.card,True,forall_congr,And,implies_congr,LE.le,congrFun',congrArg,Eq.refl,Falseand 4 more25 instances, coercions and auxiliary constants left out.
Tactic trace: 1 steps
Open to load the checked before-and-after goal states.
- lemma
Erdos56.weaklyDivisible_singletonA singleton isk-weakly divisible ifk ≠ 0line 44 sourceSource documentation
A singleton is
k-weakly divisible ifk ≠ 0.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,Ne,OfNat.ofNat, Erdos56.WeaklyDivisible,Singleton.singleton,FinsetProof uses:
of_eq_true,Membership.mem,Finset.powersetCard,HAdd.hAdd,Not,Set.Pairwise,Nat.Coprime,Eq.trans,And,Eq,Finset.card,EmptyCollection.emptyCollection,True,Or,forall_congr,implies_congr,LE.le,congrFun',congrArg,Eq.refland 9 more30 instances, coercions and auxiliary constants left out.
Tactic trace: 1 steps
Open to load the checked before-and-after goal states.
lemma weaklyDivisible_singleton {k : ℕ} (hk : k ≠ 0) (l : ℕ) : WeaklyDivisible k {l} := by …Mentions: Erdos56.WeaklyDivisible
- lemma
Erdos56.not_weaklyDivisible_zeroNo non-empty set is1-weakly divisible line 49 sourceSource documentation
No non-empty set is
1-weakly divisible.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Finset,Nat,Finset.Nonempty,Not, Erdos56.WeaklyDivisible,OfNat.ofNatProof uses:
Eq.mpr,Exists,And,LE.le,Eq,Finset.card,Set.Pairwise,Nat.Coprime,id,Eq.trans,congrArg,forall_congr,Membership.mem,Finset.powersetCard,HAdd.hAdd,implies_congr,congrFun',zero_add,Eq.refl,funextand 12 more24 instances, coercions and auxiliary constants left out.
Tactic trace: 2 steps
Open to load the checked before-and-after goal states.
lemma not_weaklyDivisible_zero {A : _} (h : A.Nonempty) : ¬WeaklyDivisible 0 A := by …Mentions: Erdos56.WeaklyDivisible
- lemma
Erdos56.empty_iff_weaklyDivisible_zeroline 53 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Finset,Nat,Iff, Erdos56.WeaklyDivisible,OfNat.ofNat,Eq,EmptyCollection.emptyCollectionProof uses:
Iff.intro,Iff.mp,Not,Finset.Nonempty,Finset.not_nonempty_iff_eq_empty,mt, Erdos56.not_weaklyDivisible_zero,Iff.mpr,Classical.not_not,Eq.rec, Erdos56.weaklyDivisible_empty,Eq.symm4 instances, coercions and auxiliary constants left out.
- def
Erdos56.MaxWeaklyDivisibleMaxWeaklyDivisible N kis the size of the largest k-weakly divisible subset of{1,..., N}line 60 sourceSource documentation
MaxWeaklyDivisible N kis the size of the largest k-weakly divisible subset of{1,..., N}standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
NatProof uses:
SupSet.sSup,Set.ofPred,Exists,Finset,LE.le,Finset.Icc,OfNat.ofNat, Erdos56.WeaklyDivisible,Eq,Finset.card7 instances, coercions and auxiliary constants left out.
noncomputable def MaxWeaklyDivisible (N : ℕ) (k : ℕ) : ℕ := …
- theorem
Erdos56.maxWeaklyDivisible_zeroline 64 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,Eq, Erdos56.MaxWeaklyDivisible,OfNat.ofNatProof uses:
of_eq_true,Eq.trans,Nat.find,True,Membership.mem,Set,Set.ofPred,And, Erdos56.WeaklyDivisible,EmptyCollection.emptyCollection,Finset,LE.le,DecidablePred,Exists,congrArg,funext,forall_congr,implies_congr,Eq.refl,implies_trueand 22 more44 instances, coercions and auxiliary constants left out.
Tactic trace: 2 steps
Open to load the checked before-and-after goal states.
- theorem
Erdos56.maxWeaklyDivisible_oneline 69 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,Ne,OfNat.ofNat,Eq, Erdos56.MaxWeaklyDivisibleProof uses:
Set,Set.ofPred,Exists,Finset,And, Erdos56.WeaklyDivisible,Or,EmptyCollection.emptyCollection,Singleton.singleton,Finset.card,Insert.insert,Set.ext,Iff.intro,Membership.mem,Eq.mpr,id,Eq.trans,congrArg,congrFun',of_eq_trueand 32 more49 instances, coercions and auxiliary constants left out.
Tactic trace: 10 steps
Open to load the checked before-and-after goal states.
- theorem
Erdos56.maxWeaklyDivisible_zero_kline 78 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,Eq, Erdos56.MaxWeaklyDivisible,OfNat.ofNatProof uses:
of_eq_true,Eq.trans,True,congrFun',congrArg,SupSet.sSup,Set.ofPred,Exists,Finset,LE.le,Finset.Icc, Erdos56.WeaklyDivisible,Finset.card,Singleton.singleton,Set,funext,And,EmptyCollection.emptyCollection,propext,exists_prop_congrand 6 more20 instances, coercions and auxiliary constants left out.
Tactic trace: 1 steps
Open to load the checked before-and-after goal states.
- def
Erdos56.FirstPrimesMultiplesFirstPrimesMultiples N kis the set of numbers in{1,..., N}that are a multiple of one of the firstkprimes line 85 sourceSource documentation
FirstPrimesMultiples N kis the set of numbers in{1,..., N}that are a multiple of one of the firstkprimes.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,FinsetProof uses:
Finset.filter,Exists,And,LT.lt,Dvd.dvd,Nat.nth,Nat.Prime,Finset.Icc,OfNat.ofNat7 instances, coercions and auxiliary constants left out.
noncomputable def FirstPrimesMultiples (N k : ℕ) : Finset ℕ := …
- theorem
Erdos56.firstPrimesMultiples_one_card_zeroline 89 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,Eq,Finset.card, Erdos56.FirstPrimesMultiples,OfNat.ofNatProof uses:
Eq.mpr,LT.lt,Not,Nat.nth,Nat.Prime,id,Eq.trans,Finset,ite,Exists,And,Singleton.singleton,EmptyCollection.emptyCollection,congrFun',congrArg,Finset.filter,Dvd.dvd,Finset.Icc,Finset.filter.congr_simp,Eq.refland 16 more22 instances, coercions and auxiliary constants left out.
Tactic trace: 7 steps
Open to load the checked before-and-after goal states.
- theorem
Erdos56.firstPrimesMultiples_zero_k_card_zeroline 99 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,Eq,Finset.card, Erdos56.FirstPrimesMultiples,OfNat.ofNatProof uses:
of_eq_true,Eq.trans,True,congrFun',congrArg,Finset,EmptyCollection.emptyCollection,Finset.filter,Exists,And,LT.lt,Dvd.dvd,Nat.nth,Nat.Prime,Finset.Icc,False,Finset.filter_congr,Membership.mem,Iff.of_eq,funextand 3 more20 instances, coercions and auxiliary constants left out.
Tactic trace: 1 steps
Open to load the checked before-and-after goal states.
- lemma
Erdos56.weaklyDivisible_firstPrimesMultiplesAn example of ak-weakly divisible set is the subset of{1, ..., N}containing the multiples of the firstkprimes line 107 sourceSource documentation
An example of a
k-weakly divisible set is the subset of{1, ..., N}containing the multiples of the firstkprimes.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat, Erdos56.WeaklyDivisible, Erdos56.FirstPrimesMultiplesProof uses:
id,Finset,Membership.mem,Finset.powersetCard,HAdd.hAdd,OfNat.ofNat,Subtype,Fin,Exists,And,LT.lt,Dvd.dvd,Nat.nth,Nat.Prime,And.right,Finset.Icc,Iff.mp,Finset.filter,Finset.mem_filter,And.leftand 38 more35 instances, coercions and auxiliary constants left out.
Tactic trace: 35 steps
Open to load the checked before-and-after goal states.
lemma weaklyDivisible_firstPrimesMultiples (N k : ℕ) : WeaklyDivisible k (FirstPrimesMultiples N k) := by …Mentions: Erdos56.WeaklyDivisible, Erdos56.FirstPrimesMultiples
- theorem
Erdos56.erdos_56Suppose $A \subseteq \{1,\dots,N\}$ is such that there are no $k+1$ elements of $A$ which are relatively prime sorry line 152 sourceSource documentation
Suppose $A \subseteq \{1,\dots,N\}$ is such that there are no $k+1$ elements of $A$ which are relatively prime. An example is the set of all multiples of the first $k$ primes. Is this the largest such set? To avoid trivial counterexamples, we must insist that $N$ be at least the $k$th prime.
depends on sorry what this means
Statement uses:
Iff,False,Nat,GT.gt,OfNat.ofNat,GE.ge,Nat.nth,Nat.Prime,HSub.hSub,Eq, Erdos56.MaxWeaklyDivisible,Finset.card, Erdos56.FirstPrimesMultiplesProof uses:
sorryAx,Lean.Name,Bool.false,Lean.Name.num,Lean.Name.str,Lean.Name.anonymous10 instances, coercions and auxiliary constants left out.
Tactic trace: 1 steps
Open to load the checked before-and-after goal states.
theorem erdos_56 : answer(False) ↔ ∀ᵉ (k > 0) (N ≥ (k-1).nth Nat.Prime), (MaxWeaklyDivisible N k = (FirstPrimesMultiples N k).card) := by …Mentions: Erdos56.MaxWeaklyDivisible, Erdos56.FirstPrimesMultiples