Skip to main content
AlexKontorovich/PrimeNumberTheoremAnd
Source indexedlemma · leanprover/lean4:v4.32.0

Kadiri.kadiri_laplace_positive_line_pv

PrimeNumberTheoremAnd.IEANTN.KadiriEq13 · PrimeNumberTheoremAnd/IEANTN/KadiriEq13.lean:320 to 344

Mathematical statement

Exact Lean statement

lemma kadiri_laplace_positive_line_pv {φ : ℝ → ℂ}
    (hφ : ContDiff ℝ 1 φ) {b : ℝ} (_hb : 0 < b)
    (hφ_decay : (fun x : ℝ ↦ φ x * exp ((x : ℂ) / 2))
        =O[Filter.cocompact ℝ] fun x : ℝ ↦ Real.exp (-(1/2 + b) * |x|))
    {a x : ℝ} (ha : 0 < a) (hab : a < b) (hx : 0 < x) :
    Filter.Tendsto (fun T : ℝ => laplaceIntegralCpowTrunc φ a x T)
      Filter.atTop (nhds (φ (Real.log x)))

Complete declaration

Lean source

Canonical source
Full Lean sourceLean 4
lemma kadiri_laplace_positive_line_pv {φ :   ℂ}    (hφ : ContDiff  1 φ) {b : } (_hb : 0 < b)    (hφ_decay : (fun x :   φ x * exp ((x : ℂ) / 2))        =O[Filter.cocompact ] fun x :   Real.exp (-(1/2 + b) * |x|))    {a x : } (ha : 0 < a) (hab : a < b) (hx : 0 < x) :    Filter.Tendsto (fun T :  => laplaceIntegralCpowTrunc φ a x T)      Filter.atTop (nhds (φ (Real.log x))) := by  have h_weighted :      Integrable (fun y :  => exp (-((a : ℂ) * (y : ℂ))) * φ y) :=    kadiri_laplace_positive_line_weight_integrable hφ hφ_decay ha hab  have hq :      IntervalIntegrable        (fun u :  =>          if u = 0 then 0 else            (1 / (Real.pi * u) : ℂ) •              (exp (-((a : ℂ) * ((Real.log x - u : ) : ℂ))) *                  φ (Real.log x - u) -                exp (-((a : ℂ) * (Real.log x : ℂ))) *                  φ (Real.log x)))        volume (-1) 1 := by    simpa using kadiri_laplace_line_local_quotient_integrable:= φ) hφ a (Real.log x) (by norm_num : (0 : ) < 1)  exact kadiri_laplaceIntegralCpowTrunc_tendsto_of_integrable_local_quotient    (sigma := a) (f := φ) (x := x) (R := 1) hx    (by norm_num : (0 : ) < 1) h_weighted hq