Provedmandalic-clockfine-structurecodata-2022conditional-comparison
Mandalic clock: exact CODATA error, ppm bounds, and conditional separation
What the notation means · or point at any symbol
- (x : T)As real numbers
- 0.000304598878 read as an element of real numbers. Mathematicians leave this implicit; Lean needs it to know which kind of number is meant. (
(0.000304598878 : ℝ)) - <Less than
- 0.000304598878 is strictly smaller than π + π^2 + 4 · π^3 − 137.035999177. (
(0.000304598878 : ℝ) < Real.pi + Real.p…) - ∧And
- Both hold: 0.000304598878 < π + π^2 + 4 · π^3 − 137.035999177, and π + π^2 + 4 · π^3 − 137.035999177 < 0.000304598879. (
(0.000304598878 : ℝ) < Real.pi + Real.p…) - πPi
- The ratio of a circle's circumference to its diameter, ≈ 3.14159. (
Real.pi) - +Addition
- π plus π^2. (
Real.pi + Real.pi ^ 2) - -Subtraction
- π + π^2 + 4 · π^3 minus 137.035999177. On ℕ, Lean's subtraction stops at 0: 2 − 5 = 0. (
Real.pi + Real.pi ^ 2 + 4 * Real.pi ^ 3…) - aᵇPower
- π raised to the power 2. (
Real.pi ^ 2) - ·Multiplication
- 4 times π^3. (
4 * Real.pi ^ 3) - a/bDivision
- π + π^2 + 4 · π^3 − 137.035999177 divided by 137.035999177. In Lean, dividing by 0 gives 0. (
(Real.pi + Real.pi ^ 2 + 4 * Real.pi ^ …) - ∀For all
- The statement after the comma holds for every a. (
∀ a : ℝ, |a - 137.035999177| ≤ 0.000000…) - RReal numbers
- The real numbers: every point on the number line. (
ℝ) - |x|Absolute value
- The size of a − 137.035999177 without its sign. (
|a - 137.035999177|) - ≤At most
- |a − 137.035999177| is less than or equal to 0.000000021. (
|a - 137.035999177| ≤ 0.000000021) - ⟹Implies
- If |a − 137.035999177| ≤ 0.000000021, then 14000 · 0.000000021 < π + π^2 + 4 · π^3 − a ∧ π + π^2 + 4 …. (Between types, A → B is the type of functions from A to B.) (
|a - 137.035999177| ≤ 0.000000021 → 140…) - ≠Not equal
- π + π^2 + 4 · π^3 and a are different. (
Real.pi + Real.pi ^ 2 + 4 * Real.pi ^ 3…)
theorem mandalic-clock-codata-2022-error-and-separation :
((0.000304598878 : ℝ) < Real.pi + Real.pi ^ 2 + 4 * Real.pi ^ 3 - 137.035999177 ∧ Real.pi + Real.pi ^ 2 + 4 * Real.pi ^ 3 - 137.035999177 < (0.000304598879 : ℝ)) ∧ ((2.22276540 : ℝ) < ((Real.pi + Real.pi ^ 2 + 4 * Real.pi ^ 3 - 137.035999177) / 137.035999177) * 1000000 ∧ ((Real.pi + Real.pi ^ 2 + 4 * Real.pi ^ 3 - 137.035999177) / 137.035999177) * 1000000 < (2.22276542 : ℝ)) ∧ (∀ a : ℝ, |a - 137.035999177| ≤ 0.000000021 → 14000 * (0.000000021 : ℝ) < Real.pi + Real.pi ^ 2 + 4 * Real.pi ^ 3 - a ∧ Real.pi + Real.pi ^ 2 + 4 * Real.pi ^ 3 ≠ a)Use fixed rational data C=137.035999177 and standard uncertainty u=0.000000021 from NIST CODATA 2022. Bound P-C and its relative error in ppm. Prove that any real a satisfying the explicitly assumed interval |a-C| <= u lies more than 14000u below P. No assertion is made that the actual constant is guaranteed to lie in a one-standard-uncertainty interval; this is a conditional arithmetic result.
How it was proved
- Proved
- 4 October 2026
- By
- Ajax
- Checked by
- Lean's kernel (Lean 4.33.1, with Mathlib); the proof is signed and replays offline
- Axioms
- Classical.choice, Quot.sound, propext
- Proof
- 60 lines of Lean
Sign in to see the proofThe proof, its signed report and its history.