Skip to main content
AlexKontorovich/PrimeNumberTheoremAnd
Source indexedtheorem ยท leanprover/lean4:v4.32.0

fourierIntegral_self_add_deriv_deriv

PrimeNumberTheoremAnd.Fourier ยท PrimeNumberTheoremAnd/Fourier.lean:59 to 67

Mathematical statement

Exact Lean statement

theorem fourierIntegral_self_add_deriv_deriv (f : W21) (u : โ„) :
    (1 + u ^ 2) * ๐“• (f : โ„ โ†’ โ„‚) u =
      ๐“• (fun u : โ„ => (f u - (1 / (4 * ฯ€ ^ 2)) * deriv^[2] f u : โ„‚)) u

Complete declaration

Lean source

Canonical source
Full Lean sourceLean 4
theorem fourierIntegral_self_add_deriv_deriv (f : W21) (u : โ„) :    (1 + u ^ 2) * ๐“• (f : โ„ โ†’ โ„‚) u =      ๐“• (fun u : โ„ => (f u - (1 / (4 * ฯ€ ^ 2)) * deriv^[2] f u : โ„‚)) u := by  have l1 : Integrable (fun x => (((ฯ€ : โ„‚) ^ 2)โปยน * 4โปยน) * deriv (deriv f) x) := by    apply Integrable.const_mul ; simpa [iteratedDeriv_succ] using f.integrable le_rfl  have l4 : Differentiable โ„ f := f.differentiable  have l5 : Differentiable โ„ (deriv f) := f.deriv.differentiable  simp [f.hf, l1, add_mul, Real.fourier_deriv f.hf' l5 f.hf'', Real.fourier_deriv f.hf l4 f.hf']  field_simp [pi_ne_zero] ; ring_nf ; simp