Metamath Proof Explorer


Theorem uniioovol

Description: A disjoint union of open intervals has volume equal to the sum of the volume of the intervals. (This proof does not use countable choice, unlike voliun .) Lemma 565Ca of Fremlin5 p. 213. (Contributed by Mario Carneiro, 26-Mar-2015)

Ref Expression
Hypotheses uniioombl.1 ⊢ φ → F : ℕ ⟶ ≤ ∩ ℝ 2
uniioombl.2 ⊢ φ → Disj x ∈ ℕ . ⁡ F ⁡ x
uniioombl.3 ⊢ S = seq 1 + abs ∘ − ∘ F
Assertion uniioovol ⊢ φ → vol * ⁡ ⋃ ran ⁡ . ∘ F = sup ran ⁡ S ℝ * <

Proof

Step Hyp Ref Expression
1 uniioombl.1 ⊢ φ → F : ℕ ⟶ ≤ ∩ ℝ 2
2 uniioombl.2 ⊢ φ → Disj x ∈ ℕ . ⁡ F ⁡ x
3 uniioombl.3 ⊢ S = seq 1 + abs ∘ − ∘ F
4 ioof ⊢ . : ℝ * × ℝ * ⟶ 𝒫 ℝ
5 inss2 ⊢ ≤ ∩ ℝ 2 ⊆ ℝ 2
6 rexpssxrxp ⊢ ℝ 2 ⊆ ℝ * × ℝ *
7 5 6 sstri ⊢ ≤ ∩ ℝ 2 ⊆ ℝ * × ℝ *
8 fss ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 ∧ ≤ ∩ ℝ 2 ⊆ ℝ * × ℝ * → F : ℕ ⟶ ℝ * × ℝ *
9 1 7 8 sylancl ⊢ φ → F : ℕ ⟶ ℝ * × ℝ *
10 fco ⊢ . : ℝ * × ℝ * ⟶ 𝒫 ℝ ∧ F : ℕ ⟶ ℝ * × ℝ * → . ∘ F : ℕ ⟶ 𝒫 ℝ
11 4 9 10 sylancr ⊢ φ → . ∘ F : ℕ ⟶ 𝒫 ℝ
12 11 frnd ⊢ φ → ran ⁡ . ∘ F ⊆ 𝒫 ℝ
13 sspwuni ⊢ ran ⁡ . ∘ F ⊆ 𝒫 ℝ ↔ ⋃ ran ⁡ . ∘ F ⊆ ℝ
14 12 13 sylib ⊢ φ → ⋃ ran ⁡ . ∘ F ⊆ ℝ
15 ovolcl ⊢ ⋃ ran ⁡ . ∘ F ⊆ ℝ → vol * ⁡ ⋃ ran ⁡ . ∘ F ∈ ℝ *
16 14 15 syl ⊢ φ → vol * ⁡ ⋃ ran ⁡ . ∘ F ∈ ℝ *
17 eqid ⊢ abs ∘ − ∘ F = abs ∘ − ∘ F
18 17 3 ovolsf ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 → S : ℕ ⟶ 0 +∞
19 frn ⊢ S : ℕ ⟶ 0 +∞ → ran ⁡ S ⊆ 0 +∞
20 1 18 19 3syl ⊢ φ → ran ⁡ S ⊆ 0 +∞
21 icossxr ⊢ 0 +∞ ⊆ ℝ *
22 20 21 sstrdi ⊢ φ → ran ⁡ S ⊆ ℝ *
23 supxrcl ⊢ ran ⁡ S ⊆ ℝ * → sup ran ⁡ S ℝ * < ∈ ℝ *
24 22 23 syl ⊢ φ → sup ran ⁡ S ℝ * < ∈ ℝ *
25 ssid ⊢ ⋃ ran ⁡ . ∘ F ⊆ ⋃ ran ⁡ . ∘ F
26 3 ovollb ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 ∧ ⋃ ran ⁡ . ∘ F ⊆ ⋃ ran ⁡ . ∘ F → vol * ⁡ ⋃ ran ⁡ . ∘ F ≤ sup ran ⁡ S ℝ * <
27 1 25 26 sylancl ⊢ φ → vol * ⁡ ⋃ ran ⁡ . ∘ F ≤ sup ran ⁡ S ℝ * <
28 3 fveq1i ⊢ S ⁡ n = seq 1 + abs ∘ − ∘ F ⁡ n
29 1 adantr ⊢ φ ∧ n ∈ ℕ → F : ℕ ⟶ ≤ ∩ ℝ 2
30 elfznn ⊢ x ∈ 1 … n → x ∈ ℕ
31 17 ovolfsval ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 ∧ x ∈ ℕ → abs ∘ − ∘ F ⁡ x = 2 nd ⁡ F ⁡ x − 1 st ⁡ F ⁡ x
32 29 30 31 syl2an ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → abs ∘ − ∘ F ⁡ x = 2 nd ⁡ F ⁡ x − 1 st ⁡ F ⁡ x
33 fvco3 ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 ∧ x ∈ ℕ → . ∘ F ⁡ x = . ⁡ F ⁡ x
34 29 30 33 syl2an ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → . ∘ F ⁡ x = . ⁡ F ⁡ x
35 ffvelcdm ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 ∧ x ∈ ℕ → F ⁡ x ∈ ≤ ∩ ℝ 2
36 29 30 35 syl2an ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → F ⁡ x ∈ ≤ ∩ ℝ 2
37 36 elin2d ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → F ⁡ x ∈ ℝ 2
38 1st2nd2 ⊢ F ⁡ x ∈ ℝ 2 → F ⁡ x = 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x
39 37 38 syl ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → F ⁡ x = 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x
40 39 fveq2d ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → . ⁡ F ⁡ x = . ⁡ 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x
41 df-ov ⊢ 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x = . ⁡ 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x
42 40 41 eqtr4di ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → . ⁡ F ⁡ x = 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x
43 34 42 eqtrd ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → . ∘ F ⁡ x = 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x
44 ioombl ⊢ 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x ∈ dom ⁡ vol
45 43 44 eqeltrdi ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → . ∘ F ⁡ x ∈ dom ⁡ vol
46 mblvol ⊢ . ∘ F ⁡ x ∈ dom ⁡ vol → vol ⁡ . ∘ F ⁡ x = vol * ⁡ . ∘ F ⁡ x
47 45 46 syl ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → vol ⁡ . ∘ F ⁡ x = vol * ⁡ . ∘ F ⁡ x
48 43 fveq2d ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → vol * ⁡ . ∘ F ⁡ x = vol * ⁡ 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x
49 ovolfcl ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 ∧ x ∈ ℕ → 1 st ⁡ F ⁡ x ∈ ℝ ∧ 2 nd ⁡ F ⁡ x ∈ ℝ ∧ 1 st ⁡ F ⁡ x ≤ 2 nd ⁡ F ⁡ x
50 29 30 49 syl2an ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → 1 st ⁡ F ⁡ x ∈ ℝ ∧ 2 nd ⁡ F ⁡ x ∈ ℝ ∧ 1 st ⁡ F ⁡ x ≤ 2 nd ⁡ F ⁡ x
51 ovolioo ⊢ 1 st ⁡ F ⁡ x ∈ ℝ ∧ 2 nd ⁡ F ⁡ x ∈ ℝ ∧ 1 st ⁡ F ⁡ x ≤ 2 nd ⁡ F ⁡ x → vol * ⁡ 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x = 2 nd ⁡ F ⁡ x − 1 st ⁡ F ⁡ x
52 50 51 syl ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → vol * ⁡ 1 st ⁡ F ⁡ x 2 nd ⁡ F ⁡ x = 2 nd ⁡ F ⁡ x − 1 st ⁡ F ⁡ x
53 47 48 52 3eqtrd ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → vol ⁡ . ∘ F ⁡ x = 2 nd ⁡ F ⁡ x − 1 st ⁡ F ⁡ x
54 32 53 eqtr4d ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → abs ∘ − ∘ F ⁡ x = vol ⁡ . ∘ F ⁡ x
55 simpr ⊢ φ ∧ n ∈ ℕ → n ∈ ℕ
56 nnuz ⊢ ℕ = ℤ ≥ 1
57 55 56 eleqtrdi ⊢ φ ∧ n ∈ ℕ → n ∈ ℤ ≥ 1
58 50 simp2d ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → 2 nd ⁡ F ⁡ x ∈ ℝ
59 50 simp1d ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → 1 st ⁡ F ⁡ x ∈ ℝ
60 58 59 resubcld ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → 2 nd ⁡ F ⁡ x − 1 st ⁡ F ⁡ x ∈ ℝ
61 53 60 eqeltrd ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → vol ⁡ . ∘ F ⁡ x ∈ ℝ
62 61 recnd ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → vol ⁡ . ∘ F ⁡ x ∈ ℂ
63 54 57 62 fsumser ⊢ φ ∧ n ∈ ℕ → ∑ x = 1 n vol ⁡ . ∘ F ⁡ x = seq 1 + abs ∘ − ∘ F ⁡ n
64 28 63 eqtr4id ⊢ φ ∧ n ∈ ℕ → S ⁡ n = ∑ x = 1 n vol ⁡ . ∘ F ⁡ x
65 fzfid ⊢ φ ∧ n ∈ ℕ → 1 … n ∈ Fin
66 45 61 jca ⊢ φ ∧ n ∈ ℕ ∧ x ∈ 1 … n → . ∘ F ⁡ x ∈ dom ⁡ vol ∧ vol ⁡ . ∘ F ⁡ x ∈ ℝ
67 66 ralrimiva ⊢ φ ∧ n ∈ ℕ → ∀ x ∈ 1 … n . ∘ F ⁡ x ∈ dom ⁡ vol ∧ vol ⁡ . ∘ F ⁡ x ∈ ℝ
68 fz1ssnn ⊢ 1 … n ⊆ ℕ
69 1 33 sylan ⊢ φ ∧ x ∈ ℕ → . ∘ F ⁡ x = . ⁡ F ⁡ x
70 69 disjeq2dv ⊢ φ → Disj x ∈ ℕ . ∘ F ⁡ x ↔ Disj x ∈ ℕ . ⁡ F ⁡ x
71 2 70 mpbird ⊢ φ → Disj x ∈ ℕ . ∘ F ⁡ x
72 71 adantr ⊢ φ ∧ n ∈ ℕ → Disj x ∈ ℕ . ∘ F ⁡ x
73 disjss1 ⊢ 1 … n ⊆ ℕ → Disj x ∈ ℕ . ∘ F ⁡ x → Disj x = 1 n . ∘ F ⁡ x
74 68 72 73 mpsyl ⊢ φ ∧ n ∈ ℕ → Disj x = 1 n . ∘ F ⁡ x
75 volfiniun ⊢ 1 … n ∈ Fin ∧ ∀ x ∈ 1 … n . ∘ F ⁡ x ∈ dom ⁡ vol ∧ vol ⁡ . ∘ F ⁡ x ∈ ℝ ∧ Disj x = 1 n . ∘ F ⁡ x → vol ⁡ ⋃ x = 1 n . ∘ F ⁡ x = ∑ x = 1 n vol ⁡ . ∘ F ⁡ x
76 65 67 74 75 syl3anc ⊢ φ ∧ n ∈ ℕ → vol ⁡ ⋃ x = 1 n . ∘ F ⁡ x = ∑ x = 1 n vol ⁡ . ∘ F ⁡ x
77 45 ralrimiva ⊢ φ ∧ n ∈ ℕ → ∀ x ∈ 1 … n . ∘ F ⁡ x ∈ dom ⁡ vol
78 finiunmbl ⊢ 1 … n ∈ Fin ∧ ∀ x ∈ 1 … n . ∘ F ⁡ x ∈ dom ⁡ vol → ⋃ x = 1 n . ∘ F ⁡ x ∈ dom ⁡ vol
79 65 77 78 syl2anc ⊢ φ ∧ n ∈ ℕ → ⋃ x = 1 n . ∘ F ⁡ x ∈ dom ⁡ vol
80 mblvol ⊢ ⋃ x = 1 n . ∘ F ⁡ x ∈ dom ⁡ vol → vol ⁡ ⋃ x = 1 n . ∘ F ⁡ x = vol * ⁡ ⋃ x = 1 n . ∘ F ⁡ x
81 79 80 syl ⊢ φ ∧ n ∈ ℕ → vol ⁡ ⋃ x = 1 n . ∘ F ⁡ x = vol * ⁡ ⋃ x = 1 n . ∘ F ⁡ x
82 64 76 81 3eqtr2d ⊢ φ ∧ n ∈ ℕ → S ⁡ n = vol * ⁡ ⋃ x = 1 n . ∘ F ⁡ x
83 iunss1 ⊢ 1 … n ⊆ ℕ → ⋃ x = 1 n . ∘ F ⁡ x ⊆ ⋃ x ∈ ℕ . ∘ F ⁡ x
84 68 83 mp1i ⊢ φ ∧ n ∈ ℕ → ⋃ x = 1 n . ∘ F ⁡ x ⊆ ⋃ x ∈ ℕ . ∘ F ⁡ x
85 11 adantr ⊢ φ ∧ n ∈ ℕ → . ∘ F : ℕ ⟶ 𝒫 ℝ
86 ffn ⊢ . ∘ F : ℕ ⟶ 𝒫 ℝ → . ∘ F Fn ℕ
87 fniunfv ⊢ . ∘ F Fn ℕ → ⋃ x ∈ ℕ . ∘ F ⁡ x = ⋃ ran ⁡ . ∘ F
88 85 86 87 3syl ⊢ φ ∧ n ∈ ℕ → ⋃ x ∈ ℕ . ∘ F ⁡ x = ⋃ ran ⁡ . ∘ F
89 84 88 sseqtrd ⊢ φ ∧ n ∈ ℕ → ⋃ x = 1 n . ∘ F ⁡ x ⊆ ⋃ ran ⁡ . ∘ F
90 14 adantr ⊢ φ ∧ n ∈ ℕ → ⋃ ran ⁡ . ∘ F ⊆ ℝ
91 ovolss ⊢ ⋃ x = 1 n . ∘ F ⁡ x ⊆ ⋃ ran ⁡ . ∘ F ∧ ⋃ ran ⁡ . ∘ F ⊆ ℝ → vol * ⁡ ⋃ x = 1 n . ∘ F ⁡ x ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
92 89 90 91 syl2anc ⊢ φ ∧ n ∈ ℕ → vol * ⁡ ⋃ x = 1 n . ∘ F ⁡ x ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
93 82 92 eqbrtrd ⊢ φ ∧ n ∈ ℕ → S ⁡ n ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
94 93 ralrimiva ⊢ φ → ∀ n ∈ ℕ S ⁡ n ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
95 1 18 syl ⊢ φ → S : ℕ ⟶ 0 +∞
96 ffn ⊢ S : ℕ ⟶ 0 +∞ → S Fn ℕ
97 breq1 ⊢ y = S ⁡ n → y ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F ↔ S ⁡ n ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
98 97 ralrn ⊢ S Fn ℕ → ∀ y ∈ ran ⁡ S y ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F ↔ ∀ n ∈ ℕ S ⁡ n ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
99 95 96 98 3syl ⊢ φ → ∀ y ∈ ran ⁡ S y ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F ↔ ∀ n ∈ ℕ S ⁡ n ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
100 94 99 mpbird ⊢ φ → ∀ y ∈ ran ⁡ S y ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
101 supxrleub ⊢ ran ⁡ S ⊆ ℝ * ∧ vol * ⁡ ⋃ ran ⁡ . ∘ F ∈ ℝ * → sup ran ⁡ S ℝ * < ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F ↔ ∀ y ∈ ran ⁡ S y ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
102 22 16 101 syl2anc ⊢ φ → sup ran ⁡ S ℝ * < ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F ↔ ∀ y ∈ ran ⁡ S y ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
103 100 102 mpbird ⊢ φ → sup ran ⁡ S ℝ * < ≤ vol * ⁡ ⋃ ran ⁡ . ∘ F
104 16 24 27 103 xrletrid ⊢ φ → vol * ⁡ ⋃ ran ⁡ . ∘ F = sup ran ⁡ S ℝ * <