The pole-subtracted Fourier identity on the boundary line
ProvedTauCeti.LSeries.tsum_term_mul_fourier_sub_pole_eq_integral_boundarynumber-theorytauceti-chebotarev
Let , , and , absolutely convergent on . Suppose is continuous on and on . Use the Fourier convention . Fix and an integrable, compactly supported . Assume is integrable on and the Fourier-weighted series below converges absolutely. Then
This expresses the tested coefficient sum directly in terms of the pole and the continuous boundary remainder.
Source: the Tau Ceti contributors (Apache-2.0, commit 948fe4751b1fe528b6d580c522ca5d743d47f185).
Preamble
/- Transplanted from https://github.com/TauCetiProject/TauCeti at 948fe4751b1fe528b6d580c522ca5d743d47f185.
Original source copyright/license notices are retained below.
Generated exclusively from compiler declaration, command, and reference facts. -/
import Mathlib.Analysis.Distribution.SchwartzSpace.Fourier
import Mathlib.Analysis.Fourier.FourierTransform
import Mathlib.Analysis.SpecialFunctions.ImproperIntegrals
import Mathlib.Analysis.SpecialFunctions.Pow.Real
import Mathlib.MeasureTheory.Integral.DominatedConvergence
import Mathlib.NumberTheory.LSeries.Deriv
section
set_option autoImplicit true
/-
Copyright (c) 2026 The Tau Ceti contributors. All rights reserved.
Released under Apache 2.0 license as described in the file LICENSE.
Authors: The Tau Ceti contributors
-/
/-!
# The limiting Fourier identity for Wiener--Ikehara
`TauCeti.LSeries.tsum_term_mul_fourier_sub_pole_eq_integral` tests a Dirichlet series against an
integrable function on a vertical line `Re s = sigma` strictly inside the half-plane of
convergence. This file lets `sigma` decrease to `1` and records the resulting identity on the
boundary line itself.
Each of the three terms of that identity has its own limit argument, and each is stated separately
so that a later step can reuse it: the Dirichlet series converges by the uniform convergence of a
summable Dirichlet series on a closed half-plane, while the two integrals converge by dominated
convergence, the pole term because the exponential damping `exp (-u (sigma - 1))` is bounded on
the half-line of integration, and the vertical integral because a test function with compact
support confines the integrand to a compact box on which `G` is continuous.
Only the pole-subtracted remainder `G` is assumed continuous on the closed half-plane
`Re s ≥ 1`; nothing is assumed about `LSeries a` there, where it is a total function with junk
values.
## Main results
* `TauCeti.LSeries.tendsto_tsum_term_mul_fourier` and
`TauCeti.LSeries.tendsto_integral_vertical` are two of the three one-sided limits; the third,
for the pole term, is the general `TauCeti.tendsto_integral_exp_mul`.
* `TauCeti.LSeries.tsum_term_mul_fourier_sub_pole_eq_integral_boundary` is the identity they
combine into, and
`TauCeti.LSeries.tsum_term_mul_fourier_sub_pole_eq_integral_boundary_of_contDiff` is its form
for a smooth test function, where the half-line integrability hypothesis is automatic by
`TauCeti.integrable_fourier_of_contDiff_of_hasCompactSupport`.
## Provenance
The decomposition into three separate one-sided limits, and the shape of the identity they
combine into, follow `limiting_fourier_lim1`, `limiting_fourier_lim2`, `limiting_fourier_lim3`
and `limiting_fourier` in `PrimeNumberTheoremAnd/Wiener.lean` of the Apache-2.0
`AxiomMath/PrimeNumberTheoremAnd` repository, revision
`2667e414c38e5a5dc9aa1946f16f13001e5cd3ed`, the same source as the sibling file
`TauCeti.NumberTheory.LSeries.WienerIkehara.Fourier`. The proofs here are written against
Mathlib's uniform- and dominated-convergence lemmas, and the hypotheses differ: the Chebyshev-type
bound of the source is replaced by the summability of the Fourier-weighted series at `s = 1`,
which is what the limit actually consumes.
## References
* J. Korevaar, *Tauberian Theory: A Century of Developments*, Chapter III.
-/
section
namespace TauCeti.LSeries
end TauCeti.LSeries
section TauCeti.LSeries
open TauCeti TauCeti.LSeries
open Complex Filter FourierTransform MeasureTheory Real Set
open scoped ContDiff Topology
variable {a : ℕ → ℂ} {psi : ℝ → ℂ} {G : ℂ → ℂ} {A : ℂ} {x : ℝ}
/-! ### The Dirichlet series -/
/-! ### The integral along the vertical line -/
/-! ### The identity on the boundary line -/
Formal statement
theorem TauCeti.LSeries.tsum_term_mul_fourier_sub_pole_eq_integral_boundary (hx : 0 < x)
(hG : _root_.ContinuousOn G {z : ℂ | 1 ≤ z.re})
(hG' : ∀ z : ℂ, 1 < z.re → G z = _root_.LSeries a z - A / (z - 1))
(hsum : ∀ sigma : ℝ, 1 < sigma → _root_.LSeriesSummable a sigma)
(hpsi : _root_.MeasureTheory.Integrable psi) (hsupp : _root_.HasCompactSupport psi)
(hFint : _root_.MeasureTheory.IntegrableOn (fun u : ℝ ↦ 𝓕 psi (u / (2 * π))) (_root_.Set.Ici (-_root_.Real.log x)))
(hFsum : _root_.LSeriesSummable
(fun n : ℕ ↦ a n * 𝓕 psi (1 / (2 * π) * _root_.Real.log (n / x))) 1) :
(∑' n : ℕ, _root_.LSeries.term a 1 n * 𝓕 psi (1 / (2 * π) * _root_.Real.log (n / x))) -
A * ∫ u in _root_.Set.Ici (-_root_.Real.log x), 𝓕 psi (u / (2 * π)) =
∫ t : ℝ, G (1 + t * _root_.Complex.I) * psi t * (x : ℂ) ^ (t * _root_.Complex.I) := by sorry
Source