Metamath Proof Explorer


Theorem voliunlem1

Description: Lemma for voliun . (Contributed by Mario Carneiro, 20-Mar-2014)

Ref Expression
Hypotheses voliunlem.3 ⊢ φ → F : ℕ ⟶ dom ⁡ vol
voliunlem.5 ⊢ φ → Disj i ∈ ℕ F ⁡ i
voliunlem1.6 ⊢ H = n ∈ ℕ ⟼ vol * ⁡ E ∩ F ⁡ n
voliunlem1.7 ⊢ φ → E ⊆ ℝ
voliunlem1.8 ⊢ φ → vol * ⁡ E ∈ ℝ
Assertion voliunlem1 ⊢ φ ∧ k ∈ ℕ → seq 1 + H ⁡ k + vol * ⁡ E ∖ ⋃ ran ⁡ F ≤ vol * ⁡ E

Proof

Step Hyp Ref Expression
1 voliunlem.3 ⊢ φ → F : ℕ ⟶ dom ⁡ vol
2 voliunlem.5 ⊢ φ → Disj i ∈ ℕ F ⁡ i
3 voliunlem1.6 ⊢ H = n ∈ ℕ ⟼ vol * ⁡ E ∩ F ⁡ n
4 voliunlem1.7 ⊢ φ → E ⊆ ℝ
5 voliunlem1.8 ⊢ φ → vol * ⁡ E ∈ ℝ
6 difss ⊢ E ∖ ⋃ ran ⁡ F ⊆ E
7 5 adantr ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∈ ℝ
8 ovolsscl ⊢ E ∖ ⋃ ran ⁡ F ⊆ E ∧ E ⊆ ℝ ∧ vol * ⁡ E ∈ ℝ → vol * ⁡ E ∖ ⋃ ran ⁡ F ∈ ℝ
9 6 4 7 8 mp3an2ani ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∖ ⋃ ran ⁡ F ∈ ℝ
10 difss ⊢ E ∖ ⋃ n = 1 k F ⁡ n ⊆ E
11 ovolsscl ⊢ E ∖ ⋃ n = 1 k F ⁡ n ⊆ E ∧ E ⊆ ℝ ∧ vol * ⁡ E ∈ ℝ → vol * ⁡ E ∖ ⋃ n = 1 k F ⁡ n ∈ ℝ
12 10 4 7 11 mp3an2ani ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∖ ⋃ n = 1 k F ⁡ n ∈ ℝ
13 inss1 ⊢ E ∩ ⋃ n = 1 k F ⁡ n ⊆ E
14 ovolsscl ⊢ E ∩ ⋃ n = 1 k F ⁡ n ⊆ E ∧ E ⊆ ℝ ∧ vol * ⁡ E ∈ ℝ → vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n ∈ ℝ
15 13 4 7 14 mp3an2ani ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n ∈ ℝ
16 elfznn ⊢ n ∈ 1 … k → n ∈ ℕ
17 1 ffnd ⊢ φ → F Fn ℕ
18 fnfvelrn ⊢ F Fn ℕ ∧ n ∈ ℕ → F ⁡ n ∈ ran ⁡ F
19 17 18 sylan ⊢ φ ∧ n ∈ ℕ → F ⁡ n ∈ ran ⁡ F
20 elssuni ⊢ F ⁡ n ∈ ran ⁡ F → F ⁡ n ⊆ ⋃ ran ⁡ F
21 19 20 syl ⊢ φ ∧ n ∈ ℕ → F ⁡ n ⊆ ⋃ ran ⁡ F
22 16 21 sylan2 ⊢ φ ∧ n ∈ 1 … k → F ⁡ n ⊆ ⋃ ran ⁡ F
23 22 ralrimiva ⊢ φ → ∀ n ∈ 1 … k F ⁡ n ⊆ ⋃ ran ⁡ F
24 23 adantr ⊢ φ ∧ k ∈ ℕ → ∀ n ∈ 1 … k F ⁡ n ⊆ ⋃ ran ⁡ F
25 iunss ⊢ ⋃ n = 1 k F ⁡ n ⊆ ⋃ ran ⁡ F ↔ ∀ n ∈ 1 … k F ⁡ n ⊆ ⋃ ran ⁡ F
26 24 25 sylibr ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k F ⁡ n ⊆ ⋃ ran ⁡ F
27 26 sscond ⊢ φ ∧ k ∈ ℕ → E ∖ ⋃ ran ⁡ F ⊆ E ∖ ⋃ n = 1 k F ⁡ n
28 4 adantr ⊢ φ ∧ k ∈ ℕ → E ⊆ ℝ
29 10 28 sstrid ⊢ φ ∧ k ∈ ℕ → E ∖ ⋃ n = 1 k F ⁡ n ⊆ ℝ
30 ovolss ⊢ E ∖ ⋃ ran ⁡ F ⊆ E ∖ ⋃ n = 1 k F ⁡ n ∧ E ∖ ⋃ n = 1 k F ⁡ n ⊆ ℝ → vol * ⁡ E ∖ ⋃ ran ⁡ F ≤ vol * ⁡ E ∖ ⋃ n = 1 k F ⁡ n
31 27 29 30 syl2anc ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∖ ⋃ ran ⁡ F ≤ vol * ⁡ E ∖ ⋃ n = 1 k F ⁡ n
32 9 12 15 31 leadd2dd ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n + vol * ⁡ E ∖ ⋃ ran ⁡ F ≤ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n + vol * ⁡ E ∖ ⋃ n = 1 k F ⁡ n
33 oveq2 ⊢ z = 1 → 1 … z = 1 … 1
34 33 iuneq1d ⊢ z = 1 → ⋃ n = 1 z F ⁡ n = ⋃ n = 1 1 F ⁡ n
35 34 eleq1d ⊢ z = 1 → ⋃ n = 1 z F ⁡ n ∈ dom ⁡ vol ↔ ⋃ n = 1 1 F ⁡ n ∈ dom ⁡ vol
36 34 ineq2d ⊢ z = 1 → E ∩ ⋃ n = 1 z F ⁡ n = E ∩ ⋃ n = 1 1 F ⁡ n
37 36 fveq2d ⊢ z = 1 → vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = vol * ⁡ E ∩ ⋃ n = 1 1 F ⁡ n
38 fveq2 ⊢ z = 1 → seq 1 + H ⁡ z = seq 1 + H ⁡ 1
39 37 38 eqeq12d ⊢ z = 1 → vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = seq 1 + H ⁡ z ↔ vol * ⁡ E ∩ ⋃ n = 1 1 F ⁡ n = seq 1 + H ⁡ 1
40 35 39 anbi12d ⊢ z = 1 → ⋃ n = 1 z F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = seq 1 + H ⁡ z ↔ ⋃ n = 1 1 F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 1 F ⁡ n = seq 1 + H ⁡ 1
41 40 imbi2d ⊢ z = 1 → φ → ⋃ n = 1 z F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = seq 1 + H ⁡ z ↔ φ → ⋃ n = 1 1 F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 1 F ⁡ n = seq 1 + H ⁡ 1
42 oveq2 ⊢ z = k → 1 … z = 1 … k
43 42 iuneq1d ⊢ z = k → ⋃ n = 1 z F ⁡ n = ⋃ n = 1 k F ⁡ n
44 43 eleq1d ⊢ z = k → ⋃ n = 1 z F ⁡ n ∈ dom ⁡ vol ↔ ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol
45 43 ineq2d ⊢ z = k → E ∩ ⋃ n = 1 z F ⁡ n = E ∩ ⋃ n = 1 k F ⁡ n
46 45 fveq2d ⊢ z = k → vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n
47 fveq2 ⊢ z = k → seq 1 + H ⁡ z = seq 1 + H ⁡ k
48 46 47 eqeq12d ⊢ z = k → vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = seq 1 + H ⁡ z ↔ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k
49 44 48 anbi12d ⊢ z = k → ⋃ n = 1 z F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = seq 1 + H ⁡ z ↔ ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k
50 49 imbi2d ⊢ z = k → φ → ⋃ n = 1 z F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = seq 1 + H ⁡ z ↔ φ → ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k
51 oveq2 ⊢ z = k + 1 → 1 … z = 1 … k + 1
52 51 iuneq1d ⊢ z = k + 1 → ⋃ n = 1 z F ⁡ n = ⋃ n = 1 k + 1 F ⁡ n
53 52 eleq1d ⊢ z = k + 1 → ⋃ n = 1 z F ⁡ n ∈ dom ⁡ vol ↔ ⋃ n = 1 k + 1 F ⁡ n ∈ dom ⁡ vol
54 52 ineq2d ⊢ z = k + 1 → E ∩ ⋃ n = 1 z F ⁡ n = E ∩ ⋃ n = 1 k + 1 F ⁡ n
55 54 fveq2d ⊢ z = k + 1 → vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n
56 fveq2 ⊢ z = k + 1 → seq 1 + H ⁡ z = seq 1 + H ⁡ k + 1
57 55 56 eqeq12d ⊢ z = k + 1 → vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = seq 1 + H ⁡ z ↔ vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = seq 1 + H ⁡ k + 1
58 53 57 anbi12d ⊢ z = k + 1 → ⋃ n = 1 z F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = seq 1 + H ⁡ z ↔ ⋃ n = 1 k + 1 F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = seq 1 + H ⁡ k + 1
59 58 imbi2d ⊢ z = k + 1 → φ → ⋃ n = 1 z F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 z F ⁡ n = seq 1 + H ⁡ z ↔ φ → ⋃ n = 1 k + 1 F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = seq 1 + H ⁡ k + 1
60 1z ⊢ 1 ∈ ℤ
61 fzsn ⊢ 1 ∈ ℤ → 1 … 1 = 1
62 iuneq1 ⊢ 1 … 1 = 1 → ⋃ n = 1 1 F ⁡ n = ⋃ n ∈ 1 F ⁡ n
63 60 61 62 mp2b ⊢ ⋃ n = 1 1 F ⁡ n = ⋃ n ∈ 1 F ⁡ n
64 1ex ⊢ 1 ∈ V
65 fveq2 ⊢ n = 1 → F ⁡ n = F ⁡ 1
66 64 65 iunxsn ⊢ ⋃ n ∈ 1 F ⁡ n = F ⁡ 1
67 63 66 eqtri ⊢ ⋃ n = 1 1 F ⁡ n = F ⁡ 1
68 1nn ⊢ 1 ∈ ℕ
69 ffvelcdm ⊢ F : ℕ ⟶ dom ⁡ vol ∧ 1 ∈ ℕ → F ⁡ 1 ∈ dom ⁡ vol
70 1 68 69 sylancl ⊢ φ → F ⁡ 1 ∈ dom ⁡ vol
71 67 70 eqeltrid ⊢ φ → ⋃ n = 1 1 F ⁡ n ∈ dom ⁡ vol
72 65 ineq2d ⊢ n = 1 → E ∩ F ⁡ n = E ∩ F ⁡ 1
73 72 fveq2d ⊢ n = 1 → vol * ⁡ E ∩ F ⁡ n = vol * ⁡ E ∩ F ⁡ 1
74 fvex ⊢ vol * ⁡ E ∩ F ⁡ 1 ∈ V
75 73 3 74 fvmpt ⊢ 1 ∈ ℕ → H ⁡ 1 = vol * ⁡ E ∩ F ⁡ 1
76 68 75 ax-mp ⊢ H ⁡ 1 = vol * ⁡ E ∩ F ⁡ 1
77 seq1 ⊢ 1 ∈ ℤ → seq 1 + H ⁡ 1 = H ⁡ 1
78 60 77 ax-mp ⊢ seq 1 + H ⁡ 1 = H ⁡ 1
79 67 ineq2i ⊢ E ∩ ⋃ n = 1 1 F ⁡ n = E ∩ F ⁡ 1
80 79 fveq2i ⊢ vol * ⁡ E ∩ ⋃ n = 1 1 F ⁡ n = vol * ⁡ E ∩ F ⁡ 1
81 76 78 80 3eqtr4ri ⊢ vol * ⁡ E ∩ ⋃ n = 1 1 F ⁡ n = seq 1 + H ⁡ 1
82 71 81 jctir ⊢ φ → ⋃ n = 1 1 F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 1 F ⁡ n = seq 1 + H ⁡ 1
83 peano2nn ⊢ k ∈ ℕ → k + 1 ∈ ℕ
84 ffvelcdm ⊢ F : ℕ ⟶ dom ⁡ vol ∧ k + 1 ∈ ℕ → F ⁡ k + 1 ∈ dom ⁡ vol
85 1 83 84 syl2an ⊢ φ ∧ k ∈ ℕ → F ⁡ k + 1 ∈ dom ⁡ vol
86 unmbl ⊢ ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol ∧ F ⁡ k + 1 ∈ dom ⁡ vol → ⋃ n = 1 k F ⁡ n ∪ F ⁡ k + 1 ∈ dom ⁡ vol
87 86 ex ⊢ ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol → F ⁡ k + 1 ∈ dom ⁡ vol → ⋃ n = 1 k F ⁡ n ∪ F ⁡ k + 1 ∈ dom ⁡ vol
88 85 87 syl5com ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol → ⋃ n = 1 k F ⁡ n ∪ F ⁡ k + 1 ∈ dom ⁡ vol
89 simpr ⊢ φ ∧ k ∈ ℕ → k ∈ ℕ
90 nnuz ⊢ ℕ = ℤ ≥ 1
91 89 90 eleqtrdi ⊢ φ ∧ k ∈ ℕ → k ∈ ℤ ≥ 1
92 fzsuc ⊢ k ∈ ℤ ≥ 1 → 1 … k + 1 = 1 … k ∪ k + 1
93 iuneq1 ⊢ 1 … k + 1 = 1 … k ∪ k + 1 → ⋃ n = 1 k + 1 F ⁡ n = ⋃ n ∈ 1 … k ∪ k + 1 F ⁡ n
94 91 92 93 3syl ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k + 1 F ⁡ n = ⋃ n ∈ 1 … k ∪ k + 1 F ⁡ n
95 iunxun ⊢ ⋃ n ∈ 1 … k ∪ k + 1 F ⁡ n = ⋃ n = 1 k F ⁡ n ∪ ⋃ n ∈ k + 1 F ⁡ n
96 ovex ⊢ k + 1 ∈ V
97 fveq2 ⊢ n = k + 1 → F ⁡ n = F ⁡ k + 1
98 96 97 iunxsn ⊢ ⋃ n ∈ k + 1 F ⁡ n = F ⁡ k + 1
99 98 uneq2i ⊢ ⋃ n = 1 k F ⁡ n ∪ ⋃ n ∈ k + 1 F ⁡ n = ⋃ n = 1 k F ⁡ n ∪ F ⁡ k + 1
100 95 99 eqtri ⊢ ⋃ n ∈ 1 … k ∪ k + 1 F ⁡ n = ⋃ n = 1 k F ⁡ n ∪ F ⁡ k + 1
101 94 100 eqtrdi ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k + 1 F ⁡ n = ⋃ n = 1 k F ⁡ n ∪ F ⁡ k + 1
102 101 eleq1d ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k + 1 F ⁡ n ∈ dom ⁡ vol ↔ ⋃ n = 1 k F ⁡ n ∪ F ⁡ k + 1 ∈ dom ⁡ vol
103 88 102 sylibrd ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol → ⋃ n = 1 k + 1 F ⁡ n ∈ dom ⁡ vol
104 oveq1 ⊢ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k → vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n + vol * ⁡ E ∩ F ⁡ k + 1 = seq 1 + H ⁡ k + vol * ⁡ E ∩ F ⁡ k + 1
105 inss1 ⊢ E ∩ ⋃ n = 1 k + 1 F ⁡ n ⊆ E
106 105 28 sstrid ⊢ φ ∧ k ∈ ℕ → E ∩ ⋃ n = 1 k + 1 F ⁡ n ⊆ ℝ
107 ovolsscl ⊢ E ∩ ⋃ n = 1 k + 1 F ⁡ n ⊆ E ∧ E ⊆ ℝ ∧ vol * ⁡ E ∈ ℝ → vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∈ ℝ
108 105 4 7 107 mp3an2ani ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∈ ℝ
109 mblsplit ⊢ F ⁡ k + 1 ∈ dom ⁡ vol ∧ E ∩ ⋃ n = 1 k + 1 F ⁡ n ⊆ ℝ ∧ vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∈ ℝ → vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∩ F ⁡ k + 1 + vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1
110 85 106 108 109 syl3anc ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∩ F ⁡ k + 1 + vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1
111 in32 ⊢ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∩ F ⁡ k + 1 = E ∩ F ⁡ k + 1 ∩ ⋃ n = 1 k + 1 F ⁡ n
112 inss2 ⊢ E ∩ F ⁡ k + 1 ⊆ F ⁡ k + 1
113 83 adantl ⊢ φ ∧ k ∈ ℕ → k + 1 ∈ ℕ
114 113 90 eleqtrdi ⊢ φ ∧ k ∈ ℕ → k + 1 ∈ ℤ ≥ 1
115 eluzfz2 ⊢ k + 1 ∈ ℤ ≥ 1 → k + 1 ∈ 1 … k + 1
116 97 ssiun2s ⊢ k + 1 ∈ 1 … k + 1 → F ⁡ k + 1 ⊆ ⋃ n = 1 k + 1 F ⁡ n
117 114 115 116 3syl ⊢ φ ∧ k ∈ ℕ → F ⁡ k + 1 ⊆ ⋃ n = 1 k + 1 F ⁡ n
118 112 117 sstrid ⊢ φ ∧ k ∈ ℕ → E ∩ F ⁡ k + 1 ⊆ ⋃ n = 1 k + 1 F ⁡ n
119 dfss2 ⊢ E ∩ F ⁡ k + 1 ⊆ ⋃ n = 1 k + 1 F ⁡ n ↔ E ∩ F ⁡ k + 1 ∩ ⋃ n = 1 k + 1 F ⁡ n = E ∩ F ⁡ k + 1
120 118 119 sylib ⊢ φ ∧ k ∈ ℕ → E ∩ F ⁡ k + 1 ∩ ⋃ n = 1 k + 1 F ⁡ n = E ∩ F ⁡ k + 1
121 111 120 eqtrid ⊢ φ ∧ k ∈ ℕ → E ∩ ⋃ n = 1 k + 1 F ⁡ n ∩ F ⁡ k + 1 = E ∩ F ⁡ k + 1
122 121 fveq2d ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∩ F ⁡ k + 1 = vol * ⁡ E ∩ F ⁡ k + 1
123 indif2 ⊢ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1 = E ∩ ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1
124 uncom ⊢ ⋃ n = 1 k F ⁡ n ∪ F ⁡ k + 1 = F ⁡ k + 1 ∪ ⋃ n = 1 k F ⁡ n
125 101 124 eqtr2di ⊢ φ ∧ k ∈ ℕ → F ⁡ k + 1 ∪ ⋃ n = 1 k F ⁡ n = ⋃ n = 1 k + 1 F ⁡ n
126 2 ad2antrr ⊢ φ ∧ k ∈ ℕ ∧ n ∈ 1 … k → Disj i ∈ ℕ F ⁡ i
127 113 adantr ⊢ φ ∧ k ∈ ℕ ∧ n ∈ 1 … k → k + 1 ∈ ℕ
128 16 adantl ⊢ φ ∧ k ∈ ℕ ∧ n ∈ 1 … k → n ∈ ℕ
129 128 nnred ⊢ φ ∧ k ∈ ℕ ∧ n ∈ 1 … k → n ∈ ℝ
130 elfzle2 ⊢ n ∈ 1 … k → n ≤ k
131 130 adantl ⊢ φ ∧ k ∈ ℕ ∧ n ∈ 1 … k → n ≤ k
132 89 adantr ⊢ φ ∧ k ∈ ℕ ∧ n ∈ 1 … k → k ∈ ℕ
133 nnleltp1 ⊢ n ∈ ℕ ∧ k ∈ ℕ → n ≤ k ↔ n < k + 1
134 128 132 133 syl2anc ⊢ φ ∧ k ∈ ℕ ∧ n ∈ 1 … k → n ≤ k ↔ n < k + 1
135 131 134 mpbid ⊢ φ ∧ k ∈ ℕ ∧ n ∈ 1 … k → n < k + 1
136 129 135 gtned ⊢ φ ∧ k ∈ ℕ ∧ n ∈ 1 … k → k + 1 ≠ n
137 fveq2 ⊢ i = k + 1 → F ⁡ i = F ⁡ k + 1
138 fveq2 ⊢ i = n → F ⁡ i = F ⁡ n
139 137 138 disji2 ⊢ Disj i ∈ ℕ F ⁡ i ∧ k + 1 ∈ ℕ ∧ n ∈ ℕ ∧ k + 1 ≠ n → F ⁡ k + 1 ∩ F ⁡ n = ∅
140 126 127 128 136 139 syl121anc ⊢ φ ∧ k ∈ ℕ ∧ n ∈ 1 … k → F ⁡ k + 1 ∩ F ⁡ n = ∅
141 140 iuneq2dv ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k F ⁡ k + 1 ∩ F ⁡ n = ⋃ n = 1 k ∅
142 iunin2 ⊢ ⋃ n = 1 k F ⁡ k + 1 ∩ F ⁡ n = F ⁡ k + 1 ∩ ⋃ n = 1 k F ⁡ n
143 iun0 ⊢ ⋃ n = 1 k ∅ = ∅
144 141 142 143 3eqtr3g ⊢ φ ∧ k ∈ ℕ → F ⁡ k + 1 ∩ ⋃ n = 1 k F ⁡ n = ∅
145 uneqdifeq ⊢ F ⁡ k + 1 ⊆ ⋃ n = 1 k + 1 F ⁡ n ∧ F ⁡ k + 1 ∩ ⋃ n = 1 k F ⁡ n = ∅ → F ⁡ k + 1 ∪ ⋃ n = 1 k F ⁡ n = ⋃ n = 1 k + 1 F ⁡ n ↔ ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1 = ⋃ n = 1 k F ⁡ n
146 117 144 145 syl2anc ⊢ φ ∧ k ∈ ℕ → F ⁡ k + 1 ∪ ⋃ n = 1 k F ⁡ n = ⋃ n = 1 k + 1 F ⁡ n ↔ ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1 = ⋃ n = 1 k F ⁡ n
147 125 146 mpbid ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1 = ⋃ n = 1 k F ⁡ n
148 147 ineq2d ⊢ φ ∧ k ∈ ℕ → E ∩ ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1 = E ∩ ⋃ n = 1 k F ⁡ n
149 123 148 eqtr3id ⊢ φ ∧ k ∈ ℕ → E ∩ ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1 = E ∩ ⋃ n = 1 k F ⁡ n
150 149 fveq2d ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1 = vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n
151 122 150 oveq12d ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∩ F ⁡ k + 1 + vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n ∖ F ⁡ k + 1 = vol * ⁡ E ∩ F ⁡ k + 1 + vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n
152 inss1 ⊢ E ∩ F ⁡ k + 1 ⊆ E
153 ovolsscl ⊢ E ∩ F ⁡ k + 1 ⊆ E ∧ E ⊆ ℝ ∧ vol * ⁡ E ∈ ℝ → vol * ⁡ E ∩ F ⁡ k + 1 ∈ ℝ
154 152 4 7 153 mp3an2ani ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ F ⁡ k + 1 ∈ ℝ
155 154 recnd ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ F ⁡ k + 1 ∈ ℂ
156 15 recnd ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n ∈ ℂ
157 155 156 addcomd ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ F ⁡ k + 1 + vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n + vol * ⁡ E ∩ F ⁡ k + 1
158 110 151 157 3eqtrd ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n + vol * ⁡ E ∩ F ⁡ k + 1
159 seqp1 ⊢ k ∈ ℤ ≥ 1 → seq 1 + H ⁡ k + 1 = seq 1 + H ⁡ k + H ⁡ k + 1
160 91 159 syl ⊢ φ ∧ k ∈ ℕ → seq 1 + H ⁡ k + 1 = seq 1 + H ⁡ k + H ⁡ k + 1
161 97 ineq2d ⊢ n = k + 1 → E ∩ F ⁡ n = E ∩ F ⁡ k + 1
162 161 fveq2d ⊢ n = k + 1 → vol * ⁡ E ∩ F ⁡ n = vol * ⁡ E ∩ F ⁡ k + 1
163 fvex ⊢ vol * ⁡ E ∩ F ⁡ k + 1 ∈ V
164 162 3 163 fvmpt ⊢ k + 1 ∈ ℕ → H ⁡ k + 1 = vol * ⁡ E ∩ F ⁡ k + 1
165 113 164 syl ⊢ φ ∧ k ∈ ℕ → H ⁡ k + 1 = vol * ⁡ E ∩ F ⁡ k + 1
166 165 oveq2d ⊢ φ ∧ k ∈ ℕ → seq 1 + H ⁡ k + H ⁡ k + 1 = seq 1 + H ⁡ k + vol * ⁡ E ∩ F ⁡ k + 1
167 160 166 eqtrd ⊢ φ ∧ k ∈ ℕ → seq 1 + H ⁡ k + 1 = seq 1 + H ⁡ k + vol * ⁡ E ∩ F ⁡ k + 1
168 158 167 eqeq12d ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = seq 1 + H ⁡ k + 1 ↔ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n + vol * ⁡ E ∩ F ⁡ k + 1 = seq 1 + H ⁡ k + vol * ⁡ E ∩ F ⁡ k + 1
169 104 168 imbitrrid ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k → vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = seq 1 + H ⁡ k + 1
170 103 169 anim12d ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k → ⋃ n = 1 k + 1 F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = seq 1 + H ⁡ k + 1
171 170 expcom ⊢ k ∈ ℕ → φ → ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k → ⋃ n = 1 k + 1 F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = seq 1 + H ⁡ k + 1
172 171 a2d ⊢ k ∈ ℕ → φ → ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k → φ → ⋃ n = 1 k + 1 F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k + 1 F ⁡ n = seq 1 + H ⁡ k + 1
173 41 50 59 50 82 172 nnind ⊢ k ∈ ℕ → φ → ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k
174 173 impcom ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol ∧ vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k
175 174 simprd ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n = seq 1 + H ⁡ k
176 175 eqcomd ⊢ φ ∧ k ∈ ℕ → seq 1 + H ⁡ k = vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n
177 176 oveq1d ⊢ φ ∧ k ∈ ℕ → seq 1 + H ⁡ k + vol * ⁡ E ∖ ⋃ ran ⁡ F = vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n + vol * ⁡ E ∖ ⋃ ran ⁡ F
178 174 simpld ⊢ φ ∧ k ∈ ℕ → ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol
179 mblsplit ⊢ ⋃ n = 1 k F ⁡ n ∈ dom ⁡ vol ∧ E ⊆ ℝ ∧ vol * ⁡ E ∈ ℝ → vol * ⁡ E = vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n + vol * ⁡ E ∖ ⋃ n = 1 k F ⁡ n
180 178 28 7 179 syl3anc ⊢ φ ∧ k ∈ ℕ → vol * ⁡ E = vol * ⁡ E ∩ ⋃ n = 1 k F ⁡ n + vol * ⁡ E ∖ ⋃ n = 1 k F ⁡ n
181 32 177 180 3brtr4d ⊢ φ ∧ k ∈ ℕ → seq 1 + H ⁡ k + vol * ⁡ E ∖ ⋃ ran ⁡ F ≤ vol * ⁡ E