Lean lemmas for the HPS coefficient and Lieb's pair inequality
The algebraic pieces of Hundertmark–Pattakos–Schulz, arXiv:2504.18487v1, Proposition 2.5, and the triangle inequality Lieb uses for . This folder does not formalize HVZ, the quadratic-form remainder, or a bound on the excess charge.
Pinned toolchain: Lean 4.32.0, mathlib v4.32.0. The Lake
packagesDir is ../../../.lake/packages, so this problem and
problems/brocard/lean share one mathlib checkout.
Replay
From this directory:
export PATH="$HOME/.elan/bin:$PATH"
lake exe cache get
lake build
lake build checks four libraries: B3NatWitness, HPSRational,
HPSCoefficient, LiebPair.
If the mathlib download fails, the integer witnesses still check without Lake:
lean B3NatWitness.lean
What is proved
HPSCoefficient.lean defines
and proves the printed enclosures and . The argument isolates for , uses , and compares the cubic at the two rational endpoints.
LiebPair.lean proves that for in
one has . That is the
triangle inequality. It is not the full Lieb ionization bound.
B3NatWitness.lean and HPSRational.lean record the same
comparisons after the radicals are cleared, as Nat inequalities
and as real inequalities that need only Mathlib.Data.Real.Basic.