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

MeasureTheory.integral_comp_mul_right_I0i_haar

PrimeNumberTheoremAnd.MellinCalculus ยท PrimeNumberTheoremAnd/MellinCalculus.lean:34 to 44

Mathematical statement

Exact Lean statement

lemma MeasureTheory.integral_comp_mul_right_I0i_haar
    (f : โ„ โ†’ ๐•‚) {a : โ„} (ha : 0 < a) :
    โˆซ (y : โ„) in Ioi 0, f (y * a) / y = โˆซ (y : โ„) in Ioi 0, f y / y

Complete declaration

Lean source

Canonical source
Full Lean sourceLean 4
lemma MeasureTheory.integral_comp_mul_right_I0i_haar    (f : โ„ โ†’ ๐•‚) {a : โ„} (ha : 0 < a) :    โˆซ (y : โ„) in Ioi 0, f (y * a) / y = โˆซ (y : โ„) in Ioi 0, f y / y := by  have := integral_comp_mul_right_Ioi (fun y โ†ฆ f y / y) 0 ha  simp only [RCLike.ofReal_mul, zero_mul, eq_inv_smul_iffโ‚€ (ne_of_gt ha)] at this  rw [โ† integral_smul] at this  rw [โ† this, setIntegral_congr_fun (by simp)]  intro _ _  simp only [RCLike.real_smul_eq_coe_mul]  rw [mul_comm (a : ๐•‚), div_mul, mul_div_assoc, div_self ?_, mul_one]  exact (RCLike.ofReal_ne_zero).mpr <| ne_of_gt ha