FormalConjectures/OEIS/317940.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
17 declarations, 1 contain sorry, 0 declared as axioms
Nonnegativity of the Dirichlet square root of A046644
A317940 is the integer sequence whose value a n is the numerator of the
rational sequence f n, where the Dirichlet convolution square of f is
A046644. The auxiliary sequence A046644 is multiplicative and takes the value
$2^{\operatorname{A005187}(e)}$ on a prime power $p^e$.
The conjecture asks whether f n is nonnegative for every positive n.
The proof reduces the problem to prime powers and constructs positive rational
coefficients $c(e)$ satisfying
$$\sum_{i=0}^e c(i)c(e-i)=2^{\operatorname{A005187}(e)}.$$
The coefficients are obtained from formal power series. A positive series $A$ is defined by the first-order differential equation $A' = \frac12 D A$. A second explicitly defined series $B$ satisfies $B' = D B$ and has the same constant term as $A^2$; uniqueness of the coefficient recurrence therefore gives $A^2=B$. After rescaling the coefficients by $4^e$, this becomes the displayed prime-power convolution identity.
Extending $c(e)$ multiplicatively over prime factorizations gives a positive
arithmetic function root with root * root = a046644. Finally, the recursive
definition of f is shown to be the unique Dirichlet square root with value
one at $1$, so f = root and every positive-index value of f is positive.
This route was found by first exploiting the multiplicativity recorded in the OEIS entry, reducing the recurrence to the exponent of a single prime, and then recognizing the resulting coefficient identities as a formal-power-series differential equation.
References:
Imports (1)
- def
OeisA317940.a005187A005187: the sum of $\lfloor e / 2^k \rfloor$ over $k \ge 0$ line 67 sourceSource documentation
A005187: the sum of $\lfloor e / 2^k \rfloor$ over $k \ge 0$.
standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
NatProof uses:
Finset.sum,Finset.range,HAdd.hAdd,OfNat.ofNat,HDiv.hDiv,HPow.hPow10 instances, coercions and auxiliary constants left out.
noncomputable def a005187 (e : ℕ) : ℕ := …
- def
OeisA317940.a046644A046644: the multiplicative function whose value at each prime power $p^e$ is $2^{\operatorname{A005187}(e)}$ line 74 sourceSource documentation
A046644: the multiplicative function whose value at each prime power $p^e$ is $2^{\operatorname{A005187}(e)}$.
standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,RatProof uses:
ite,Eq,OfNat.ofNat,Finsupp.prod,Nat.factorization,HPow.hPow, OeisA317940.a0051878 instances, coercions and auxiliary constants left out.
noncomputable def a046644 (n : ℕ) : ℚ := …
- def
OeisA317940.fThe rational sequence whose Dirichlet convolution square is A046644, written using the defining recurrence from the OEIS entry line 82 sourceSource documentation
The rational sequence whose Dirichlet convolution square is A046644, written using the defining recurrence from the OEIS entry.
standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,RatProof uses:
WellFounded.fix,WellFoundedRelation.rel,measure,id,ite,Eq,OfNat.ofNat, OeisA317940.a046644,Finset.sum,Nat.divisors,dite,And,GT.gt,LT.lt,HDiv.hDiv,HMul.hMul,Not,HSub.hSub17 instances, coercions and auxiliary constants left out.
Tactic trace: 1 steps
Open to load the checked before-and-after goal states.
noncomputable def f : ℕ → ℚ := …
- def
OeisA317940.aA317940: the numerator off nline 100 sourceSource documentation
A317940: the numerator of
f n.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Nat,IntProof uses:
Rat.num, OeisA317940.fnoncomputable def a (n : ℕ) : ℤ := …
- lemma
OeisA317940.f_eqThe defining recurrence off, with the recursive calls folded back tofline 105 sourceSource documentation
The defining recurrence of
f, with the recursive calls folded back tof.private lemma f_eq (n : ℕ) : f n = if n = 0 then 0 else if n = 1 then 1 else (a046644 n - ∑ d ∈ n.divisors, if _h : 1 < d ∧ d < n then f d * f (n / d) else 0) / 2 := by …Mentions: OeisA317940.f, OeisA317940.a046644
- lemma
OeisA317940.f_oneline 113 source - lemma
OeisA317940.f_primeAt a primepevery divisor is1orp, so the interior sum is empty line 118 sourceSource documentation
At a prime
pevery divisor is1orp, so the interior sum is empty.private lemma f_prime {p : ℕ} (hp : p.Prime) : f p = a046644 p / 2 := by …Mentions: OeisA317940.f, OeisA317940.a046644
- lemma
OeisA317940.f_twoline 127 source - lemma
OeisA317940.f_threeline 131 source - lemma
OeisA317940.f_fiveline 135 source - lemma
OeisA317940.f_four4 = 2 ^ 2is the only case here with a nonempty interior sum, contributingf 2 * f 2line 140 sourceSource documentation
4 = 2 ^ 2is the only case here with a nonempty interior sum, contributingf 2 * f 2.private lemma f_four : f 4 = 7 / 2 := by …
Mentions: OeisA317940.f
- theorem
OeisA317940.a_1f 1 = 1is the base case of the recurrence, soa 1 = 1line 154 sourceSource documentation
f 1 = 1is the base case of the recurrence, soa 1 = 1.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Eq,Int, OeisA317940.a,OfNat.ofNat,NatProof uses:
Eq.mpr,Rat.num, OeisA317940.f,id,congrArg,OeisA317940.a.eq_1,Rat,Eq.refl6 instances, coercions and auxiliary constants left out.
Tactic trace: 2 steps
Open to load the checked before-and-after goal states.
theorem a_1 : a 1 = 1 := by …
Mentions: OeisA317940.a
- theorem
OeisA317940.a_22is prime, so the interior sum is empty andf 2 = a046644 2 / 2 = 1line 160 sourceSource documentation
2is prime, so the interior sum is empty andf 2 = a046644 2 / 2 = 1.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Eq,Int, OeisA317940.a,OfNat.ofNat,NatProof uses:
Eq.mpr,Rat.num, OeisA317940.f,id,congrArg,OeisA317940.a.eq_1,Rat,Eq.refl6 instances, coercions and auxiliary constants left out.
Tactic trace: 2 steps
Open to load the checked before-and-after goal states.
theorem a_2 : a 2 = 1 := by …
Mentions: OeisA317940.a
- theorem
OeisA317940.a_33is prime, so the interior sum is empty andf 3 = a046644 3 / 2 = 1line 166 sourceSource documentation
3is prime, so the interior sum is empty andf 3 = a046644 3 / 2 = 1.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Eq,Int, OeisA317940.a,OfNat.ofNat,NatProof uses:
Eq.mpr,Rat.num, OeisA317940.f,id,congrArg,OeisA317940.a.eq_1,Rat,Eq.refl6 instances, coercions and auxiliary constants left out.
Tactic trace: 2 steps
Open to load the checked before-and-after goal states.
theorem a_3 : a 3 = 1 := by …
Mentions: OeisA317940.a
- theorem
OeisA317940.a_44is the first index with a nonempty interior sum, givingf 4 = 7 / 2line 172 sourceSource documentation
4is the first index with a nonempty interior sum, givingf 4 = 7 / 2.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Eq,Int, OeisA317940.a,OfNat.ofNat,NatProof uses:
Eq.mpr,Rat.num, OeisA317940.f,id,congrArg,OeisA317940.a.eq_1,HDiv.hDiv,Rat,Mathlib.Meta.NormNum.isNat_eq_true,Mathlib.Meta.NormNum.instAddMonoidWithOne,Mathlib.Meta.NormNum.IsInt.to_isNat,Mathlib.Meta.NormNum.isInt_ratNum,Int.ofNat,Mathlib.Meta.NormNum.IsNNRat.to_isRat,inferInstance,DivisionRing,Mathlib.Meta.NormNum.isNNRat_div,Mathlib.Meta.NormNum.isNNRat_mul,HMul.hMul,Inv.invand 7 more28 instances, coercions and auxiliary constants left out.
Tactic trace: 2 steps
Open to load the checked before-and-after goal states.
theorem a_4 : a 4 = 7 := by …
Mentions: OeisA317940.a
- theorem
OeisA317940.a_55is prime, so the interior sum is empty andf 5 = a046644 5 / 2 = 1line 178 sourceSource documentation
5is prime, so the interior sum is empty andf 5 = a046644 5 / 2 = 1.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Eq,Int, OeisA317940.a,OfNat.ofNat,NatProof uses:
Eq.mpr,Rat.num, OeisA317940.f,id,congrArg,OeisA317940.a.eq_1,Rat,Eq.refl6 instances, coercions and auxiliary constants left out.
Tactic trace: 2 steps
Open to load the checked before-and-after goal states.
theorem a_5 : a 5 = 1 := by …
Mentions: OeisA317940.a
- theorem
OeisA317940.f_nonnegativesorry line 201 sourcedepends on sorry what this means
Statement uses:
Nat,GT.gt,OfNat.ofNat,GE.ge,Rat, OeisA317940.fProof uses:
sorryAx,Lean.Name,Bool.false,Lean.Name.num,Lean.Name.str,Lean.Name.anonymous8 instances, coercions and auxiliary constants left out.
Tactic trace: 1 steps
Open to load the checked before-and-after goal states.