@@ -120,7 +120,6 @@ theorem Measurable.map_prodMk_right {μ : Measure α} [SFinite μ] :
120120
121121/-- The Lebesgue integral is measurable. This shows that the integrand of (the right-hand-side of)
122122 Tonelli's theorem is measurable. -/
123- @ [fun_prop, measurability]
124123theorem Measurable.lintegral_prod_right' [SFinite ν] :
125124 ∀ {f : α × β → ℝ≥0 ∞}, Measurable f → Measurable fun x => ∫⁻ y, f (x, y) ∂ν := by
126125 have m := @measurable_prodMk_left
@@ -142,22 +141,20 @@ theorem Measurable.lintegral_prod_right' [SFinite ν] :
142141/-- The Lebesgue integral is measurable. This shows that the integrand of (the right-hand-side of)
143142 Tonelli's theorem is measurable.
144143 This version has the argument `f` in curried form. -/
145- @ [fun_prop, measurability ]
144+ @[fun_prop]
146145theorem Measurable.lintegral_prod_right [SFinite ν] {f : α → β → ℝ≥0 ∞}
147146 (hf : Measurable (uncurry f)) : Measurable fun x => ∫⁻ y, f x y ∂ν :=
148147 hf.lintegral_prod_right'
149148
150149/-- The Lebesgue integral is measurable. This shows that the integrand of (the right-hand-side of)
151150 the symmetric version of Tonelli's theorem is measurable. -/
152- @ [fun_prop, measurability]
153151theorem Measurable.lintegral_prod_left' [SFinite μ] {f : α × β → ℝ≥0 ∞} (hf : Measurable f) :
154152 Measurable fun y => ∫⁻ x, f (x, y) ∂μ :=
155153 (measurable_swap_iff.mpr hf).lintegral_prod_right'
156154
157155/-- The Lebesgue integral is measurable. This shows that the integrand of (the right-hand-side of)
158156 the symmetric version of Tonelli's theorem is measurable.
159157 This version has the argument `f` in curried form. -/
160- @ [fun_prop, measurability]
161158theorem Measurable.lintegral_prod_left [SFinite μ] {f : α → β → ℝ≥0 ∞}
162159 (hf : Measurable (uncurry f)) : Measurable fun y => ∫⁻ x, f x y ∂μ :=
163160 hf.lintegral_prod_left'
@@ -963,24 +960,22 @@ theorem AEMeasurable.comp_snd {f : β → γ} (hf : AEMeasurable f ν) :
963960 AEMeasurable (fun z : α × β => f z.2 ) (μ.prod ν) :=
964961 hf.comp_quasiMeasurePreserving quasiMeasurePreserving_snd
965962
966- @ [fun_prop, measurability]
967963theorem AEMeasurable.lintegral_prod_right' [SFinite ν] {f : α × β → ℝ≥0 ∞}
968964 (hf : AEMeasurable f (μ.prod ν)) : AEMeasurable (fun x ↦ ∫⁻ y, f (x, y) ∂ν) μ := by
969965 obtain ⟨g, hg, hfg⟩ := hf
970966 refine ⟨fun x ↦ ∫⁻ y, g (x, y) ∂ν, by fun_prop, ?_⟩
971967 exact (ae_ae_of_ae_prod hfg).mono fun x hfg' ↦ lintegral_congr_ae hfg'
972968
973- @ [fun_prop, measurability ]
969+ @[fun_prop]
974970theorem AEMeasurable.lintegral_prod_right [SFinite ν] {f : α → β → ℝ≥0 ∞}
975971 (hf : AEMeasurable f.uncurry (μ.prod ν)) : AEMeasurable (fun x ↦ ∫⁻ y, f x y ∂ν) μ :=
976972 hf.lintegral_prod_right'
977973
978- @ [fun_prop, measurability]
979974theorem AEMeasurable.lintegral_prod_left' [SFinite ν] [SFinite μ] {f : α × β → ℝ≥0 ∞}
980975 (hf : AEMeasurable f (μ.prod ν)) : AEMeasurable (fun y ↦ ∫⁻ x, f (x, y) ∂μ) ν :=
981976 hf.prod_swap.lintegral_prod_right'
982977
983- @ [fun_prop, measurability ]
978+ @[fun_prop]
984979theorem AEMeasurable.lintegral_prod_left [SFinite ν] [SFinite μ] {f : α → β → ℝ≥0 ∞}
985980 (hf : AEMeasurable f.uncurry (μ.prod ν)) : AEMeasurable (fun y ↦ ∫⁻ x, f x y ∂μ) ν :=
986981 hf.lintegral_prod_left'
0 commit comments