Tao Section 5: the dyadic envelope for the Type II sum
ProvedTaoFivePrimes.theorem51_typeII_dyadic_envelopeThe dyadic envelope for Tao's Type II sum. Let with , let with , and let with , and . Then there is a nonnegative function on , supported in , with integrable on , such that
and
where is the bilinear Type II sum of the platform interface.
This is the whole arithmetic content of the source's Type II estimate. The function is
the dyadic block of the bilinear sum; the inequality comes from the dyadic integral representation of together with the triangle inequality, the support statement from the fact that the two blocks are both nonempty only for , and the pointwise envelope from the subdivision form of the odd bilinear large sieve with , using , , and the counting bounds for the two blocks. All of these ingredients are public and proved on the platform: TaoFivePrimes.eta0_dyadic_integral, TaoFivePrimes.large_sieve_subdivision, TaoFivePrimes.typeII_counting_bounds and TaoFivePrimes.typeII_sqrt_expansion.
Formalization Note The envelope carries the coefficient on , matching TaoFivePrimes.typeII_sqrt_expansion; the source's printed is a slip. Existential form is used so that this statement carries no commitment to a particular normalisation of the dyadic blocks.
import Mathlib import Definitions.Def_TaoFivePrimes_Theorem51Sums open MeasureTheory
theorem TaoFivePrimes.theorem51_typeII_dyadic_envelope
(x alpha beta : ℝ) (a : ℤ) (q : ℕ) (hq : 4 ≤ q)
(haq : Nat.Coprime a.natAbs q)
(halpha : 4 * alpha = (a : ℝ) / q + beta)
(hbeta : |beta| ≤ 1 / (q : ℝ) ^ 2)
(U V : ℝ) (hU40 : 40 ≤ U) (hV40 : 40 ≤ V) (hUx : U < x) (hVx : V < x)
(hUV : U * V ≤ x / 4) (hUV2 : x ≤ U * V ^ 2) :
∃ G : ℝ → ℝ,
(∀ W, 0 ≤ G W) ∧
(∀ W, W ∉ Set.Icc V (x / U) → G W = 0) ∧
MeasureTheory.IntegrableOn (fun W => G W / W) (Set.Ioi 0) ∧
(∀ W ∈ Set.Icc V (x / U),
G W ≤ (1.1 / 8) * ((1 / (2 * Real.sqrt 2)) * (x / Real.sqrt (q : ℝ))
+ (1 / 2) * Real.sqrt (x * W) + x / Real.sqrt W
+ Real.sqrt 2 * Real.sqrt (x * (q : ℝ))) * Real.log W) ∧
TaoFivePrimes.theorem51TypeII x alpha U V ≤ 4 * ∫ W in Set.Ioi (0:ℝ), G W / W := by sorry