Tao Section 5: summing the Type I envelope, as the argument gives it
ProvedTaoFivePrimes.theorem51_typeI_block_summation_as_provedSumming the Type I pointwise envelope, with the constants the argument gives. Let with , let with , let and with , and let be any nonnegative function satisfying, for every positive odd ,
(the second alternative dropped when the sine vanishes). Then
This is the combinatorial half of the source's Type I estimate, separated from the analysis that produces the envelope, and with the two constants its own chain yields. Writing , the range of splits as follows. For one has , hence and , and the odd-restricted Vinogradov lemma bounds that contribution by . Each subsequent block , , has length exactly , so the same lemma applies with prefactor and the first alternative frozen at the block's left endpoint, giving . Summing the harmonic part by the integral test — including its term — produces the first term, and the rest is bounded by , which is at most since and .
Formalization Note is an arbitrary nonnegative function on , constrained only on the positive odd , so the statement is exactly the passage from the envelope to the two terms and says nothing about exponential sums. The index set is the platform's theorem51Divisors U V, and the sine is written .
import Mathlib import Definitions.Def_TaoFivePrimes_Theorem51Sums open Finset
theorem TaoFivePrimes.theorem51_typeI_block_summation_as_proved
(alpha beta : ℝ) (a : ℤ) (q : ℕ) (hq : 4 ≤ q) (haq : Nat.Coprime a.natAbs q)
(halpha : 4 * alpha = (a : ℝ) / q + beta) (hbeta : |beta| ≤ 1 / (q : ℝ) ^ 2)
(x U V : ℝ) (hx : 0 < x) (hU40 : 40 ≤ U) (hV40 : 40 ≤ V) (hUV : U * V ≤ x / 4)
(W : ℕ → ℝ) (hW0 : ∀ d, 0 ≤ W d)
(hWb : ∀ d ∈ TaoFivePrimes.theorem51Divisors U V,
W d ≤ (if Real.sin (Real.pi * (2 * alpha) * (d : ℝ)) = 0 then
(1 / 2) * (x / (d : ℝ)) * Real.log x + 4 * Real.log 2 * Real.log (2 * x)
else min ((1 / 2) * (x / (d : ℝ)) * Real.log x
+ 4 * Real.log 2 * Real.log (2 * x))
(4 * Real.log 2 * Real.log (2 * x)
/ |Real.sin (Real.pi * (2 * alpha) * (d : ℝ))|))) :
(∑ d ∈ TaoFivePrimes.theorem51Divisors U V, W d)
≤ (x / q) * Real.log x * (Real.log (2 * U * V / q + 4) + 4)
+ 1.78 * (U * V + (5 / 2) * q) * (8 + Real.log q) * Real.log (2 * x) := by sorry