Theorem: MeasureTheory.ComplexMeasure.singularPart_add_withDensity_rnDeriv_eq
File: Mathlib/MeasureTheory/Decomposition/SignedLebesgue.lean

tactic: conv_rhs => rw [← c.toComplexMeasure_to_signedMeasure]
state_before: α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
⊢ c.singularPart μ + μ.withDensityᵥ (c.rnDeriv μ) = c
state_after: α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
⊢ c.singularPart μ + μ.withDensityᵥ (c.rnDeriv μ) = (re c).toComplexMeasure (im c)

tactic: ext i hi : 1
state_before: α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
⊢ c.singularPart μ + μ.withDensityᵥ (c.rnDeriv μ) = (re c).toComplexMeasure (im c)
state_after: case h
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ ↑(c.singularPart μ + μ.withDensityᵥ (c.rnDeriv μ)) i = ↑((re c).toComplexMeasure (im c)) i

tactic: rw [VectorMeasure.add_apply, SignedMeasure.toComplexMeasure_apply]
state_before: case h
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ ↑(c.singularPart μ + μ.withDensityᵥ (c.rnDeriv μ)) i = ↑((re c).toComplexMeasure (im c)) i
state_after: case h
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ ↑(c.singularPart μ) i + ↑(μ.withDensityᵥ (c.rnDeriv μ)) i = { re := ↑(re c) i, im := ↑(im c) i }

tactic: apply Complex.ext
state_before: case h
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ ↑(c.singularPart μ) i + ↑(μ.withDensityᵥ (c.rnDeriv μ)) i = { re := ↑(re c) i, im := ↑(im c) i }
state_after: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ (↑(c.singularPart μ) i + ↑(μ.withDensityᵥ (c.rnDeriv μ)) i).re = { re := ↑(re c) i, im := ↑(im c) i }.re

case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ (↑(c.singularPart μ) i + ↑(μ.withDensityᵥ (c.rnDeriv μ)) i).im = { re := ↑(re c) i, im := ↑(im c) i }.im

tactic: rw [Complex.add_re, withDensityᵥ_apply (c.integrable_rnDeriv μ) hi, ← RCLike.re_eq_complex_re,
  ← integral_re (c.integrable_rnDeriv μ).integrableOn, RCLike.re_eq_complex_re,
  ← withDensityᵥ_apply _ hi]
state_before: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ (↑(c.singularPart μ) i + ↑(μ.withDensityᵥ (c.rnDeriv μ)) i).re = { re := ↑(re c) i, im := ↑(im c) i }.re
state_after: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ (↑(c.singularPart μ) i).re + ↑(μ.withDensityᵥ fun x => (c.rnDeriv μ x).re) i = { re := ↑(re c) i, im := ↑(im c) i }.re

α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ Integrable (fun x => (c.rnDeriv μ x).re) μ

tactic: change (c.re.singularPart μ + μ.withDensityᵥ (c.re.rnDeriv μ)) i = _
state_before: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ (↑(c.singularPart μ) i).re + ↑(μ.withDensityᵥ fun x => (c.rnDeriv μ x).re) i = { re := ↑(re c) i, im := ↑(im c) i }.re
state_after: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ ↑((re c).singularPart μ + μ.withDensityᵥ ((re c).rnDeriv μ)) i = { re := ↑(re c) i, im := ↑(im c) i }.re

tactic: rw [c.re.singularPart_add_withDensity_rnDeriv_eq μ]
state_before: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ ↑((re c).singularPart μ + μ.withDensityᵥ ((re c).rnDeriv μ)) i = { re := ↑(re c) i, im := ↑(im c) i }.re
state_after: no goals

tactic: exact SignedMeasure.integrable_rnDeriv _ _
state_before: α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ Integrable (fun x => (c.rnDeriv μ x).re) μ
state_after: no goals

tactic: rw [Complex.add_im, withDensityᵥ_apply (c.integrable_rnDeriv μ) hi, ← RCLike.im_eq_complex_im,
  ← integral_im (c.integrable_rnDeriv μ).integrableOn, RCLike.im_eq_complex_im,
  ← withDensityᵥ_apply _ hi]
state_before: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ (↑(c.singularPart μ) i + ↑(μ.withDensityᵥ (c.rnDeriv μ)) i).im = { re := ↑(re c) i, im := ↑(im c) i }.im
state_after: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ (↑(c.singularPart μ) i).im + ↑(μ.withDensityᵥ fun x => (c.rnDeriv μ x).im) i = { re := ↑(re c) i, im := ↑(im c) i }.im

α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ Integrable (fun x => (c.rnDeriv μ x).im) μ

tactic: change (c.im.singularPart μ + μ.withDensityᵥ (c.im.rnDeriv μ)) i = _
state_before: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ (↑(c.singularPart μ) i).im + ↑(μ.withDensityᵥ fun x => (c.rnDeriv μ x).im) i = { re := ↑(re c) i, im := ↑(im c) i }.im
state_after: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ ↑((im c).singularPart μ + μ.withDensityᵥ ((im c).rnDeriv μ)) i = { re := ↑(re c) i, im := ↑(im c) i }.im

tactic: rw [c.im.singularPart_add_withDensity_rnDeriv_eq μ]
state_before: case h.a
α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ ↑((im c).singularPart μ + μ.withDensityᵥ ((im c).rnDeriv μ)) i = { re := ↑(re c) i, im := ↑(im c) i }.im
state_after: no goals

tactic: exact SignedMeasure.integrable_rnDeriv _ _
state_before: α : Type u_1
β : Type u_2
m : MeasurableSpace α
μ ν : Measure α
c : ComplexMeasure α
inst✝ : c.HaveLebesgueDecomposition μ
i : Set α
hi : MeasurableSet i
⊢ Integrable (fun x => (c.rnDeriv μ x).im) μ
state_after: no goals