Theorem: MeasureTheory.SimpleFunc.memℒp_of_finite_measure_preimage
File: Mathlib/MeasureTheory/Function/SimpleFuncDenseLp.lean

tactic: by_cases hp0 : p = 0
state_before: α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
⊢ Memℒp (↑f) p

tactic: by_cases hp_top : p = ∞
state_before: case neg
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
⊢ Memℒp (↑f) p

tactic: refine' ⟨f.aestronglyMeasurable, _⟩
state_before: case neg
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
hp_top : ¬p = ⊤
⊢ Memℒp (↑f) p

tactic: rw [snorm_eq_snorm' hp0 hp_top, f.snorm'_eq]
state_before: case neg
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
hp_top : ¬p = ⊤
⊢ snorm (↑f) p μ < ⊤

tactic: refine' ENNReal.rpow_lt_top_of_nonneg (by simp) (ENNReal.sum_lt_top_iff.mpr fun y _ => _).ne
state_before: case neg
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
hp_top : ¬p = ⊤
⊢ (∑ y in SimpleFunc.range f, ↑‖y‖₊ ^ ENNReal.toReal p * ↑↑μ (↑f ⁻¹' {y})) ^ (1 / ENNReal.toReal p) < ⊤

tactic: by_cases hy0 : y = 0
state_before: case neg
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
hp_top : ¬p = ⊤
y : E
x✝ : y ∈ SimpleFunc.range f
⊢ ↑‖y‖₊ ^ ENNReal.toReal p * ↑↑μ (↑f ⁻¹' {y}) < ⊤

tactic: rw [hp0, memℒp_zero_iff_aestronglyMeasurable]
state_before: case pos
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : p = 0
⊢ Memℒp (↑f) p

tactic: exact f.aestronglyMeasurable
state_before: case pos
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : p = 0
⊢ AEStronglyMeasurable (↑f) μ

tactic: rw [hp_top]
state_before: case pos
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
hp_top : p = ⊤
⊢ Memℒp (↑f) p

tactic: exact memℒp_top f μ
state_before: case pos
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
hp_top : p = ⊤
⊢ Memℒp ↑f ⊤

tactic: simp
state_before: α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
hp_top : ¬p = ⊤
⊢ 0 ≤ 1 / ENNReal.toReal p

tactic: simp [hy0, ENNReal.toReal_pos hp0 hp_top]
state_before: case pos
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
hp_top : ¬p = ⊤
y : E
x✝ : y ∈ SimpleFunc.range f
hy0 : y = 0
⊢ ↑‖y‖₊ ^ ENNReal.toReal p * ↑↑μ (↑f ⁻¹' {y}) < ⊤

tactic: refine' ENNReal.mul_lt_top _ (hf y hy0).ne
state_before: case neg
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
hp_top : ¬p = ⊤
y : E
x✝ : y ∈ SimpleFunc.range f
hy0 : ¬y = 0
⊢ ↑‖y‖₊ ^ ENNReal.toReal p * ↑↑μ (↑f ⁻¹' {y}) < ⊤

tactic: exact (ENNReal.rpow_lt_top_of_nonneg ENNReal.toReal_nonneg ENNReal.coe_ne_top).ne
state_before: case neg
α : Type u_1
β : Type ?u.1422783
ι : Type ?u.1422786
E : Type u_2
F : Type ?u.1422792
𝕜 : Type ?u.1422795
inst✝² : MeasurableSpace α
inst✝¹ : NormedAddCommGroup E
inst✝ : NormedAddCommGroup F
μ : Measure α
p✝ p : ℝ≥0∞
f : α →ₛ E
hf : ∀ (y : E), y ≠ 0 → ↑↑μ (↑f ⁻¹' {y}) < ⊤
hp0 : ¬p = 0
hp_top : ¬p = ⊤
y : E
x✝ : y ∈ SimpleFunc.range f
hy0 : ¬y = 0
⊢ ↑‖y‖₊ ^ ENNReal.toReal p ≠ ⊤