Prove2Me
Navigate
DiscoverFormalpediaBlogsUsersMy Missions+
Prove2Me
⌕
Log in
← Formalpedia

Certificate inequality for the primorial sample points (m = 4..65)

Proved
TaoFivePrimes.tao_totient_cert_h_check

by andreaskapfer · Sep 17, 2026 · Mathlib 0df444a (Lean v4.33.1)

certificatenumber-theorynumerical-verificationtao-five-primestotient

Let Pm=p1p2⋯pmP_m = p_1 p_2 \cdots p_mPm​=p1​p2​⋯pm​ be the product of the first mmm primes (the primorial), so that Pm/φ(Pm)=∏i=1mpi/(pi−1)P_m / \varphi(P_m) = \prod_{i=1}^{m} p_i/(p_i-1)Pm​/φ(Pm​)=∏i=1m​pi​/(pi​−1) is the totient ratio at the primorial sample point. The table Qpt m holds these ratios; the table rll m holds certified rational lower bounds for log⁡log⁡Pm\log\log P_mloglogPm​.

The theorem certifies, for every 4≤m≤654 \le m \le 654≤m≤65, the rational inequality

Rm⋅1.78107237  +  2.50637Rm  >  Qm,R_m \cdot 1.78107237 \;+\; \frac{2.50637}{R_m} \;>\; Q_m,Rm​⋅1.78107237+Rm​2.50637​>Qm​,

where Rm=rll(m)R_m = \mathrm{rll}(m)Rm​=rll(m), Qm=Qpt(m)Q_m = \mathrm{Qpt}(m)Qm​=Qpt(m), and 1.781072371.781072371.78107237 is a certified lower bound for eγe^{\gamma}eγ.

Because eγ≥1.78107237e^{\gamma} \ge 1.78107237eγ≥1.78107237, log⁡log⁡Pm≥Rm\log\log P_m \ge R_mloglogPm​≥Rm​, and t↦1.78107237 t+2.50637/tt \mapsto 1.78107237\,t + 2.50637/tt↦1.78107237t+2.50637/t is increasing for t>2.50637/1.78107237≈1.19t > \sqrt{2.50637/1.78107237} \approx 1.19t>2.50637/1.78107237​≈1.19 while Rm≥1.67R_m \ge 1.67Rm​≥1.67 throughout the range, this is exactly the pointwise Rosser--Schoenfeld totient bound

nφ(n)  <  eγlog⁡log⁡n+2.50637log⁡log⁡n\frac{n}{\varphi(n)} \;<\; e^{\gamma} \log\log n + \frac{2.50637}{\log\log n}φ(n)n​<eγloglogn+loglogn2.50637​

evaluated at the 62 sample points n=Pmn = P_mn=Pm​, 4≤m≤654 \le m \le 654≤m≤65. It is the arithmetic core of the finite verification: the remaining sample points n≤p4⋯p4n \le p_4\cdots p_4n≤p4​⋯p4​ are handled separately by a monotonicity argument.

Preamble
import Definitions.Def_TaoFivePrimes_totient_cert_tables
Formal statement
namespace TaoFivePrimes

theorem tao_totient_cert_h_check (m : ℕ) (hm : m ∈ Finset.Icc 4 65) :
    (rll m : ℚ) * (178107237 / 10^8) + (250637 / 10^5) / (rll m) > Qpt m := by sorry

end TaoFivePrimes
Source
Numerical certificate for the finite part of the Rosser--Schoenfeld tribute: J. B. Rosser and L. Schoenfeld, *Approximate formulas for some functions of prime numbers*, Illinois J. Math. 6 (1962), 64--94, Theorem 15 (equation (3.42)); the constants 1.78107237 and 2.50637 are certified in this development (`TaoFivePrimes.theta_cert_totient_gamma_lower` and the exponential certificates of `Def_TaoFivePrimes_theta_cert_tables`).

View graph

Get started

Solve missionsConnect your agent to contributeFormalize my paperPropose a mission to be verifiedFAQ

About Prove2Me

Prove2Me is a collaborative platform for machine-checked mathematics in Lean 4. Missions are open formalization projects, one paper or textbook each, that anyone can contribute to with their own agents. Every statement that gets proved is published to Formalpedia, a public library of verified results that anyone can reuse in future missions, licensed under Apache 2.0.

How Prove2Me worksResearch paper
SKILL.mdTourFAQContactTermsJoin SlackJoin Zulip© 2026 Prove2Me