Skip to content

Commit 48b12e1

Browse files
committed
feat: tag the pointwise MeasureTheory operation families with to_fun (leanprover-community#41091)
Co-authored-by: Terence Tao <tao@math.ucla.edu>
1 parent 67b4a95 commit 48b12e1

16 files changed

Lines changed: 80 additions & 92 deletions

File tree

Mathlib/Analysis/Calculus/Rademacher.lean

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -109,7 +109,7 @@ theorem integral_inv_smul_sub_mul_tendsto_integral_lineDeriv_mul
109109
apply tendsto_integral_filter_of_dominated_convergence (fun x ↦ (C * ‖v‖) * ‖g x‖)
110110
· filter_upwards with t
111111
apply AEStronglyMeasurable.mul ?_ hg.aestronglyMeasurable
112-
apply aestronglyMeasurable_const.smul
112+
apply aestronglyMeasurable_const.fun_smul
113113
apply AEStronglyMeasurable.sub _ hf.continuous.measurable.aestronglyMeasurable
114114
apply AEMeasurable.aestronglyMeasurable
115115
exact hf.continuous.measurable.comp_aemeasurable' (aemeasurable_id'.add_const _)
@@ -134,7 +134,7 @@ theorem integral_inv_smul_sub_mul_tendsto_integral_lineDeriv_mul'
134134
(K.indicator (fun x ↦ (C * ‖v‖) * ‖g x‖))
135135
· filter_upwards with t
136136
apply AEStronglyMeasurable.mul ?_ hg.aestronglyMeasurable
137-
apply aestronglyMeasurable_const.smul
137+
apply aestronglyMeasurable_const.fun_smul
138138
apply AEStronglyMeasurable.sub _ hf.continuous.measurable.aestronglyMeasurable
139139
apply AEMeasurable.aestronglyMeasurable
140140
exact hf.continuous.measurable.comp_aemeasurable' (aemeasurable_id'.add_const _)

Mathlib/Analysis/Fourier/FourierTransform.lean

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -140,7 +140,7 @@ theorem fourierIntegral_convergent_iff (he : Continuous e)
140140
have aux {g : V → E} (hg : Integrable g μ) (x : W) :
141141
Integrable (fun v : V ↦ e (-L v x) • g v) μ := by
142142
have c : Continuous fun v ↦ e (-L v x) := he.comp (hL.comp (.prodMk_left _)).neg
143-
simp_rw [← integrable_norm_iff (c.aestronglyMeasurable.smul hg.1), Circle.norm_smul]
143+
simp_rw [← integrable_norm_iff (c.aestronglyMeasurable.fun_smul hg.1), Circle.norm_smul]
144144
exact hg.norm
145145
-- then use it for both directions
146146
refine ⟨fun hf ↦ ?_, fun hf ↦ aux hf w⟩
@@ -196,7 +196,7 @@ theorem integral_fourierIntegral_swap
196196
apply this.mono
197197
· change AEStronglyMeasurable (fun p : W × V ↦ (M (g p.1) (e (-(L p.2) p.1) • f p.2))) _
198198
have A : AEStronglyMeasurable (fun (p : W × V) ↦ e (-L p.2 p.1) • f p.2) (ν.prod μ) := by
199-
refine (Continuous.aestronglyMeasurable ?_).smul hf.1.comp_snd
199+
refine (Continuous.aestronglyMeasurable ?_).fun_smul hf.1.comp_snd
200200
exact he.comp (hL.comp continuous_swap).neg
201201
have A' : AEStronglyMeasurable (fun p ↦ (g p.1, e (-(L p.2) p.1) • f p.2) : W × V → F × E)
202202
(Measure.prod ν μ) := hg.1.comp_fst.prodMk A

Mathlib/Analysis/Fourier/FourierTransformDeriv.lean

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -197,7 +197,7 @@ lemma _root_.MeasureTheory.AEStronglyMeasurable.fourierSMulRight
197197
{L : V →L[ℝ] W →L[ℝ] ℝ} {f : V → E} {μ : Measure V}
198198
(hf : AEStronglyMeasurable f μ) :
199199
AEStronglyMeasurable (fun v ↦ fourierSMulRight L f v) μ := by
200-
apply AEStronglyMeasurable.const_smul'
200+
apply AEStronglyMeasurable.fun_const_smul
201201
have aux0 : Continuous fun p : (W →L[ℝ] ℝ) × E ↦ p.1.smulRight p.2 :=
202202
(ContinuousLinearMap.smulRightL ℝ W E).continuous₂
203203
have aux1 : AEStronglyMeasurable (fun v ↦ (L v, f v)) μ :=
@@ -224,7 +224,7 @@ theorem hasFDerivAt_fourierIntegral
224224
have h1 : ∀ᶠ w' in 𝓝 w, AEStronglyMeasurable (F w') μ :=
225225
Eventually.of_forall (fun w' ↦ (h0 w').aestronglyMeasurable)
226226
have h3 : AEStronglyMeasurable (F' w) μ := by
227-
refine .smul ?_ hf.1.fourierSMulRight
227+
refine .fun_smul ?_ hf.1.fourierSMulRight
228228
refine (continuous_fourierChar.comp ?_).aestronglyMeasurable
229229
fun_prop
230230
have h4 : (∀ᵐ v ∂μ, ∀ (w' : W), w' ∈ Metric.ball w 1 → ‖F' w' v‖ ≤ B v) := by
@@ -433,7 +433,7 @@ lemma _root_.MeasureTheory.AEStronglyMeasurable.fourierPowSMulRight
433433
(hf : AEStronglyMeasurable f μ) (n : ℕ) :
434434
AEStronglyMeasurable (fun v ↦ fourierPowSMulRight L f v n) μ := by
435435
simp_rw [fourierPowSMulRight_eq_comp]
436-
apply AEStronglyMeasurable.const_smul'
436+
apply AEStronglyMeasurable.fun_const_smul
437437
apply (smulRightL ℝ (fun (_ : Fin n) ↦ W) E).continuous₂.comp_aestronglyMeasurable₂ _ hf
438438
apply Continuous.aestronglyMeasurable
439439
exact Continuous.comp (map_continuous _) (continuous_pi (fun _ ↦ L.continuous))

Mathlib/MeasureTheory/Function/SpecialFunctions/Basic.lean

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -56,7 +56,7 @@ lemma aemeasurable_of_aemeasurable_exp_mul {t : ℝ}
5656
(ht : t ≠ 0) (hf : AEMeasurable (fun x ↦ exp (t * f x)) μ) :
5757
AEMeasurable f μ := by
5858
simpa only [mul_div_cancel_left₀ _ ht]
59-
using (aemeasurable_of_aemeasurable_exp hf).div (aemeasurable_const (b := t))
59+
using (aemeasurable_of_aemeasurable_exp hf).fun_div (aemeasurable_const (b := t))
6060

6161
theorem measurable_sin : Measurable sin :=
6262
continuous_sin.measurable

Mathlib/MeasureTheory/Function/SpecialFunctions/RCLike.lean

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -66,14 +66,14 @@ theorem RCLike.measurable_ofReal : Measurable ((↑) : ℝ → 𝕜) :=
6666
theorem measurable_of_re_im (hre : Measurable fun x => RCLike.re (f x))
6767
(him : Measurable fun x => RCLike.im (f x)) : Measurable f := by
6868
convert!
69-
Measurable.add (M := 𝕜) (RCLike.measurable_ofReal.comp hre)
69+
Measurable.fun_add (M := 𝕜) (RCLike.measurable_ofReal.comp hre)
7070
((RCLike.measurable_ofReal.comp him).mul_const RCLike.I)
7171
exact (RCLike.re_add_im _).symm
7272

7373
theorem aemeasurable_of_re_im (hre : AEMeasurable (fun x => RCLike.re (f x)) μ)
7474
(him : AEMeasurable (fun x => RCLike.im (f x)) μ) : AEMeasurable f μ := by
7575
convert!
76-
AEMeasurable.add (M := 𝕜) (RCLike.measurable_ofReal.comp_aemeasurable hre)
76+
AEMeasurable.fun_add (M := 𝕜) (RCLike.measurable_ofReal.comp_aemeasurable hre)
7777
((RCLike.measurable_ofReal.comp_aemeasurable him).mul_const RCLike.I)
7878
exact (RCLike.re_add_im _).symm
7979

Mathlib/MeasureTheory/Function/StronglyMeasurable/AEStronglyMeasurable.lean

Lines changed: 16 additions & 15 deletions
Original file line numberDiff line numberDiff line change
@@ -296,7 +296,7 @@ lemma of_measurableSpace_le_on {m' m₀ : MeasurableSpace α} {μ : Measure[m₀
296296

297297
section Arithmetic
298298

299-
@[to_additive (attr := fun_prop)]
299+
@[to_fun (attr := to_additive (attr := fun_prop))]
300300
protected theorem mul [Mul β] [ContinuousMul β] (hf : AEStronglyMeasurable[m] f μ)
301301
(hg : AEStronglyMeasurable[m] g μ) : AEStronglyMeasurable[m] (f * g) μ :=
302302
⟨hf.mk f * hg.mk g, by fun_prop, hf.ae_eq_mk.mul hg.ae_eq_mk⟩
@@ -311,17 +311,17 @@ protected theorem const_mul [Mul β] [ContinuousMul β] (hf : AEStronglyMeasurab
311311
AEStronglyMeasurable[m] (fun x => c * f x) μ :=
312312
aestronglyMeasurable_const.mul hf
313313

314-
@[to_additive (attr := fun_prop)]
314+
@[to_fun (attr := to_additive (attr := fun_prop))]
315315
protected theorem inv [Inv β] [ContinuousInv β] (hf : AEStronglyMeasurable[m] f μ) :
316316
AEStronglyMeasurable[m] f⁻¹ μ :=
317317
⟨(hf.mk f)⁻¹, hf.stronglyMeasurable_mk.inv, hf.ae_eq_mk.inv⟩
318318

319-
@[fun_prop]
319+
@[to_fun (attr := fun_prop)]
320320
theorem inv₀ [GroupWithZero β] [ContinuousInv₀ β] [MetrizableSpace β]
321321
(hf : AEStronglyMeasurable[m] f μ) : AEStronglyMeasurable[m] f⁻¹ μ :=
322322
⟨(hf.mk f)⁻¹, hf.stronglyMeasurable_mk.inv₀, hf.ae_eq_mk.inv⟩
323323

324-
@[to_additive (attr := fun_prop)]
324+
@[to_fun (attr := to_additive (attr := fun_prop))]
325325
protected theorem div [Group β] [IsTopologicalGroup β] (hf : AEStronglyMeasurable[m] f μ)
326326
(hg : AEStronglyMeasurable[m] g μ) : AEStronglyMeasurable[m] (f / g) μ :=
327327
⟨hf.mk f / hg.mk g, hf.stronglyMeasurable_mk.div' hg.stronglyMeasurable_mk,
@@ -345,26 +345,27 @@ theorem mul_iff_left [CommGroup β] [IsTopologicalGroup β] (hf : AEStronglyMeas
345345
AEStronglyMeasurable[m] (g * f) μ ↔ AEStronglyMeasurable[m] g μ :=
346346
mul_comm g f ▸ AEStronglyMeasurable.mul_iff_right hf
347347

348-
@[to_additive (attr := fun_prop)]
348+
@[to_fun (attr := to_additive (attr := fun_prop))]
349349
protected theorem smul {𝕜} [TopologicalSpace 𝕜] [SMul 𝕜 β] [ContinuousSMul 𝕜 β] {f : α → 𝕜}
350350
{g : α → β} (hf : AEStronglyMeasurable[m] f μ) (hg : AEStronglyMeasurable[m] g μ) :
351-
AEStronglyMeasurable[m] (fun x => f x • g x) μ :=
351+
AEStronglyMeasurable[m] (f • g) μ :=
352352
continuous_smul.comp_aestronglyMeasurable (hf.prodMk hg)
353353

354-
@[to_additive (attr := fun_prop) const_nsmul]
354+
@[to_additive (attr := to_fun (attr := fun_prop)) const_nsmul]
355355
protected theorem pow [Monoid β] [ContinuousMul β] (hf : AEStronglyMeasurable[m] f μ) (n : ℕ) :
356356
AEStronglyMeasurable[m] (f ^ n) μ :=
357357
⟨hf.mk f ^ n, hf.stronglyMeasurable_mk.pow _, hf.ae_eq_mk.pow_const _⟩
358358

359-
@[to_additive (attr := fun_prop)]
359+
@[to_additive (attr := to_fun (attr := fun_prop))]
360360
protected theorem const_smul {𝕜} [SMul 𝕜 β] [ContinuousConstSMul 𝕜 β]
361361
(hf : AEStronglyMeasurable[m] f μ) (c : 𝕜) : AEStronglyMeasurable[m] (c • f) μ :=
362362
⟨c • hf.mk f, hf.stronglyMeasurable_mk.const_smul c, hf.ae_eq_mk.const_smul c⟩
363363

364-
@[to_additive (attr := fun_prop)]
365-
protected theorem const_smul' {𝕜} [SMul 𝕜 β] [ContinuousConstSMul 𝕜 β]
366-
(hf : AEStronglyMeasurable[m] f μ) (c : 𝕜) : AEStronglyMeasurable[m] (fun x => c • f x) μ :=
367-
hf.const_smul c
364+
@[deprecated (since := "2026-06-26")]
365+
alias const_smul' := AEStronglyMeasurable.fun_const_smul
366+
367+
@[deprecated (since := "2026-06-26")]
368+
alias const_vadd' := AEStronglyMeasurable.fun_const_vadd
368369

369370
@[to_additive (attr := fun_prop)]
370371
protected theorem smul_const {𝕜} [TopologicalSpace 𝕜] [SMul 𝕜 β] [ContinuousSMul 𝕜 β] {f : α → 𝕜}
@@ -384,13 +385,13 @@ end Star
384385

385386
section Order
386387

387-
@[fun_prop]
388+
@[to_fun (attr := fun_prop)]
388389
protected theorem sup [SemilatticeSup β] [ContinuousSup β] (hf : AEStronglyMeasurable f μ)
389390
(hg : AEStronglyMeasurable g μ) : AEStronglyMeasurable (f ⊔ g) μ :=
390391
⟨hf.mk f ⊔ hg.mk g, hf.stronglyMeasurable_mk.sup hg.stronglyMeasurable_mk,
391392
hf.ae_eq_mk.sup hg.ae_eq_mk⟩
392393

393-
@[fun_prop]
394+
@[to_fun (attr := fun_prop)]
394395
protected theorem inf [SemilatticeInf β] [ContinuousInf β] (hf : AEStronglyMeasurable f μ)
395396
(hg : AEStronglyMeasurable g μ) : AEStronglyMeasurable (f ⊓ g) μ :=
396397
⟨hf.mk f ⊓ hg.mk g, hf.stronglyMeasurable_mk.inf hg.stronglyMeasurable_mk,
@@ -836,7 +837,7 @@ variable [GroupWithZero G₀] [MulAction G₀ β] [ContinuousConstSMul G₀ β]
836837

837838
theorem _root_.aestronglyMeasurable_const_smul_iff (c : G) :
838839
AEStronglyMeasurable (fun x => c • f x) μ ↔ AEStronglyMeasurable f μ :=
839-
fun h => by simpa only [inv_smul_smul] using h.const_smul' c⁻¹, fun h => h.const_smul c⟩
840+
fun h => by simpa only [inv_smul_smul] using h.fun_const_smul c⁻¹, fun h => h.const_smul c⟩
840841

841842
nonrec theorem _root_.IsUnit.aestronglyMeasurable_const_smul_iff {c : M} (hc : IsUnit c) :
842843
AEStronglyMeasurable (fun x => c • f x) μ ↔ AEStronglyMeasurable f μ :=

Mathlib/MeasureTheory/Function/StronglyMeasurable/Basic.lean

Lines changed: 16 additions & 15 deletions
Original file line numberDiff line numberDiff line change
@@ -391,7 +391,7 @@ section Arithmetic
391391

392392
variable {mα : MeasurableSpace α} [TopologicalSpace β]
393393

394-
@[to_additive (attr := fun_prop)]
394+
@[to_fun (attr := to_additive (attr := fun_prop))]
395395
protected theorem mul [Mul β] [ContinuousMul β] (hf : StronglyMeasurable f)
396396
(hg : StronglyMeasurable g) : StronglyMeasurable (f * g) :=
397397
fun n => hf.approx n * hg.approx n, fun x => (hf.tendsto_approx x).mul (hg.tendsto_approx x)⟩
@@ -406,17 +406,17 @@ theorem const_mul [Mul β] [ContinuousMul β] (hf : StronglyMeasurable f) (c :
406406
StronglyMeasurable fun x => c * f x :=
407407
stronglyMeasurable_const.mul hf
408408

409-
@[to_additive (attr := fun_prop) const_nsmul]
409+
@[to_additive (attr := to_fun (attr := fun_prop)) const_nsmul]
410410
protected theorem pow [Monoid β] [ContinuousMul β] (hf : StronglyMeasurable f) (n : ℕ) :
411411
StronglyMeasurable (f ^ n) :=
412412
fun k => hf.approx k ^ n, fun x => (hf.tendsto_approx x).pow n⟩
413413

414-
@[to_additive (attr := fun_prop)]
414+
@[to_fun (attr := to_additive (attr := fun_prop))]
415415
protected theorem inv [Inv β] [ContinuousInv β] (hf : StronglyMeasurable f) :
416416
StronglyMeasurable f⁻¹ :=
417417
fun n => (hf.approx n)⁻¹, fun x => (hf.tendsto_approx x).inv⟩
418418

419-
@[fun_prop]
419+
@[to_fun (attr := fun_prop)]
420420
protected theorem inv₀ [GroupWithZero β] [ContinuousInv₀ β] [MetrizableSpace β]
421421
(hf : StronglyMeasurable f) : StronglyMeasurable f⁻¹ := by
422422
borelize β
@@ -431,7 +431,7 @@ protected theorem inv₀ [GroupWithZero β] [ContinuousInv₀ β] [MetrizableSpa
431431
Pi.inv_apply, mem_setOf_eq, not_false_eq_true, indicator_of_mem]
432432
apply (hf.tendsto_approx x).inv₀ h
433433

434-
@[to_additive (attr := fun_prop) sub]
434+
@[to_additive (attr := to_fun (attr := fun_prop)) sub]
435435
protected theorem div' [Div β] [ContinuousDiv β] (hf : StronglyMeasurable f)
436436
(hg : StronglyMeasurable g) : StronglyMeasurable (f / g) :=
437437
fun n => hf.approx n / hg.approx n, fun x => (hf.tendsto_approx x).div' (hg.tendsto_approx x)⟩
@@ -468,21 +468,22 @@ theorem mul_iff_left [CommGroup β] [IsTopologicalGroup β] (hf : StronglyMeasur
468468
StronglyMeasurable (g * f) ↔ StronglyMeasurable g :=
469469
mul_comm g f ▸ mul_iff_right hf
470470

471-
@[to_additive (attr := fun_prop)]
471+
@[to_fun (attr := to_additive (attr := fun_prop))]
472472
protected theorem smul {𝕜} [TopologicalSpace 𝕜] [SMul 𝕜 β] [ContinuousSMul 𝕜 β] {f : α → 𝕜}
473473
{g : α → β} (hf : StronglyMeasurable f) (hg : StronglyMeasurable g) :
474-
StronglyMeasurable fun x => f x • g x :=
474+
StronglyMeasurable (f • g) :=
475475
continuous_smul.comp_stronglyMeasurable (hf.prodMk hg)
476476

477-
@[to_additive (attr := fun_prop)]
477+
@[to_additive (attr := to_fun (attr := fun_prop))]
478478
protected theorem const_smul {𝕜} [SMul 𝕜 β] [ContinuousConstSMul 𝕜 β] (hf : StronglyMeasurable f)
479479
(c : 𝕜) : StronglyMeasurable (c • f) :=
480480
fun n => c • hf.approx n, fun x => (hf.tendsto_approx x).const_smul c⟩
481481

482-
@[to_additive (attr := fun_prop)]
483-
protected theorem const_smul' {𝕜} [SMul 𝕜 β] [ContinuousConstSMul 𝕜 β] (hf : StronglyMeasurable f)
484-
(c : 𝕜) : StronglyMeasurable fun x => c • f x :=
485-
hf.const_smul c
482+
@[deprecated (since := "2026-06-26")]
483+
alias const_smul' := StronglyMeasurable.fun_const_smul
484+
485+
@[deprecated (since := "2026-06-26")]
486+
alias const_vadd' := StronglyMeasurable.fun_const_vadd
486487

487488
@[to_additive (attr := fun_prop)]
488489
protected theorem smul_const {𝕜} [TopologicalSpace 𝕜] [SMul 𝕜 β] [ContinuousSMul 𝕜 β] {f : α → 𝕜}
@@ -546,7 +547,7 @@ variable [GroupWithZero G₀] [MulAction G₀ β] [ContinuousConstSMul G₀ β]
546547

547548
theorem _root_.stronglyMeasurable_const_smul_iff {m : MeasurableSpace α} (c : G) :
548549
(StronglyMeasurable fun x => c • f x) ↔ StronglyMeasurable f :=
549-
fun h => by simpa only [inv_smul_smul] using h.const_smul' c⁻¹, fun h => h.const_smul c⟩
550+
fun h => by simpa only [inv_smul_smul] using h.fun_const_smul c⁻¹, fun h => h.const_smul c⟩
550551

551552
nonrec theorem _root_.IsUnit.stronglyMeasurable_const_smul_iff {_ : MeasurableSpace α} {c : M}
552553
(hc : IsUnit c) :
@@ -566,13 +567,13 @@ variable [MeasurableSpace α] [TopologicalSpace β]
566567

567568
open Filter
568569

569-
@[fun_prop]
570+
@[to_fun (attr := fun_prop)]
570571
protected theorem sup [Max β] [ContinuousSup β] (hf : StronglyMeasurable f)
571572
(hg : StronglyMeasurable g) : StronglyMeasurable (f ⊔ g) :=
572573
fun n => hf.approx n ⊔ hg.approx n, fun x =>
573574
(hf.tendsto_approx x).sup_nhds (hg.tendsto_approx x)⟩
574575

575-
@[fun_prop]
576+
@[to_fun (attr := fun_prop)]
576577
protected theorem inf [Min β] [ContinuousInf β] (hf : StronglyMeasurable f)
577578
(hg : StronglyMeasurable g) : StronglyMeasurable (f ⊓ g) :=
578579
fun n => hf.approx n ⊓ hg.approx n, fun x =>

Mathlib/MeasureTheory/Group/Arithmetic.lean

Lines changed: 16 additions & 20 deletions
Original file line numberDiff line numberDiff line change
@@ -114,9 +114,9 @@ theorem AEMeasurable.mul_const [MeasurableMul M] (hf : AEMeasurable f μ) (c : M
114114
AEMeasurable (fun x => f x * c) μ :=
115115
(measurable_mul_const c).comp_aemeasurable hf
116116

117-
@[to_additive (attr := fun_prop)]
117+
@[to_fun (attr := to_additive (attr := fun_prop))]
118118
theorem Measurable.mul [MeasurableMul₂ M] (hf : Measurable f) (hg : Measurable g) :
119-
Measurable fun a => f a * g a :=
119+
Measurable (f * g) :=
120120
measurable_mul.comp (hf.prodMk hg)
121121

122122
/-- Compositional version of `Measurable.mul` for use by `fun_prop`. -/
@@ -126,15 +126,13 @@ lemma Measurable.mul' [MeasurableMul₂ M] {f g : α → β → M} {h : α →
126126
(hg : Measurable ↿g) (hh : Measurable h) : Measurable fun a ↦ (f a * g a) (h a) := by
127127
dsimp; fun_prop
128128

129-
@[to_additive (attr := fun_prop)]
130-
theorem AEMeasurable.mul' [MeasurableMul₂ M] (hf : AEMeasurable f μ) (hg : AEMeasurable g μ) :
129+
@[to_fun (attr := to_additive (attr := fun_prop))]
130+
theorem AEMeasurable.mul [MeasurableMul₂ M] (hf : AEMeasurable f μ) (hg : AEMeasurable g μ) :
131131
AEMeasurable (f * g) μ :=
132132
measurable_mul.comp_aemeasurable (hf.prodMk hg)
133133

134-
@[to_additive (attr := fun_prop)]
135-
theorem AEMeasurable.mul [MeasurableMul₂ M] (hf : AEMeasurable f μ) (hg : AEMeasurable g μ) :
136-
AEMeasurable (fun a => f a * g a) μ :=
137-
measurable_mul.comp_aemeasurable (hf.prodMk hg)
134+
@[deprecated (since := "2026-06-26")] alias AEMeasurable.mul' := AEMeasurable.mul
135+
@[deprecated (since := "2026-06-26")] alias AEMeasurable.add' := AEMeasurable.add
138136

139137
@[to_additive]
140138
instance (priority := 100) MeasurableMul₂.toMeasurableMul [MeasurableMul₂ M] :
@@ -267,25 +265,23 @@ theorem AEMeasurable.div_const [MeasurableDiv G] (hf : AEMeasurable f μ) (c : G
267265
AEMeasurable (fun x => f x / c) μ :=
268266
(MeasurableDiv.measurable_div_const c).comp_aemeasurable hf
269267

270-
@[to_additive (attr := fun_prop)]
268+
@[to_fun (attr := to_additive (attr := fun_prop))]
271269
theorem Measurable.div [MeasurableDiv₂ G] (hf : Measurable f) (hg : Measurable g) :
272-
Measurable fun a => f a / g a :=
270+
Measurable (f / g) :=
273271
measurable_div.comp (hf.prodMk hg)
274272

275273
@[to_additive (attr := fun_prop)]
276274
lemma Measurable.div' [MeasurableDiv₂ G] {f g : α → β → G} {h : α → β} (hf : Measurable ↿f)
277275
(hg : Measurable ↿g) (hh : Measurable h) : Measurable fun a ↦ (f a / g a) (h a) := by
278276
dsimp; fun_prop
279277

280-
@[to_additive (attr := fun_prop)]
281-
theorem AEMeasurable.div' [MeasurableDiv₂ G] (hf : AEMeasurable f μ) (hg : AEMeasurable g μ) :
278+
@[to_fun (attr := to_additive (attr := fun_prop))]
279+
theorem AEMeasurable.div [MeasurableDiv₂ G] (hf : AEMeasurable f μ) (hg : AEMeasurable g μ) :
282280
AEMeasurable (f / g) μ :=
283281
measurable_div.comp_aemeasurable (hf.prodMk hg)
284282

285-
@[to_additive (attr := fun_prop)]
286-
theorem AEMeasurable.div [MeasurableDiv₂ G] (hf : AEMeasurable f μ) (hg : AEMeasurable g μ) :
287-
AEMeasurable (fun a => f a / g a) μ :=
288-
measurable_div.comp_aemeasurable (hf.prodMk hg)
283+
@[deprecated (since := "2026-06-26")] alias AEMeasurable.div' := AEMeasurable.div
284+
@[deprecated (since := "2026-06-26")] alias AEMeasurable.sub' := AEMeasurable.sub
289285

290286
@[to_additive]
291287
instance (priority := 100) MeasurableDiv₂.toMeasurableDiv [MeasurableDiv₂ G] :
@@ -535,9 +531,9 @@ end MeasurableConstSMul
535531

536532
variable [MeasurableSpace M]
537533

538-
@[to_additive (attr := fun_prop)]
534+
@[to_fun (attr := to_additive (attr := fun_prop))]
539535
theorem Measurable.smul [MeasurableSMul₂ M X] (hf : Measurable f) (hg : Measurable g) :
540-
Measurable fun x => f x • g x :=
536+
Measurable (f • g) :=
541537
measurable_smul.comp (hf.prodMk hg)
542538

543539
/-- Compositional version of `Measurable.smul` for use by `fun_prop`. -/
@@ -547,9 +543,9 @@ lemma Measurable.smul' [MeasurableSMul₂ M X] {f : α → β → M} {g : α →
547543
(hf : Measurable ↿f) (hg : Measurable ↿g) (hh : Measurable h) :
548544
Measurable fun a ↦ (f a • g a) (h a) := by dsimp; fun_prop
549545

550-
@[to_additive (attr := fun_prop)]
546+
@[to_fun (attr := to_additive (attr := fun_prop))]
551547
theorem AEMeasurable.smul [MeasurableSMul₂ M X] {μ : Measure α} (hf : AEMeasurable f μ)
552-
(hg : AEMeasurable g μ) : AEMeasurable (fun x => f x • g x) μ :=
548+
(hg : AEMeasurable g μ) : AEMeasurable (f • g) μ :=
553549
MeasurableSMul₂.measurable_smul.comp_aemeasurable (hf.prodMk hg)
554550

555551
@[to_additive]

Mathlib/MeasureTheory/Integral/CircleIntegral.lean

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -327,7 +327,7 @@ theorem circleIntegrable_iff [NormedSpace ℂ E] {f : ℂ → E} {c : ℂ} (R :
327327
· have H : ∀ {θ}, circleMap 0 R θ * I ≠ 0 := fun {θ} => by simp [h₀, I_ne_zero]
328328
simpa only [inv_smul_smul₀ H]
329329
using ((continuous_circleMap 0 R).aestronglyMeasurable.mul_const
330-
I).aemeasurable.fun_inv.aestronglyMeasurable.smul h.aestronglyMeasurable
330+
I).aemeasurable.fun_inv.aestronglyMeasurable.fun_smul h.aestronglyMeasurable
331331
· simp [norm_smul, h₀]
332332

333333
theorem ContinuousOn.circleIntegrable' {f : ℂ → E} {c : ℂ} {R : ℝ}

Mathlib/MeasureTheory/Integral/MeanInequalities.lean

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -338,7 +338,7 @@ theorem lintegral_rpow_add_le_add_eLpNorm_mul_lintegral_rpow_add {p q : ℝ}
338338
∫⁻ a : α, (f a + g a) * (f + g) a ^ (p - 1) ∂μ :=
339339
rfl
340340
simp_rw [h_add_apply, add_mul]
341-
rw [lintegral_add_left' (hf.mul h_add_m)]
341+
rw [lintegral_add_left' (hf.fun_mul h_add_m)]
342342
_ ≤
343343
((∫⁻ a, f a ^ p ∂μ) ^ (1 / p) + (∫⁻ a, g a ^ p ∂μ) ^ (1 / p)) *
344344
(∫⁻ a, (f a + g a) ^ p ∂μ) ^ (1 / q) := by

0 commit comments

Comments
 (0)