Theorem: MeasureTheory.setToFun_mono
File: Mathlib/MeasureTheory/Integral/SetToL1.lean

tactic: rw [← sub_nonneg, ← setToFun_sub hT hg hf]
state_before: α : Type u_1
E : Type ?u.1543920
F : Type ?u.1543923
F' : Type ?u.1543926
G : Type ?u.1543929
𝕜 : Type ?u.1543932
p : ℝ≥0∞
inst✝¹² : NormedAddCommGroup E
inst✝¹¹ : NormedSpace ℝ E
inst✝¹⁰ : NormedAddCommGroup F
inst✝⁹ : NormedSpace ℝ F
inst✝⁸ : NormedAddCommGroup F'
inst✝⁷ : NormedSpace ℝ F'
inst✝⁶ : NormedAddCommGroup G
m : MeasurableSpace α
μ : Measure α
inst✝⁵ : CompleteSpace F
T✝ T' T'' : Set α → E →L[ℝ] F
C✝ C' C'' : ℝ
f✝ g✝ : α → E
G' : Type u_2
G'' : Type u_3
inst✝⁴ : NormedLatticeAddCommGroup G''
inst✝³ : NormedSpace ℝ G''
inst✝² : CompleteSpace G''
inst✝¹ : NormedLatticeAddCommGroup G'
inst✝ : NormedSpace ℝ G'
T : Set α → G' →L[ℝ] G''
C : ℝ
hT : DominatedFinMeasAdditive μ T C
hT_nonneg : ∀ (s : Set α), MeasurableSet s → ↑↑μ s < ⊤ → ∀ (x : G'), 0 ≤ x → 0 ≤ ↑(T s) x
f g : α → G'
hf : Integrable f
hg : Integrable g
hfg : f ≤ᵐ[μ] g
⊢ setToFun μ T hT f ≤ setToFun μ T hT g

tactic: refine' setToFun_nonneg hT hT_nonneg (hfg.mono fun a ha => _)
state_before: α : Type u_1
E : Type ?u.1543920
F : Type ?u.1543923
F' : Type ?u.1543926
G : Type ?u.1543929
𝕜 : Type ?u.1543932
p : ℝ≥0∞
inst✝¹² : NormedAddCommGroup E
inst✝¹¹ : NormedSpace ℝ E
inst✝¹⁰ : NormedAddCommGroup F
inst✝⁹ : NormedSpace ℝ F
inst✝⁸ : NormedAddCommGroup F'
inst✝⁷ : NormedSpace ℝ F'
inst✝⁶ : NormedAddCommGroup G
m : MeasurableSpace α
μ : Measure α
inst✝⁵ : CompleteSpace F
T✝ T' T'' : Set α → E →L[ℝ] F
C✝ C' C'' : ℝ
f✝ g✝ : α → E
G' : Type u_2
G'' : Type u_3
inst✝⁴ : NormedLatticeAddCommGroup G''
inst✝³ : NormedSpace ℝ G''
inst✝² : CompleteSpace G''
inst✝¹ : NormedLatticeAddCommGroup G'
inst✝ : NormedSpace ℝ G'
T : Set α → G' →L[ℝ] G''
C : ℝ
hT : DominatedFinMeasAdditive μ T C
hT_nonneg : ∀ (s : Set α), MeasurableSet s → ↑↑μ s < ⊤ → ∀ (x : G'), 0 ≤ x → 0 ≤ ↑(T s) x
f g : α → G'
hf : Integrable f
hg : Integrable g
hfg : f ≤ᵐ[μ] g
⊢ 0 ≤ setToFun μ T hT (g - f)

tactic: rw [Pi.sub_apply, Pi.zero_apply, sub_nonneg]
state_before: α : Type u_1
E : Type ?u.1543920
F : Type ?u.1543923
F' : Type ?u.1543926
G : Type ?u.1543929
𝕜 : Type ?u.1543932
p : ℝ≥0∞
inst✝¹² : NormedAddCommGroup E
inst✝¹¹ : NormedSpace ℝ E
inst✝¹⁰ : NormedAddCommGroup F
inst✝⁹ : NormedSpace ℝ F
inst✝⁸ : NormedAddCommGroup F'
inst✝⁷ : NormedSpace ℝ F'
inst✝⁶ : NormedAddCommGroup G
m : MeasurableSpace α
μ : Measure α
inst✝⁵ : CompleteSpace F
T✝ T' T'' : Set α → E →L[ℝ] F
C✝ C' C'' : ℝ
f✝ g✝ : α → E
G' : Type u_2
G'' : Type u_3
inst✝⁴ : NormedLatticeAddCommGroup G''
inst✝³ : NormedSpace ℝ G''
inst✝² : CompleteSpace G''
inst✝¹ : NormedLatticeAddCommGroup G'
inst✝ : NormedSpace ℝ G'
T : Set α → G' →L[ℝ] G''
C : ℝ
hT : DominatedFinMeasAdditive μ T C
hT_nonneg : ∀ (s : Set α), MeasurableSet s → ↑↑μ s < ⊤ → ∀ (x : G'), 0 ≤ x → 0 ≤ ↑(T s) x
f g : α → G'
hf : Integrable f
hg : Integrable g
hfg : f ≤ᵐ[μ] g
a : α
ha : f a ≤ g a
⊢ OfNat.ofNat 0 a ≤ (g - f) a

tactic: exact ha
state_before: α : Type u_1
E : Type ?u.1543920
F : Type ?u.1543923
F' : Type ?u.1543926
G : Type ?u.1543929
𝕜 : Type ?u.1543932
p : ℝ≥0∞
inst✝¹² : NormedAddCommGroup E
inst✝¹¹ : NormedSpace ℝ E
inst✝¹⁰ : NormedAddCommGroup F
inst✝⁹ : NormedSpace ℝ F
inst✝⁸ : NormedAddCommGroup F'
inst✝⁷ : NormedSpace ℝ F'
inst✝⁶ : NormedAddCommGroup G
m : MeasurableSpace α
μ : Measure α
inst✝⁵ : CompleteSpace F
T✝ T' T'' : Set α → E →L[ℝ] F
C✝ C' C'' : ℝ
f✝ g✝ : α → E
G' : Type u_2
G'' : Type u_3
inst✝⁴ : NormedLatticeAddCommGroup G''
inst✝³ : NormedSpace ℝ G''
inst✝² : CompleteSpace G''
inst✝¹ : NormedLatticeAddCommGroup G'
inst✝ : NormedSpace ℝ G'
T : Set α → G' →L[ℝ] G''
C : ℝ
hT : DominatedFinMeasAdditive μ T C
hT_nonneg : ∀ (s : Set α), MeasurableSet s → ↑↑μ s < ⊤ → ∀ (x : G'), 0 ≤ x → 0 ≤ ↑(T s) x
f g : α → G'
hf : Integrable f
hg : Integrable g
hfg : f ≤ᵐ[μ] g
a : α
ha : f a ≤ g a
⊢ f a ≤ g a