Theorem: MeasureTheory.SignedMeasure.restrictNonposSeq_disjoint'
File: Mathlib/MeasureTheory/Decomposition/SignedHahn.lean

tactic: rw [Set.eq_empty_iff_forall_not_mem]
state_before: α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n m : ℕ
h : n < m
⊢ MeasureTheory.SignedMeasure.restrictNonposSeq s i n ∩ MeasureTheory.SignedMeasure.restrictNonposSeq s i m = ∅
state_after: α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n m : ℕ
h : n < m
⊢ ∀ (x : α),
    x ∉ MeasureTheory.SignedMeasure.restrictNonposSeq s i n ∩ MeasureTheory.SignedMeasure.restrictNonposSeq s i m

tactic: rintro x ⟨hx₁, hx₂⟩
state_before: α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n m : ℕ
h : n < m
⊢ ∀ (x : α),
    x ∉ MeasureTheory.SignedMeasure.restrictNonposSeq s i n ∩ MeasureTheory.SignedMeasure.restrictNonposSeq s i m
state_after: case intro
α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n m : ℕ
h : n < m
x : α
hx₁ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i n
hx₂ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i m
⊢ False

tactic: cases m
state_before: case intro
α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n m : ℕ
h : n < m
x : α
hx₁ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i n
hx₂ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i m
⊢ False
state_after: case intro.zero
α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n : ℕ
x : α
hx₁ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i n
h : n < 0
hx₂ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i 0
⊢ False

case intro.succ
α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n : ℕ
x : α
hx₁ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i n
n✝ : ℕ
h : n < n✝ + 1
hx₂ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i (n✝ + 1)
⊢ False

tactic: omega
state_before: case intro.zero
α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n : ℕ
x : α
hx₁ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i n
h : n < 0
hx₂ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i 0
⊢ False
state_after: no goals

tactic: rw [restrictNonposSeq] at hx₂
state_before: case intro.succ
α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n : ℕ
x : α
hx₁ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i n
n✝ : ℕ
h : n < n✝ + 1
hx₂ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i (n✝ + 1)
⊢ False
state_after: case intro.succ
α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n : ℕ
x : α
hx₁ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i n
n✝ : ℕ
h : n < n✝ + 1
hx₂ :
  x ∈
    MeasureTheory.SignedMeasure.someExistsOneDivLT s
      (i \
        ⋃ k,
          ⋃ (H : k ≤ n✝),
            let_fun this := ⋯;
            MeasureTheory.SignedMeasure.restrictNonposSeq s i k)
⊢ False

tactic: exact
  (someExistsOneDivLT_subset hx₂).2
    (Set.mem_iUnion.2 ⟨n, Set.mem_iUnion.2 ⟨Nat.lt_succ_iff.mp h, hx₁⟩⟩)
state_before: case intro.succ
α : Type u_1
β : Type u_2
inst✝³ : MeasurableSpace α
M : Type u_3
inst✝² : AddCommMonoid M
inst✝¹ : TopologicalSpace M
inst✝ : OrderedAddCommMonoid M
s : SignedMeasure α
i j : Set α
n : ℕ
x : α
hx₁ : x ∈ MeasureTheory.SignedMeasure.restrictNonposSeq s i n
n✝ : ℕ
h : n < n✝ + 1
hx₂ :
  x ∈
    MeasureTheory.SignedMeasure.someExistsOneDivLT s
      (i \
        ⋃ k,
          ⋃ (H : k ≤ n✝),
            let_fun this := ⋯;
            MeasureTheory.SignedMeasure.restrictNonposSeq s i k)
⊢ False
state_after: no goals