Contour shift of the holomorphic part of the smoothed Perron integral to :
ProvedDavenport.perron_holomorphic_shiftThroughout, is a fixed smoothing kernel: a function on supported in , nonnegative on , with ; Smooth1 ν ε is the smoothed indicator of obtained by Mellin convolution with the delta-spike (it equals on , on , and lies in ), and is its Mellin transform (Mathlib's mellin).
Statement. There is a constant (depending only on ) with the following property. Let , let be a finite set of points, let be an open set containing the closed rectangle , where and , and let . Assume is holomorphic on , on , and every has . Then for and ,
Since is bounded near each point of , these are removable singularities and extends holomorphically to ; Cauchy's theorem on the rectangle then moves the integral to the left side and the two horizontal sides, and the bound (valid for ) gives for the left side and for the horizontal sides. In the contour method, is the generating function with its polar parts removed, is the bound supplied by the zero-free region, and with produces the saving .
Formalization Note. Icc σ₁ σ₀ ×ℂ Icc (-T) T is the closed rectangle; the integral is written as . The set may meet the rectangle, including its boundary; the value of at points of is irrelevant.
import Definitions.Def_MellinCalculus_defs import Definitions.Def_ResidueCalcOnRectangles_defs import Mathlib.NumberTheory.LSeries.Basic import Mathlib.NumberTheory.ArithmeticFunction.VonMangoldt import Mathlib.Analysis.MellinTransform import Mathlib.Analysis.SpecialFunctions.Pow.Real import Mathlib.Analysis.SpecialFunctions.Pow.Complex import Mathlib.Analysis.SpecialFunctions.Log.Basic import Mathlib.Analysis.SpecialFunctions.Integrals.Basic import Mathlib.MeasureTheory.Integral.IntervalIntegral.Basic open Set MeasureTheory
namespace Davenport
theorem perron_holomorphic_shift {ν : ℝ → ℝ} (diffν : ContDiff ℝ 1 ν)
(suppν : ν.support ⊆ Icc (1 / 2) 2) (νnonneg : ∀ x > 0, 0 ≤ ν x)
(mass_one : ∫ x in Ioi (0 : ℝ), ν x / x = 1) :
∃ C : ℝ, 0 < C ∧
∀ (H : ℂ → ℂ) (P : Finset ℂ) (U : Set ℂ) (X : ℝ), 3 < X → ∀ ε : ℝ, 0 < ε → ε < 1 →
∀ σ₀ σ₁ T M : ℝ, 3 / 4 ≤ σ₁ → σ₁ < 1 → 1 < σ₀ → σ₀ ≤ 2 → 3 < T → 0 ≤ M →
IsOpen U → (Icc σ₁ σ₀ ×ℂ Icc (-T) T) ⊆ U →
DifferentiableOn ℂ H (U \ ↑P) →
(∀ s ∈ U \ ↑P, ‖H s‖ ≤ M) →
(∀ p ∈ P, p.re < σ₀) →
‖(1 / (2 * Real.pi * Complex.I)) * (Complex.I * ∫ t in (-T)..T,
H ((σ₀ : ℂ) + t * Complex.I)
* mellin (fun x ↦ (Smooth1 ν ε x : ℂ)) ((σ₀ : ℂ) + t * Complex.I)
* (X : ℂ) ^ ((σ₀ : ℂ) + t * Complex.I))‖
≤ C * M * (X ^ σ₁ / ε + X ^ σ₀ / (ε * T)) := by sorry
end Davenport