FormalConjectures/OEIS/11545.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
7 declarations, 2 contain sorry, 0 declared as axioms
$a(n)$ is the integer whose decimal digits are the first $n+1$ decimal digits of $\pi$
References:
Imports (1)
- def
OeisA11545.aa n is the integer whose decimal digits are the first $n+1$ decimal digits of $\pi$ line 34 sourceSource documentation
a n is the integer whose decimal digits are the first $n+1$ decimal digits of $\pi$.
standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
NatProof uses:
Int.toNat,Int.floor,Real,HMul.hMul,Real.pi,HPow.hPow,OfNat.ofNat14 instances, coercions and auxiliary constants left out.
noncomputable def a (n : ℕ) : ℕ := …
- theorem
OeisA11545.a_0line 38 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Eq,Nat, OeisA11545.a,OfNat.ofNatProof uses:
id,of_eq_true,Int.toNat,Int.floor,Real,HMul.hMul,Real.pi,HPow.hPow,Eq.trans,True,congrFun',congrArg,Int,Int.toNat.match_1,Mathlib.Meta.NormNum.IsNat.to_eq,Mathlib.Meta.NormNum.isNat_pow,Eq.refl,Mathlib.Meta.NormNum.isNat_ofNat,Mathlib.Meta.NormNum.instAtLeastTwo,Mathlib.Meta.NormNum.isNat_natCastand 18 more47 instances, coercions and auxiliary constants left out.
Tactic trace: 2 steps
Open to load the checked before-and-after goal states.
- theorem
OeisA11545.a_1line 44 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Eq,Nat, OeisA11545.a,OfNat.ofNatProof uses:
Eq.mpr,Int.toNat,Int.floor,Real,HMul.hMul,Real.pi,id,congrFun',congrArg,Int,HPow.hPow,Eq.trans,Nat.cast_one,pow_one,congr_arg,Iff.mpr,And,LE.le,LT.lt,HAdd.hAddand 97 more99 instances, coercions and auxiliary constants left out.
Tactic trace: 5 steps
Open to load the checked before-and-after goal states.
- theorem
OeisA11545.a_2line 51 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Eq,Nat, OeisA11545.a,OfNat.ofNatProof uses:
id,Eq.trans,Int.toNat,Int.floor,Real,HMul.hMul,Real.pi,HPow.hPow,Int,congr_arg,Iff.mpr,And,LE.le,LT.lt,HAdd.hAdd,Int.floor_eq_iff,And.intro,Mathlib.Tactic.LinearCombination.le_of_lt,OfScientific.ofScientific,Bool.trueand 101 more99 instances, coercions and auxiliary constants left out.
Tactic trace: 6 steps
Open to load the checked before-and-after goal states.
- theorem
OeisA11545.a_3line 58 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Eq,Nat, OeisA11545.a,OfNat.ofNatProof uses:
Eq.symm,Eq.mpr,Int.toNat,Int.floor,Real,HMul.hMul,Real.pi,Mathlib.Meta.NormNum.instAtLeastTwo,id,congrArg,Int,HPow.hPow,Mathlib.Meta.NormNum.IsNat.to_eq,Mathlib.Meta.NormNum.isNat_pow,Eq.refl,Mathlib.Meta.NormNum.isNat_ofNat,Mathlib.Meta.NormNum.isNat_natCast,Mathlib.Meta.NormNum.IsNatPowT.run,Mathlib.Meta.NormNum.IsNatPowT.bit1,congr_argand 95 more99 instances, coercions and auxiliary constants left out.
Tactic trace: 5 steps
Open to load the checked before-and-after goal states.
- theorem
OeisA11545.conjecture1Wolfgang Haken (1977) conjectured that no term of this sequence is a perfect square, and estimated the probability that this conjecture is false to be smaller than $10^-9$ sorry line 70 sourceSource documentation
Wolfgang Haken (1977) conjectured that no term of this sequence is a perfect square, and estimated the probability that this conjecture is false to be smaller than $10^-9$.
depends on sorry what this means
Statement uses:
Nat,Not,IsSquare, OeisA11545.aProof uses:
sorryAx,Lean.Name,Bool.false,Lean.Name.num,Lean.Name.str,Lean.Name.anonymous,OfNat.ofNat3 instances, coercions and auxiliary constants left out.
Tactic trace: 1 steps
Open to load the checked before-and-after goal states.
theorem conjecture1 : ∀ n, ¬ IsSquare (a n) := by …
Mentions: OeisA11545.a
- theorem
OeisA11545.conjecture2Number of collisions occurring in a system consisting of an infinitely massive, rigid wall at the origin, a ball with mass m stationary at position sorry line 85 sourceSource documentation
Number of collisions occurring in a system consisting of an infinitely massive, rigid wall at the origin, a ball with mass m stationary at position $x_1 > 0$, and a ball with mass $(10^2n)m$ at position $x_2 > x_1$ and rolling toward the origin, assuming perfectly elastic collisions and no friction.
Strictly speaking, this property, which is equivalent to the statement that the interval $(m\pi, \pi/\textrm{arctan}(1/m))$ does not contain an integer for all $m = 10^n$, is not known to be true for sure. In other words, we do not know for certain that A332045 does not contain a power of $10$.
depends on sorry what this means
Statement uses:
Nat,Not,Exists,Int,And,LT.lt,Real,HMul.hMul,Real.pi,HPow.hPow,OfNat.ofNat,HDiv.hDiv,Real.arctanProof uses:
sorryAx,Lean.Name,Bool.false,Lean.Name.num,Lean.Name.str,Lean.Name.anonymous42 instances, coercions and auxiliary constants left out.
Tactic trace: 1 steps
Open to load the checked before-and-after goal states.
theorem conjecture2 : ∀ n : ℕ, ¬ ∃ (k : ℤ), (Real.pi * (10 : ℝ) ^ n.cast < k.cast) ∧ (k.cast < Real.pi / Real.arctan (1 / (10 : ℝ) ^ n.cast)) := by …