Skip to content

Commit e18244a

Browse files
committed
refactor(NumberTheory): golf Mathlib/NumberTheory/LSeries/AbstractFuncEq (leanprover-community#38403)
- refactors `LSeries/AbstractFuncEq` by replacing two manual indicator-integrability rewrites in `hf_modif_int` with direct `indicator` applications Extracted from leanprover-community#38144 [![Open in Gitpod](https://gitpod.io/button/open-in-gitpod.svg)](https://gitpod.io/from-referrer/)
1 parent 2fecb3c commit e18244a

1 file changed

Lines changed: 2 additions & 8 deletions

File tree

Mathlib/NumberTheory/LSeries/AbstractFuncEq.lean

Lines changed: 2 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -273,15 +273,9 @@ lemma hf_modif_int :
273273
fun_prop (discharger := assumption)
274274
refine LocallyIntegrableOn.add (fun x hx ↦ ?_) (fun x hx ↦ ?_)
275275
· obtain ⟨s, hs, hs'⟩ := P.hf_int.sub (locallyIntegrableOn_const _) x hx
276-
refine ⟨s, hs, ?_⟩
277-
rw [IntegrableOn, integrable_indicator_iff measurableSet_Ioi, IntegrableOn,
278-
Measure.restrict_restrict measurableSet_Ioi, ← IntegrableOn]
279-
exact hs'.mono_set Set.inter_subset_right
276+
exact ⟨s, hs, hs'.indicator measurableSet_Ioi⟩
280277
· obtain ⟨s, hs, hs'⟩ := P.hf_int.sub this x hx
281-
refine ⟨s, hs, ?_⟩
282-
rw [IntegrableOn, integrable_indicator_iff measurableSet_Ioo, IntegrableOn,
283-
Measure.restrict_restrict measurableSet_Ioo, ← IntegrableOn]
284-
exact hs'.mono_set Set.inter_subset_right
278+
exact ⟨s, hs, hs'.indicator measurableSet_Ioo⟩
285279

286280
lemma hf_modif_FE (x : ℝ) (hx : 0 < x) :
287281
P.f_modif (1 / x) = (P.ε * ↑(x ^ P.k)) • P.g_modif x := by

0 commit comments

Comments
 (0)