Metamath Proof Explorer


Theorem ovoliun

Description: The Lebesgue outer measure function is countably sub-additive. (Many books allow +oo as a value for one of the sets in the sum, but in our setup we can't do arithmetic on infinity, and in any case the volume of a union containing an infinitely large set is already infinitely large by monotonicity ovolss , so we need not consider this case here, although we do allow the sum itself to be infinite.) (Contributed by Mario Carneiro, 12-Jun-2014)

Ref Expression
Hypotheses ovoliun.t ⊢ T = seq 1 + G
ovoliun.g ⊢ G = n ∈ ℕ ⟼ vol * ⁡ A
ovoliun.a ⊢ φ ∧ n ∈ ℕ → A ⊆ ℝ
ovoliun.v ⊢ φ ∧ n ∈ ℕ → vol * ⁡ A ∈ ℝ
Assertion ovoliun ⊢ φ → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * <

Proof

Step Hyp Ref Expression
1 ovoliun.t ⊢ T = seq 1 + G
2 ovoliun.g ⊢ G = n ∈ ℕ ⟼ vol * ⁡ A
3 ovoliun.a ⊢ φ ∧ n ∈ ℕ → A ⊆ ℝ
4 ovoliun.v ⊢ φ ∧ n ∈ ℕ → vol * ⁡ A ∈ ℝ
5 mnfxr ⊢ −∞ ∈ ℝ *
6 5 a1i ⊢ φ → −∞ ∈ ℝ *
7 nnuz ⊢ ℕ = ℤ ≥ 1
8 1zzd ⊢ φ → 1 ∈ ℤ
9 4 2 fmptd ⊢ φ → G : ℕ ⟶ ℝ
10 9 ffvelcdmda ⊢ φ ∧ k ∈ ℕ → G ⁡ k ∈ ℝ
11 7 8 10 serfre ⊢ φ → seq 1 + G : ℕ ⟶ ℝ
12 1 feq1i ⊢ T : ℕ ⟶ ℝ ↔ seq 1 + G : ℕ ⟶ ℝ
13 11 12 sylibr ⊢ φ → T : ℕ ⟶ ℝ
14 1nn ⊢ 1 ∈ ℕ
15 ffvelcdm ⊢ T : ℕ ⟶ ℝ ∧ 1 ∈ ℕ → T ⁡ 1 ∈ ℝ
16 13 14 15 sylancl ⊢ φ → T ⁡ 1 ∈ ℝ
17 16 rexrd ⊢ φ → T ⁡ 1 ∈ ℝ *
18 13 frnd ⊢ φ → ran ⁡ T ⊆ ℝ
19 ressxr ⊢ ℝ ⊆ ℝ *
20 18 19 sstrdi ⊢ φ → ran ⁡ T ⊆ ℝ *
21 supxrcl ⊢ ran ⁡ T ⊆ ℝ * → sup ran ⁡ T ℝ * < ∈ ℝ *
22 20 21 syl ⊢ φ → sup ran ⁡ T ℝ * < ∈ ℝ *
23 16 mnfltd ⊢ φ → −∞ < T ⁡ 1
24 13 ffnd ⊢ φ → T Fn ℕ
25 fnfvelrn ⊢ T Fn ℕ ∧ 1 ∈ ℕ → T ⁡ 1 ∈ ran ⁡ T
26 24 14 25 sylancl ⊢ φ → T ⁡ 1 ∈ ran ⁡ T
27 supxrub ⊢ ran ⁡ T ⊆ ℝ * ∧ T ⁡ 1 ∈ ran ⁡ T → T ⁡ 1 ≤ sup ran ⁡ T ℝ * <
28 20 26 27 syl2anc ⊢ φ → T ⁡ 1 ≤ sup ran ⁡ T ℝ * <
29 6 17 22 23 28 xrltletrd ⊢ φ → −∞ < sup ran ⁡ T ℝ * <
30 xrrebnd ⊢ sup ran ⁡ T ℝ * < ∈ ℝ * → sup ran ⁡ T ℝ * < ∈ ℝ ↔ −∞ < sup ran ⁡ T ℝ * < ∧ sup ran ⁡ T ℝ * < < +∞
31 22 30 syl ⊢ φ → sup ran ⁡ T ℝ * < ∈ ℝ ↔ −∞ < sup ran ⁡ T ℝ * < ∧ sup ran ⁡ T ℝ * < < +∞
32 29 31 mpbirand ⊢ φ → sup ran ⁡ T ℝ * < ∈ ℝ ↔ sup ran ⁡ T ℝ * < < +∞
33 nfcv ⊢ Ⅎ _ m A
34 nfcsb1v ⊢ Ⅎ _ n ⦋ m / n⦌ A
35 csbeq1a ⊢ n = m → A = ⦋ m / n⦌ A
36 33 34 35 cbviun ⊢ ⋃ n ∈ ℕ A = ⋃ m ∈ ℕ ⦋ m / n⦌ A
37 36 fveq2i ⊢ vol * ⁡ ⋃ n ∈ ℕ A = vol * ⁡ ⋃ m ∈ ℕ ⦋ m / n⦌ A
38 nfcv ⊢ Ⅎ _ m vol * ⁡ A
39 nfcv ⊢ Ⅎ _ n vol *
40 39 34 nffv ⊢ Ⅎ _ n vol * ⁡ ⦋ m / n⦌ A
41 35 fveq2d ⊢ n = m → vol * ⁡ A = vol * ⁡ ⦋ m / n⦌ A
42 38 40 41 cbvmpt ⊢ n ∈ ℕ ⟼ vol * ⁡ A = m ∈ ℕ ⟼ vol * ⁡ ⦋ m / n⦌ A
43 2 42 eqtri ⊢ G = m ∈ ℕ ⟼ vol * ⁡ ⦋ m / n⦌ A
44 3 ralrimiva ⊢ φ → ∀ n ∈ ℕ A ⊆ ℝ
45 nfv ⊢ Ⅎ m A ⊆ ℝ
46 nfcv ⊢ Ⅎ _ n ℝ
47 34 46 nfss ⊢ Ⅎ n ⦋ m / n⦌ A ⊆ ℝ
48 35 sseq1d ⊢ n = m → A ⊆ ℝ ↔ ⦋ m / n⦌ A ⊆ ℝ
49 45 47 48 cbvralw ⊢ ∀ n ∈ ℕ A ⊆ ℝ ↔ ∀ m ∈ ℕ ⦋ m / n⦌ A ⊆ ℝ
50 44 49 sylib ⊢ φ → ∀ m ∈ ℕ ⦋ m / n⦌ A ⊆ ℝ
51 50 ad2antrr ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ ∧ x ∈ ℝ + → ∀ m ∈ ℕ ⦋ m / n⦌ A ⊆ ℝ
52 51 r19.21bi ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ ∧ x ∈ ℝ + ∧ m ∈ ℕ → ⦋ m / n⦌ A ⊆ ℝ
53 4 ralrimiva ⊢ φ → ∀ n ∈ ℕ vol * ⁡ A ∈ ℝ
54 38 nfel1 ⊢ Ⅎ m vol * ⁡ A ∈ ℝ
55 40 nfel1 ⊢ Ⅎ n vol * ⁡ ⦋ m / n⦌ A ∈ ℝ
56 41 eleq1d ⊢ n = m → vol * ⁡ A ∈ ℝ ↔ vol * ⁡ ⦋ m / n⦌ A ∈ ℝ
57 54 55 56 cbvralw ⊢ ∀ n ∈ ℕ vol * ⁡ A ∈ ℝ ↔ ∀ m ∈ ℕ vol * ⁡ ⦋ m / n⦌ A ∈ ℝ
58 53 57 sylib ⊢ φ → ∀ m ∈ ℕ vol * ⁡ ⦋ m / n⦌ A ∈ ℝ
59 58 ad2antrr ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ ∧ x ∈ ℝ + → ∀ m ∈ ℕ vol * ⁡ ⦋ m / n⦌ A ∈ ℝ
60 59 r19.21bi ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ ∧ x ∈ ℝ + ∧ m ∈ ℕ → vol * ⁡ ⦋ m / n⦌ A ∈ ℝ
61 simplr ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ ∧ x ∈ ℝ + → sup ran ⁡ T ℝ * < ∈ ℝ
62 simpr ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ ∧ x ∈ ℝ + → x ∈ ℝ +
63 1 43 52 60 61 62 ovoliunlem3 ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ ∧ x ∈ ℝ + → vol * ⁡ ⋃ m ∈ ℕ ⦋ m / n⦌ A ≤ sup ran ⁡ T ℝ * < + x
64 37 63 eqbrtrid ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ ∧ x ∈ ℝ + → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * < + x
65 64 ralrimiva ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ → ∀ x ∈ ℝ + vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * < + x
66 iunss ⊢ ⋃ n ∈ ℕ A ⊆ ℝ ↔ ∀ n ∈ ℕ A ⊆ ℝ
67 44 66 sylibr ⊢ φ → ⋃ n ∈ ℕ A ⊆ ℝ
68 ovolcl ⊢ ⋃ n ∈ ℕ A ⊆ ℝ → vol * ⁡ ⋃ n ∈ ℕ A ∈ ℝ *
69 67 68 syl ⊢ φ → vol * ⁡ ⋃ n ∈ ℕ A ∈ ℝ *
70 xralrple ⊢ vol * ⁡ ⋃ n ∈ ℕ A ∈ ℝ * ∧ sup ran ⁡ T ℝ * < ∈ ℝ → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * < ↔ ∀ x ∈ ℝ + vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * < + x
71 69 70 sylan ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * < ↔ ∀ x ∈ ℝ + vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * < + x
72 65 71 mpbird ⊢ φ ∧ sup ran ⁡ T ℝ * < ∈ ℝ → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * <
73 72 ex ⊢ φ → sup ran ⁡ T ℝ * < ∈ ℝ → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * <
74 32 73 sylbird ⊢ φ → sup ran ⁡ T ℝ * < < +∞ → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * <
75 nltpnft ⊢ sup ran ⁡ T ℝ * < ∈ ℝ * → sup ran ⁡ T ℝ * < = +∞ ↔ ¬ sup ran ⁡ T ℝ * < < +∞
76 22 75 syl ⊢ φ → sup ran ⁡ T ℝ * < = +∞ ↔ ¬ sup ran ⁡ T ℝ * < < +∞
77 pnfge ⊢ vol * ⁡ ⋃ n ∈ ℕ A ∈ ℝ * → vol * ⁡ ⋃ n ∈ ℕ A ≤ +∞
78 69 77 syl ⊢ φ → vol * ⁡ ⋃ n ∈ ℕ A ≤ +∞
79 breq2 ⊢ sup ran ⁡ T ℝ * < = +∞ → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * < ↔ vol * ⁡ ⋃ n ∈ ℕ A ≤ +∞
80 78 79 syl5ibrcom ⊢ φ → sup ran ⁡ T ℝ * < = +∞ → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * <
81 76 80 sylbird ⊢ φ → ¬ sup ran ⁡ T ℝ * < < +∞ → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * <
82 74 81 pm2.61d ⊢ φ → vol * ⁡ ⋃ n ∈ ℕ A ≤ sup ran ⁡ T ℝ * <