MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  voliunlem1 Structured version   Visualization version   GIF version

Theorem voliunlem1 25818
Description: Lemma for voliun 25822. (Contributed by Mario Carneiro, 20-Mar-2014.)
Hypotheses
Ref Expression
voliunlem.3 (𝜑𝐹:ℕ⟶dom vol)
voliunlem.5 (𝜑Disj 𝑖 ∈ ℕ (𝐹𝑖))
voliunlem1.6 𝐻 = (𝑛 ∈ ℕ ↦ (vol*‘(𝐸 ∩ (𝐹𝑛))))
voliunlem1.7 (𝜑𝐸 ⊆ ℝ)
voliunlem1.8 (𝜑 → (vol*‘𝐸) ∈ ℝ)
Assertion
Ref Expression
voliunlem1 ((𝜑𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ran 𝐹))) ≤ (vol*‘𝐸))
Distinct variable groups:   𝑘,𝑛,𝐸   𝑖,𝑘,𝑛,𝐹   𝑘,𝐻   𝜑,𝑘,𝑛
Allowed substitution hints:   𝜑(𝑖)   𝐸(𝑖)   𝐻(𝑖, 𝑛)

Proof of Theorem voliunlem1
Dummy variable 𝑧 is distinct from all other variables.
StepHypRef Expression
1 difss 4083 . . . 4 (𝐸 ran 𝐹) ⊆ 𝐸
2 voliunlem1.7 . . . 4 (𝜑𝐸 ⊆ ℝ)
3 voliunlem1.8 . . . . 5 (𝜑 → (vol*‘𝐸) ∈ ℝ)
43adantr 486 . . . 4 ((𝜑𝑘 ∈ ℕ) → (vol*‘𝐸) ∈ ℝ)
5 ovolsscl 25754 . . . 4 (((𝐸 ran 𝐹) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 ran 𝐹)) ∈ ℝ)
61, 2, 4, 5mp3an2ani 1497 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ran 𝐹)) ∈ ℝ)
7 difss 4083 . . . 4 (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸
8 ovolsscl 25754 . . . 4 (((𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
97, 2, 4, 8mp3an2ani 1497 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
10 inss1 4182 . . . 4 (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸
11 ovolsscl 25754 . . . 4 (((𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
1210, 2, 4, 11mp3an2ani 1497 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
13 elfznn 13641 . . . . . . . . 9 (𝑛 ∈ (1...𝑘) → 𝑛 ∈ ℕ)
14 voliunlem.3 . . . . . . . . . . . 12 (𝜑𝐹:ℕ⟶dom vol)
1514ffnd 6699 . . . . . . . . . . 11 (𝜑𝐹 Fn ℕ)
16 fnfvelrn 7069 . . . . . . . . . . 11 ((𝐹 Fn ℕ ∧ 𝑛 ∈ ℕ) → (𝐹𝑛) ∈ ran 𝐹)
1715, 16sylan 592 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ∈ ran 𝐹)
18 elssuni 4899 . . . . . . . . . 10 ((𝐹𝑛) ∈ ran 𝐹 → (𝐹𝑛) ⊆ ran 𝐹)
1917, 18syl 18 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ⊆ ran 𝐹)
2013, 19sylan2 605 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑘)) → (𝐹𝑛) ⊆ ran 𝐹)
2120ralrimiva 3154 . . . . . . 7 (𝜑 → ∀𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
2221adantr 486 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ∀𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
23 iunss 5003 . . . . . 6 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹 ↔ ∀𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
2422, 23sylibr 237 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
2524sscond 4093 . . . 4 ((𝜑𝑘 ∈ ℕ) → (𝐸 ran 𝐹) ⊆ (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
262adantr 486 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝐸 ⊆ ℝ)
277, 26sstrid 3942 . . . 4 ((𝜑𝑘 ∈ ℕ) → (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ ℝ)
28 ovolss 25753 . . . 4 (((𝐸 ran 𝐹) ⊆ (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ∧ (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ ℝ) → (vol*‘(𝐸 ran 𝐹)) ≤ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
2925, 27, 28syl2anc 596 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ran 𝐹)) ≤ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
306, 9, 12, 29leadd2dd 11886 . 2 ((𝜑𝑘 ∈ ℕ) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ran 𝐹))) ≤ ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
31 oveq2 7417 . . . . . . . . . . 11 (𝑧 = 1 → (1...𝑧) = (1...1))
3231iuneq1d 4979 . . . . . . . . . 10 (𝑧 = 1 → 𝑛 ∈ (1...𝑧)(𝐹𝑛) = 𝑛 ∈ (1...1)(𝐹𝑛))
3332eleq1d 2845 . . . . . . . . 9 (𝑧 = 1 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ↔ 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol))
3432ineq2d 4166 . . . . . . . . . . 11 (𝑧 = 1 → (𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛)) = (𝐸 𝑛 ∈ (1...1)(𝐹𝑛)))
3534fveq2d 6878 . . . . . . . . . 10 (𝑧 = 1 → (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))))
36 fveq2 6874 . . . . . . . . . 10 (𝑧 = 1 → (seq1( + , 𝐻)‘𝑧) = (seq1( + , 𝐻)‘1))
3735, 36eqeq12d 2776 . . . . . . . . 9 (𝑧 = 1 → ((vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧) ↔ (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)))
3833, 37anbi12d 644 . . . . . . . 8 (𝑧 = 1 → (( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧)) ↔ ( 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1))))
3938imbi2d 343 . . . . . . 7 (𝑧 = 1 → ((𝜑 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧))) ↔ (𝜑 → ( 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)))))
40 oveq2 7417 . . . . . . . . . . 11 (𝑧 = 𝑘 → (1...𝑧) = (1...𝑘))
4140iuneq1d 4979 . . . . . . . . . 10 (𝑧 = 𝑘 𝑛 ∈ (1...𝑧)(𝐹𝑛) = 𝑛 ∈ (1...𝑘)(𝐹𝑛))
4241eleq1d 2845 . . . . . . . . 9 (𝑧 = 𝑘 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ↔ 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol))
4341ineq2d 4166 . . . . . . . . . . 11 (𝑧 = 𝑘 → (𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛)) = (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
4443fveq2d 6878 . . . . . . . . . 10 (𝑧 = 𝑘 → (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
45 fveq2 6874 . . . . . . . . . 10 (𝑧 = 𝑘 → (seq1( + , 𝐻)‘𝑧) = (seq1( + , 𝐻)‘𝑘))
4644, 45eqeq12d 2776 . . . . . . . . 9 (𝑧 = 𝑘 → ((vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧) ↔ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)))
4742, 46anbi12d 644 . . . . . . . 8 (𝑧 = 𝑘 → (( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧)) ↔ ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘))))
4847imbi2d 343 . . . . . . 7 (𝑧 = 𝑘 → ((𝜑 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧))) ↔ (𝜑 → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)))))
49 oveq2 7417 . . . . . . . . . . 11 (𝑧 = (𝑘 + 1) → (1...𝑧) = (1...(𝑘 + 1)))
5049iuneq1d 4979 . . . . . . . . . 10 (𝑧 = (𝑘 + 1) → 𝑛 ∈ (1...𝑧)(𝐹𝑛) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
5150eleq1d 2845 . . . . . . . . 9 (𝑧 = (𝑘 + 1) → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ↔ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol))
5250ineq2d 4166 . . . . . . . . . . 11 (𝑧 = (𝑘 + 1) → (𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛)) = (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)))
5352fveq2d 6878 . . . . . . . . . 10 (𝑧 = (𝑘 + 1) → (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))))
54 fveq2 6874 . . . . . . . . . 10 (𝑧 = (𝑘 + 1) → (seq1( + , 𝐻)‘𝑧) = (seq1( + , 𝐻)‘(𝑘 + 1)))
5553, 54eqeq12d 2776 . . . . . . . . 9 (𝑧 = (𝑘 + 1) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧) ↔ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))
5651, 55anbi12d 644 . . . . . . . 8 (𝑧 = (𝑘 + 1) → (( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧)) ↔ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1)))))
5756imbi2d 343 . . . . . . 7 (𝑧 = (𝑘 + 1) → ((𝜑 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧))) ↔ (𝜑 → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))))
58 1z 12681 . . . . . . . . . . 11 1 ∈ ℤ
59 fzsn 13654 . . . . . . . . . . 11 (1 ∈ ℤ → (1...1) = {1})
60 iuneq1 4968 . . . . . . . . . . 11 ((1...1) = {1} → 𝑛 ∈ (1...1)(𝐹𝑛) = 𝑛 ∈ {1} (𝐹𝑛))
6158, 59, 60mp2b 10 . . . . . . . . . 10 𝑛 ∈ (1...1)(𝐹𝑛) = 𝑛 ∈ {1} (𝐹𝑛)
62 1ex 11260 . . . . . . . . . . 11 1 ∈ V
63 fveq2 6874 . . . . . . . . . . 11 (𝑛 = 1 → (𝐹𝑛) = (𝐹‘1))
6462, 63iunxsn 5051 . . . . . . . . . 10 𝑛 ∈ {1} (𝐹𝑛) = (𝐹‘1)
6561, 64eqtri 2783 . . . . . . . . 9 𝑛 ∈ (1...1)(𝐹𝑛) = (𝐹‘1)
66 1nn 12301 . . . . . . . . . 10 1 ∈ ℕ
67 ffvelcdm 7070 . . . . . . . . . 10 ((𝐹:ℕ⟶dom vol ∧ 1 ∈ ℕ) → (𝐹‘1) ∈ dom vol)
6814, 66, 67sylancl 598 . . . . . . . . 9 (𝜑 → (𝐹‘1) ∈ dom vol)
6965, 68eqeltrid 2864 . . . . . . . 8 (𝜑 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol)
7063ineq2d 4166 . . . . . . . . . . . 12 (𝑛 = 1 → (𝐸 ∩ (𝐹𝑛)) = (𝐸 ∩ (𝐹‘1)))
7170fveq2d 6878 . . . . . . . . . . 11 (𝑛 = 1 → (vol*‘(𝐸 ∩ (𝐹𝑛))) = (vol*‘(𝐸 ∩ (𝐹‘1))))
72 voliunlem1.6 . . . . . . . . . . 11 𝐻 = (𝑛 ∈ ℕ ↦ (vol*‘(𝐸 ∩ (𝐹𝑛))))
73 fvex 6887 . . . . . . . . . . 11 (vol*‘(𝐸 ∩ (𝐹‘1))) ∈ V
7471, 72, 73fvmpt 6982 . . . . . . . . . 10 (1 ∈ ℕ → (𝐻‘1) = (vol*‘(𝐸 ∩ (𝐹‘1))))
7566, 74ax-mp 5 . . . . . . . . 9 (𝐻‘1) = (vol*‘(𝐸 ∩ (𝐹‘1)))
76 seq1 14111 . . . . . . . . . 10 (1 ∈ ℤ → (seq1( + , 𝐻)‘1) = (𝐻‘1))
7758, 76ax-mp 5 . . . . . . . . 9 (seq1( + , 𝐻)‘1) = (𝐻‘1)
7865ineq2i 4163 . . . . . . . . . 10 (𝐸 𝑛 ∈ (1...1)(𝐹𝑛)) = (𝐸 ∩ (𝐹‘1))
7978fveq2i 6877 . . . . . . . . 9 (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (vol*‘(𝐸 ∩ (𝐹‘1)))
8075, 77, 793eqtr4ri 2794 . . . . . . . 8 (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)
8169, 80jctir 530 . . . . . . 7 (𝜑 → ( 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)))
82 peano2nn 12302 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (𝑘 + 1) ∈ ℕ)
83 ffvelcdm 7070 . . . . . . . . . . . . 13 ((𝐹:ℕ⟶dom vol ∧ (𝑘 + 1) ∈ ℕ) → (𝐹‘(𝑘 + 1)) ∈ dom vol)
8414, 82, 83syl2an 608 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ∈ dom vol)
85 unmbl 25805 . . . . . . . . . . . . 13 (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (𝐹‘(𝑘 + 1)) ∈ dom vol) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol)
8685ex 418 . . . . . . . . . . . 12 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol → ((𝐹‘(𝑘 + 1)) ∈ dom vol → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol))
8784, 86syl5com 32 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol))
88 simpr 490 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
89 nnuz 12959 . . . . . . . . . . . . . . 15 ℕ = (ℤ‘1)
9088, 89eleqtrdi 2870 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ (ℤ‘1))
91 fzsuc 13659 . . . . . . . . . . . . . 14 (𝑘 ∈ (ℤ‘1) → (1...(𝑘 + 1)) = ((1...𝑘) ∪ {(𝑘 + 1)}))
92 iuneq1 4968 . . . . . . . . . . . . . 14 ((1...(𝑘 + 1)) = ((1...𝑘) ∪ {(𝑘 + 1)}) → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) = 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛))
9390, 91, 923syl 19 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) = 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛))
94 iunxun 5054 . . . . . . . . . . . . . 14 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ 𝑛 ∈ {(𝑘 + 1)} (𝐹𝑛))
95 ovex 7442 . . . . . . . . . . . . . . . 16 (𝑘 + 1) ∈ V
96 fveq2 6874 . . . . . . . . . . . . . . . 16 (𝑛 = (𝑘 + 1) → (𝐹𝑛) = (𝐹‘(𝑘 + 1)))
9795, 96iunxsn 5051 . . . . . . . . . . . . . . 15 𝑛 ∈ {(𝑘 + 1)} (𝐹𝑛) = (𝐹‘(𝑘 + 1))
9897uneq2i 4112 . . . . . . . . . . . . . 14 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ 𝑛 ∈ {(𝑘 + 1)} (𝐹𝑛)) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1)))
9994, 98eqtri 2783 . . . . . . . . . . . . 13 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1)))
10093, 99eqtrdi 2811 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))))
101100eleq1d 2845 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ↔ ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol))
10287, 101sylibrd 262 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol))
103 oveq1 7416 . . . . . . . . . . 11 ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
104 inss1 4182 . . . . . . . . . . . . . . 15 (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ 𝐸
105104, 26sstrid 3942 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ ℝ)
106 ovolsscl 25754 . . . . . . . . . . . . . . 15 (((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) ∈ ℝ)
107104, 2, 4, 106mp3an2ani 1497 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) ∈ ℝ)
108 mblsplit 25800 . . . . . . . . . . . . . 14 (((𝐹‘(𝑘 + 1)) ∈ dom vol ∧ (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ ℝ ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = ((vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))))))
10984, 105, 107, 108syl3anc 1398 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = ((vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))))))
110 in32 4175 . . . . . . . . . . . . . . . 16 ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1))) = ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ∩ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
111 inss2 4183 . . . . . . . . . . . . . . . . . 18 (𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ (𝐹‘(𝑘 + 1))
11282adantl 487 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ ℕ) → (𝑘 + 1) ∈ ℕ)
113112, 89eleqtrdi 2870 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑘 ∈ ℕ) → (𝑘 + 1) ∈ (ℤ‘1))
114 eluzfz2 13619 . . . . . . . . . . . . . . . . . . 19 ((𝑘 + 1) ∈ (ℤ‘1) → (𝑘 + 1) ∈ (1...(𝑘 + 1)))
11596ssiun2s 5007 . . . . . . . . . . . . . . . . . . 19 ((𝑘 + 1) ∈ (1...(𝑘 + 1)) → (𝐹‘(𝑘 + 1)) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
116113, 114, 1153syl 19 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
117111, 116sstrid 3942 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ ℕ) → (𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
118 dfss2 3917 . . . . . . . . . . . . . . . . 17 ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ↔ ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ∩ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
119117, 118sylib 221 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ ℕ) → ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ∩ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
120110, 119eqtrid 2807 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1))) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
121120fveq2d 6878 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
122 indif2 4227 . . . . . . . . . . . . . . . 16 (𝐸 ∩ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1)))) = ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1)))
123 uncom 4105 . . . . . . . . . . . . . . . . . . 19 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) = ((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛))
124100, 123eqtr2di 2812 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → ((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
125 voliunlem.5 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑Disj 𝑖 ∈ ℕ (𝐹𝑖))
126125ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → Disj 𝑖 ∈ ℕ (𝐹𝑖))
127112adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑘 + 1) ∈ ℕ)
12813adantl 487 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℕ)
129128nnred 12305 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℝ)
130 elfzle2 13615 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑛 ∈ (1...𝑘) → 𝑛𝑘)
131130adantl 487 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛𝑘)
13288adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑘 ∈ ℕ)
133 nnleltp1 12709 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑛 ∈ ℕ ∧ 𝑘 ∈ ℕ) → (𝑛𝑘𝑛 < (𝑘 + 1)))
134128, 132, 133syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑛𝑘𝑛 < (𝑘 + 1)))
135131, 134mpbid 235 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 < (𝑘 + 1))
136129, 135gtned 11402 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑘 + 1) ≠ 𝑛)
137 fveq2 6874 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = (𝑘 + 1) → (𝐹𝑖) = (𝐹‘(𝑘 + 1)))
138 fveq2 6874 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = 𝑛 → (𝐹𝑖) = (𝐹𝑛))
139137, 138disji2 5087 . . . . . . . . . . . . . . . . . . . . . 22 ((Disj 𝑖 ∈ ℕ (𝐹𝑖) ∧ ((𝑘 + 1) ∈ ℕ ∧ 𝑛 ∈ ℕ) ∧ (𝑘 + 1) ≠ 𝑛) → ((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = ∅)
140126, 127, 128, 136, 139syl121anc 1402 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → ((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = ∅)
141140iuneq2dv 4976 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...𝑘)((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = 𝑛 ∈ (1...𝑘)∅)
142 iunin2 5029 . . . . . . . . . . . . . . . . . . . 20 𝑛 ∈ (1...𝑘)((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = ((𝐹‘(𝑘 + 1)) ∩ 𝑛 ∈ (1...𝑘)(𝐹𝑛))
143 iun0 5020 . . . . . . . . . . . . . . . . . . . 20 𝑛 ∈ (1...𝑘)∅ = ∅
144141, 142, 1433eqtr3g 2818 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑘 ∈ ℕ) → ((𝐹‘(𝑘 + 1)) ∩ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = ∅)
145 uneqdifeq 4448 . . . . . . . . . . . . . . . . . . 19 (((𝐹‘(𝑘 + 1)) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∧ ((𝐹‘(𝑘 + 1)) ∩ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = ∅) → (((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ↔ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1))) = 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
146116, 144, 145syl2anc 596 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → (((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ↔ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1))) = 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
147124, 146mpbid 235 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1))) = 𝑛 ∈ (1...𝑘)(𝐹𝑛))
148147ineq2d 4166 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ ℕ) → (𝐸 ∩ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1)))) = (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
149122, 148eqtr3id 2809 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))) = (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
150149fveq2d 6878 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1)))) = (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
151121, 150oveq12d 7427 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → ((vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))))) = ((vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
152 inss1 4182 . . . . . . . . . . . . . . . 16 (𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝐸
153 ovolsscl 25754 . . . . . . . . . . . . . . . 16 (((𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ ℝ)
154152, 2, 4, 153mp3an2ani 1497 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ ℝ)
155154recnd 11294 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ ℂ)
15612recnd 11294 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℂ)
157155, 156addcomd 11469 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → ((vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
158109, 151, 1573eqtrd 2799 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
159 seqp1 14113 . . . . . . . . . . . . . 14 (𝑘 ∈ (ℤ‘1) → (seq1( + , 𝐻)‘(𝑘 + 1)) = ((seq1( + , 𝐻)‘𝑘) + (𝐻‘(𝑘 + 1))))
16090, 159syl 18 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐻)‘(𝑘 + 1)) = ((seq1( + , 𝐻)‘𝑘) + (𝐻‘(𝑘 + 1))))
16196ineq2d 4166 . . . . . . . . . . . . . . . . 17 (𝑛 = (𝑘 + 1) → (𝐸 ∩ (𝐹𝑛)) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
162161fveq2d 6878 . . . . . . . . . . . . . . . 16 (𝑛 = (𝑘 + 1) → (vol*‘(𝐸 ∩ (𝐹𝑛))) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
163 fvex 6887 . . . . . . . . . . . . . . . 16 (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ V
164162, 72, 163fvmpt 6982 . . . . . . . . . . . . . . 15 ((𝑘 + 1) ∈ ℕ → (𝐻‘(𝑘 + 1)) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
165112, 164syl 18 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (𝐻‘(𝑘 + 1)) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
166165oveq2d 7425 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (𝐻‘(𝑘 + 1))) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
167160, 166eqtrd 2795 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐻)‘(𝑘 + 1)) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
168158, 167eqeq12d 2776 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1)) ↔ ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))))
169103, 168imbitrrid 249 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))
170102, 169anim12d 621 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1)))))
171170expcom 419 . . . . . . . 8 (𝑘 ∈ ℕ → (𝜑 → (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))))
172171a2d 30 . . . . . . 7 (𝑘 ∈ ℕ → ((𝜑 → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘))) → (𝜑 → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))))
17339, 48, 57, 48, 81, 172nnind 12308 . . . . . 6 (𝑘 ∈ ℕ → (𝜑 → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘))))
174173impcom 413 . . . . 5 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)))
175174simprd 501 . . . 4 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘))
176175eqcomd 2766 . . 3 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐻)‘𝑘) = (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
177176oveq1d 7424 . 2 ((𝜑𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ran 𝐹))) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ran 𝐹))))
178174simpld 500 . . 3 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol)
179 mblsplit 25800 . . 3 (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ 𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘𝐸) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
180178, 26, 4, 179syl3anc 1398 . 2 ((𝜑𝑘 ∈ ℕ) → (vol*‘𝐸) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
18130, 177, 1803brtr4d 5137 1 ((𝜑𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ran 𝐹))) ≤ (vol*‘𝐸))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401   = wceq 1570  wcel 2145  wne 2955  wral 3076  cdif 3896  cun 3897  cin 3898  wss 3899  c0 4279  {csn 4584   cuni 4867   ciun 4951  Disj wdisj 5070   class class class wbr 5103  cmpt 5186  dom cdm 5648  ran crn 5649   Fn wfn 6523  wf 6524  cfv 6528  (class class class)co 7409  cr 11156  1c1 11158   + caddc 11160   < clt 11300  cle 11301  cn 12290  cz 12648  cuz 12920  ...cfz 13594  seqcseq 14098  vol*covol 25730  volcvol 25731
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7735  ax-cnex 11213  ax-resscn 11214  ax-1cn 11215  ax-icn 11216  ax-addcl 11217  ax-addrcl 11218  ax-mulcl 11219  ax-mulrcl 11220  ax-mulcom 11221  ax-addass 11222  ax-mulass 11223  ax-distr 11224  ax-i2m1 11225  ax-1ne0 11226  ax-1rid 11227  ax-rnegex 11228  ax-rrecex 11229  ax-cnre 11230  ax-pre-lttri 11231  ax-pre-lttrn 11232  ax-pre-ltadd 11233  ax-pre-mulgt0 11234  ax-pre-sup 11235
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-disj 5071  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5543  df-eprel 5548  df-po 5556  df-so 5557  df-fr 5601  df-we 5603  df-xp 5654  df-rel 5655  df-cnv 5656  df-co 5657  df-dm 5658  df-rn 5659  df-res 5660  df-ima 5661  df-pred 6294  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6484  df-fun 6530  df-fn 6531  df-f 6532  df-f1 6533  df-fo 6534  df-f1o 6535  df-fv 6536  df-riota 7366  df-ov 7412  df-oprab 7413  df-mpo 7414  df-om 7862  df-1st 7985  df-2nd 7986  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-er 8696  df-map 8828  df-en 8953  df-dom 8954  df-sdom 8955  df-sup 9412  df-inf 9413  df-pnf 11302  df-mnf 11303  df-xr 11304  df-ltxr 11305  df-le 11306  df-sub 11500  df-neg 11501  df-div 11929  df-nn 12291  df-2 12360  df-3 12361  df-n0 12562  df-z 12649  df-uz 12921  df-q 13031  df-rp 13076  df-ioo 13435  df-ico 13437  df-icc 13438  df-fz 13595  df-fl 13886  df-seq 14099  df-exp 14159  df-cj 15219  df-re 15220  df-im 15221  df-sqrt 15355  df-abs 15356  df-ovol 25732  df-vol 25733
This theorem is used by:  voliunlem2  25819  voliunlem3  25820
  Copyright terms: Public domain W3C validator