Metamath Proof Explorer


Theorem ovolunlem2

Description: Lemma for ovolun . (Contributed by Mario Carneiro, 12-Jun-2014)

Ref Expression
Hypotheses ovolun.a ⊢ φ → A ⊆ ℝ ∧ vol * ⁡ A ∈ ℝ
ovolun.b ⊢ φ → B ⊆ ℝ ∧ vol * ⁡ B ∈ ℝ
ovolun.c ⊢ φ → C ∈ ℝ +
Assertion ovolunlem2 ⊢ φ → vol * ⁡ A ∪ B ≤ vol * ⁡ A + vol * ⁡ B + C

Proof

Step Hyp Ref Expression
1 ovolun.a ⊢ φ → A ⊆ ℝ ∧ vol * ⁡ A ∈ ℝ
2 ovolun.b ⊢ φ → B ⊆ ℝ ∧ vol * ⁡ B ∈ ℝ
3 ovolun.c ⊢ φ → C ∈ ℝ +
4 1 simpld ⊢ φ → A ⊆ ℝ
5 1 simprd ⊢ φ → vol * ⁡ A ∈ ℝ
6 3 rphalfcld ⊢ φ → C 2 ∈ ℝ +
7 eqid ⊢ seq 1 + abs ∘ − ∘ g = seq 1 + abs ∘ − ∘ g
8 7 ovolgelb ⊢ A ⊆ ℝ ∧ vol * ⁡ A ∈ ℝ ∧ C 2 ∈ ℝ + → ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2
9 4 5 6 8 syl3anc ⊢ φ → ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2
10 2 simpld ⊢ φ → B ⊆ ℝ
11 2 simprd ⊢ φ → vol * ⁡ B ∈ ℝ
12 eqid ⊢ seq 1 + abs ∘ − ∘ h = seq 1 + abs ∘ − ∘ h
13 12 ovolgelb ⊢ B ⊆ ℝ ∧ vol * ⁡ B ∈ ℝ ∧ C 2 ∈ ℝ + → ∃ h ∈ ≤ ∩ ℝ 2 ℕ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2
14 10 11 6 13 syl3anc ⊢ φ → ∃ h ∈ ≤ ∩ ℝ 2 ℕ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2
15 reeanv ⊢ ∃ g ∈ ≤ ∩ ℝ 2 ℕ ∃ h ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 ↔ ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ ∃ h ∈ ≤ ∩ ℝ 2 ℕ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2
16 1 3ad2ant1 ⊢ φ ∧ g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → A ⊆ ℝ ∧ vol * ⁡ A ∈ ℝ
17 2 3ad2ant1 ⊢ φ ∧ g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → B ⊆ ℝ ∧ vol * ⁡ B ∈ ℝ
18 3 3ad2ant1 ⊢ φ ∧ g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → C ∈ ℝ +
19 eqid ⊢ seq 1 + abs ∘ − ∘ n ∈ ℕ ⟼ if n 2 ∈ ℕ h ⁡ n 2 g ⁡ n + 1 2 = seq 1 + abs ∘ − ∘ n ∈ ℕ ⟼ if n 2 ∈ ℕ h ⁡ n 2 g ⁡ n + 1 2
20 simp2l ⊢ φ ∧ g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → g ∈ ≤ ∩ ℝ 2 ℕ
21 simp3ll ⊢ φ ∧ g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → A ⊆ ⋃ ran ⁡ . ∘ g
22 simp3lr ⊢ φ ∧ g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2
23 simp2r ⊢ φ ∧ g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → h ∈ ≤ ∩ ℝ 2 ℕ
24 simp3rl ⊢ φ ∧ g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → B ⊆ ⋃ ran ⁡ . ∘ h
25 simp3rr ⊢ φ ∧ g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2
26 eqid ⊢ n ∈ ℕ ⟼ if n 2 ∈ ℕ h ⁡ n 2 g ⁡ n + 1 2 = n ∈ ℕ ⟼ if n 2 ∈ ℕ h ⁡ n 2 g ⁡ n + 1 2
27 16 17 18 7 12 19 20 21 22 23 24 25 26 ovolunlem1 ⊢ φ ∧ g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → vol * ⁡ A ∪ B ≤ vol * ⁡ A + vol * ⁡ B + C
28 27 3exp ⊢ φ → g ∈ ≤ ∩ ℝ 2 ℕ ∧ h ∈ ≤ ∩ ℝ 2 ℕ → A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → vol * ⁡ A ∪ B ≤ vol * ⁡ A + vol * ⁡ B + C
29 28 rexlimdvv ⊢ φ → ∃ g ∈ ≤ ∩ ℝ 2 ℕ ∃ h ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → vol * ⁡ A ∪ B ≤ vol * ⁡ A + vol * ⁡ B + C
30 15 29 biimtrrid ⊢ φ → ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ g ℝ * < ≤ vol * ⁡ A + C 2 ∧ ∃ h ∈ ≤ ∩ ℝ 2 ℕ B ⊆ ⋃ ran ⁡ . ∘ h ∧ sup ran ⁡ seq 1 + abs ∘ − ∘ h ℝ * < ≤ vol * ⁡ B + C 2 → vol * ⁡ A ∪ B ≤ vol * ⁡ A + vol * ⁡ B + C
31 9 14 30 mp2and ⊢ φ → vol * ⁡ A ∪ B ≤ vol * ⁡ A + vol * ⁡ B + C