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

Theorem voliunlem1 24619
Description: Lemma for voliun 24623. (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 4062 . . . 4 (𝐸 ran 𝐹) ⊆ 𝐸
2 voliunlem1.7 . . . 4 (𝜑𝐸 ⊆ ℝ)
3 voliunlem1.8 . . . . 5 (𝜑 → (vol*‘𝐸) ∈ ℝ)
43adantr 480 . . . 4 ((𝜑𝑘 ∈ ℕ) → (vol*‘𝐸) ∈ ℝ)
5 ovolsscl 24555 . . . 4 (((𝐸 ran 𝐹) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 ran 𝐹)) ∈ ℝ)
61, 2, 4, 5mp3an2ani 1466 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ran 𝐹)) ∈ ℝ)
7 difss 4062 . . . 4 (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸
8 ovolsscl 24555 . . . 4 (((𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
97, 2, 4, 8mp3an2ani 1466 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
10 inss1 4159 . . . 4 (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸
11 ovolsscl 24555 . . . 4 (((𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
1210, 2, 4, 11mp3an2ani 1466 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
13 elfznn 13214 . . . . . . . . 9 (𝑛 ∈ (1...𝑘) → 𝑛 ∈ ℕ)
14 voliunlem.3 . . . . . . . . . . . 12 (𝜑𝐹:ℕ⟶dom vol)
1514ffnd 6585 . . . . . . . . . . 11 (𝜑𝐹 Fn ℕ)
16 fnfvelrn 6940 . . . . . . . . . . 11 ((𝐹 Fn ℕ ∧ 𝑛 ∈ ℕ) → (𝐹𝑛) ∈ ran 𝐹)
1715, 16sylan 579 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ∈ ran 𝐹)
18 elssuni 4868 . . . . . . . . . 10 ((𝐹𝑛) ∈ ran 𝐹 → (𝐹𝑛) ⊆ ran 𝐹)
1917, 18syl 17 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ⊆ ran 𝐹)
2013, 19sylan2 592 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑘)) → (𝐹𝑛) ⊆ ran 𝐹)
2120ralrimiva 3107 . . . . . . 7 (𝜑 → ∀𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
2221adantr 480 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ∀𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
23 iunss 4971 . . . . . 6 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹 ↔ ∀𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
2422, 23sylibr 233 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
2524sscond 4072 . . . 4 ((𝜑𝑘 ∈ ℕ) → (𝐸 ran 𝐹) ⊆ (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
262adantr 480 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝐸 ⊆ ℝ)
277, 26sstrid 3928 . . . 4 ((𝜑𝑘 ∈ ℕ) → (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ ℝ)
28 ovolss 24554 . . . 4 (((𝐸 ran 𝐹) ⊆ (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ∧ (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ ℝ) → (vol*‘(𝐸 ran 𝐹)) ≤ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
2925, 27, 28syl2anc 583 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ran 𝐹)) ≤ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
306, 9, 12, 29leadd2dd 11520 . 2 ((𝜑𝑘 ∈ ℕ) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ran 𝐹))) ≤ ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
31 oveq2 7263 . . . . . . . . . . 11 (𝑧 = 1 → (1...𝑧) = (1...1))
3231iuneq1d 4948 . . . . . . . . . 10 (𝑧 = 1 → 𝑛 ∈ (1...𝑧)(𝐹𝑛) = 𝑛 ∈ (1...1)(𝐹𝑛))
3332eleq1d 2823 . . . . . . . . 9 (𝑧 = 1 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ↔ 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol))
3432ineq2d 4143 . . . . . . . . . . 11 (𝑧 = 1 → (𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛)) = (𝐸 𝑛 ∈ (1...1)(𝐹𝑛)))
3534fveq2d 6760 . . . . . . . . . 10 (𝑧 = 1 → (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))))
36 fveq2 6756 . . . . . . . . . 10 (𝑧 = 1 → (seq1( + , 𝐻)‘𝑧) = (seq1( + , 𝐻)‘1))
3735, 36eqeq12d 2754 . . . . . . . . 9 (𝑧 = 1 → ((vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧) ↔ (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)))
3833, 37anbi12d 630 . . . . . . . 8 (𝑧 = 1 → (( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧)) ↔ ( 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1))))
3938imbi2d 340 . . . . . . 7 (𝑧 = 1 → ((𝜑 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧))) ↔ (𝜑 → ( 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)))))
40 oveq2 7263 . . . . . . . . . . 11 (𝑧 = 𝑘 → (1...𝑧) = (1...𝑘))
4140iuneq1d 4948 . . . . . . . . . 10 (𝑧 = 𝑘 𝑛 ∈ (1...𝑧)(𝐹𝑛) = 𝑛 ∈ (1...𝑘)(𝐹𝑛))
4241eleq1d 2823 . . . . . . . . 9 (𝑧 = 𝑘 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ↔ 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol))
4341ineq2d 4143 . . . . . . . . . . 11 (𝑧 = 𝑘 → (𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛)) = (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
4443fveq2d 6760 . . . . . . . . . 10 (𝑧 = 𝑘 → (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
45 fveq2 6756 . . . . . . . . . 10 (𝑧 = 𝑘 → (seq1( + , 𝐻)‘𝑧) = (seq1( + , 𝐻)‘𝑘))
4644, 45eqeq12d 2754 . . . . . . . . 9 (𝑧 = 𝑘 → ((vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧) ↔ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)))
4742, 46anbi12d 630 . . . . . . . 8 (𝑧 = 𝑘 → (( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧)) ↔ ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘))))
4847imbi2d 340 . . . . . . 7 (𝑧 = 𝑘 → ((𝜑 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧))) ↔ (𝜑 → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)))))
49 oveq2 7263 . . . . . . . . . . 11 (𝑧 = (𝑘 + 1) → (1...𝑧) = (1...(𝑘 + 1)))
5049iuneq1d 4948 . . . . . . . . . 10 (𝑧 = (𝑘 + 1) → 𝑛 ∈ (1...𝑧)(𝐹𝑛) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
5150eleq1d 2823 . . . . . . . . 9 (𝑧 = (𝑘 + 1) → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ↔ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol))
5250ineq2d 4143 . . . . . . . . . . 11 (𝑧 = (𝑘 + 1) → (𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛)) = (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)))
5352fveq2d 6760 . . . . . . . . . 10 (𝑧 = (𝑘 + 1) → (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))))
54 fveq2 6756 . . . . . . . . . 10 (𝑧 = (𝑘 + 1) → (seq1( + , 𝐻)‘𝑧) = (seq1( + , 𝐻)‘(𝑘 + 1)))
5553, 54eqeq12d 2754 . . . . . . . . 9 (𝑧 = (𝑘 + 1) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧) ↔ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))
5651, 55anbi12d 630 . . . . . . . 8 (𝑧 = (𝑘 + 1) → (( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧)) ↔ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1)))))
5756imbi2d 340 . . . . . . 7 (𝑧 = (𝑘 + 1) → ((𝜑 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧))) ↔ (𝜑 → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))))
58 1z 12280 . . . . . . . . . . 11 1 ∈ ℤ
59 fzsn 13227 . . . . . . . . . . 11 (1 ∈ ℤ → (1...1) = {1})
60 iuneq1 4937 . . . . . . . . . . 11 ((1...1) = {1} → 𝑛 ∈ (1...1)(𝐹𝑛) = 𝑛 ∈ {1} (𝐹𝑛))
6158, 59, 60mp2b 10 . . . . . . . . . 10 𝑛 ∈ (1...1)(𝐹𝑛) = 𝑛 ∈ {1} (𝐹𝑛)
62 1ex 10902 . . . . . . . . . . 11 1 ∈ V
63 fveq2 6756 . . . . . . . . . . 11 (𝑛 = 1 → (𝐹𝑛) = (𝐹‘1))
6462, 63iunxsn 5016 . . . . . . . . . 10 𝑛 ∈ {1} (𝐹𝑛) = (𝐹‘1)
6561, 64eqtri 2766 . . . . . . . . 9 𝑛 ∈ (1...1)(𝐹𝑛) = (𝐹‘1)
66 1nn 11914 . . . . . . . . . 10 1 ∈ ℕ
67 ffvelrn 6941 . . . . . . . . . 10 ((𝐹:ℕ⟶dom vol ∧ 1 ∈ ℕ) → (𝐹‘1) ∈ dom vol)
6814, 66, 67sylancl 585 . . . . . . . . 9 (𝜑 → (𝐹‘1) ∈ dom vol)
6965, 68eqeltrid 2843 . . . . . . . 8 (𝜑 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol)
7063ineq2d 4143 . . . . . . . . . . . 12 (𝑛 = 1 → (𝐸 ∩ (𝐹𝑛)) = (𝐸 ∩ (𝐹‘1)))
7170fveq2d 6760 . . . . . . . . . . 11 (𝑛 = 1 → (vol*‘(𝐸 ∩ (𝐹𝑛))) = (vol*‘(𝐸 ∩ (𝐹‘1))))
72 voliunlem1.6 . . . . . . . . . . 11 𝐻 = (𝑛 ∈ ℕ ↦ (vol*‘(𝐸 ∩ (𝐹𝑛))))
73 fvex 6769 . . . . . . . . . . 11 (vol*‘(𝐸 ∩ (𝐹‘1))) ∈ V
7471, 72, 73fvmpt 6857 . . . . . . . . . 10 (1 ∈ ℕ → (𝐻‘1) = (vol*‘(𝐸 ∩ (𝐹‘1))))
7566, 74ax-mp 5 . . . . . . . . 9 (𝐻‘1) = (vol*‘(𝐸 ∩ (𝐹‘1)))
76 seq1 13662 . . . . . . . . . 10 (1 ∈ ℤ → (seq1( + , 𝐻)‘1) = (𝐻‘1))
7758, 76ax-mp 5 . . . . . . . . 9 (seq1( + , 𝐻)‘1) = (𝐻‘1)
7865ineq2i 4140 . . . . . . . . . 10 (𝐸 𝑛 ∈ (1...1)(𝐹𝑛)) = (𝐸 ∩ (𝐹‘1))
7978fveq2i 6759 . . . . . . . . 9 (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (vol*‘(𝐸 ∩ (𝐹‘1)))
8075, 77, 793eqtr4ri 2777 . . . . . . . 8 (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)
8169, 80jctir 520 . . . . . . 7 (𝜑 → ( 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)))
82 peano2nn 11915 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (𝑘 + 1) ∈ ℕ)
83 ffvelrn 6941 . . . . . . . . . . . . 13 ((𝐹:ℕ⟶dom vol ∧ (𝑘 + 1) ∈ ℕ) → (𝐹‘(𝑘 + 1)) ∈ dom vol)
8414, 82, 83syl2an 595 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ∈ dom vol)
85 unmbl 24606 . . . . . . . . . . . . 13 (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (𝐹‘(𝑘 + 1)) ∈ dom vol) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol)
8685ex 412 . . . . . . . . . . . 12 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol → ((𝐹‘(𝑘 + 1)) ∈ dom vol → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol))
8784, 86syl5com 31 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol))
88 simpr 484 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
89 nnuz 12550 . . . . . . . . . . . . . . 15 ℕ = (ℤ‘1)
9088, 89eleqtrdi 2849 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ (ℤ‘1))
91 fzsuc 13232 . . . . . . . . . . . . . 14 (𝑘 ∈ (ℤ‘1) → (1...(𝑘 + 1)) = ((1...𝑘) ∪ {(𝑘 + 1)}))
92 iuneq1 4937 . . . . . . . . . . . . . 14 ((1...(𝑘 + 1)) = ((1...𝑘) ∪ {(𝑘 + 1)}) → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) = 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛))
9390, 91, 923syl 18 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) = 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛))
94 iunxun 5019 . . . . . . . . . . . . . 14 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ 𝑛 ∈ {(𝑘 + 1)} (𝐹𝑛))
95 ovex 7288 . . . . . . . . . . . . . . . 16 (𝑘 + 1) ∈ V
96 fveq2 6756 . . . . . . . . . . . . . . . 16 (𝑛 = (𝑘 + 1) → (𝐹𝑛) = (𝐹‘(𝑘 + 1)))
9795, 96iunxsn 5016 . . . . . . . . . . . . . . 15 𝑛 ∈ {(𝑘 + 1)} (𝐹𝑛) = (𝐹‘(𝑘 + 1))
9897uneq2i 4090 . . . . . . . . . . . . . 14 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ 𝑛 ∈ {(𝑘 + 1)} (𝐹𝑛)) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1)))
9994, 98eqtri 2766 . . . . . . . . . . . . 13 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1)))
10093, 99eqtrdi 2795 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))))
101100eleq1d 2823 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ↔ ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol))
10287, 101sylibrd 258 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol))
103 oveq1 7262 . . . . . . . . . . 11 ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
104 inss1 4159 . . . . . . . . . . . . . . 15 (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ 𝐸
105104, 26sstrid 3928 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ ℝ)
106 ovolsscl 24555 . . . . . . . . . . . . . . 15 (((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) ∈ ℝ)
107104, 2, 4, 106mp3an2ani 1466 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) ∈ ℝ)
108 mblsplit 24601 . . . . . . . . . . . . . 14 (((𝐹‘(𝑘 + 1)) ∈ dom vol ∧ (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ ℝ ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = ((vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))))))
10984, 105, 107, 108syl3anc 1369 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = ((vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))))))
110 in32 4152 . . . . . . . . . . . . . . . 16 ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1))) = ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ∩ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
111 inss2 4160 . . . . . . . . . . . . . . . . . 18 (𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ (𝐹‘(𝑘 + 1))
11282adantl 481 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ ℕ) → (𝑘 + 1) ∈ ℕ)
113112, 89eleqtrdi 2849 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑘 ∈ ℕ) → (𝑘 + 1) ∈ (ℤ‘1))
114 eluzfz2 13193 . . . . . . . . . . . . . . . . . . 19 ((𝑘 + 1) ∈ (ℤ‘1) → (𝑘 + 1) ∈ (1...(𝑘 + 1)))
11596ssiun2s 4974 . . . . . . . . . . . . . . . . . . 19 ((𝑘 + 1) ∈ (1...(𝑘 + 1)) → (𝐹‘(𝑘 + 1)) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
116113, 114, 1153syl 18 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
117111, 116sstrid 3928 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ ℕ) → (𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
118 df-ss 3900 . . . . . . . . . . . . . . . . 17 ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ↔ ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ∩ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
119117, 118sylib 217 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ ℕ) → ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ∩ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
120110, 119syl5eq 2791 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1))) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
121120fveq2d 6760 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
122 indif2 4201 . . . . . . . . . . . . . . . 16 (𝐸 ∩ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1)))) = ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1)))
123 uncom 4083 . . . . . . . . . . . . . . . . . . 19 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) = ((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛))
124100, 123eqtr2di 2796 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → ((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
125 voliunlem.5 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑Disj 𝑖 ∈ ℕ (𝐹𝑖))
126125ad2antrr 722 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → Disj 𝑖 ∈ ℕ (𝐹𝑖))
127112adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑘 + 1) ∈ ℕ)
12813adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℕ)
129128nnred 11918 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℝ)
130 elfzle2 13189 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑛 ∈ (1...𝑘) → 𝑛𝑘)
131130adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛𝑘)
13288adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑘 ∈ ℕ)
133 nnleltp1 12305 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑛 ∈ ℕ ∧ 𝑘 ∈ ℕ) → (𝑛𝑘𝑛 < (𝑘 + 1)))
134128, 132, 133syl2anc 583 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑛𝑘𝑛 < (𝑘 + 1)))
135131, 134mpbid 231 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 < (𝑘 + 1))
136129, 135gtned 11040 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑘 + 1) ≠ 𝑛)
137 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = (𝑘 + 1) → (𝐹𝑖) = (𝐹‘(𝑘 + 1)))
138 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = 𝑛 → (𝐹𝑖) = (𝐹𝑛))
139137, 138disji2 5052 . . . . . . . . . . . . . . . . . . . . . 22 ((Disj 𝑖 ∈ ℕ (𝐹𝑖) ∧ ((𝑘 + 1) ∈ ℕ ∧ 𝑛 ∈ ℕ) ∧ (𝑘 + 1) ≠ 𝑛) → ((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = ∅)
140126, 127, 128, 136, 139syl121anc 1373 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → ((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = ∅)
141140iuneq2dv 4945 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...𝑘)((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = 𝑛 ∈ (1...𝑘)∅)
142 iunin2 4996 . . . . . . . . . . . . . . . . . . . 20 𝑛 ∈ (1...𝑘)((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = ((𝐹‘(𝑘 + 1)) ∩ 𝑛 ∈ (1...𝑘)(𝐹𝑛))
143 iun0 4987 . . . . . . . . . . . . . . . . . . . 20 𝑛 ∈ (1...𝑘)∅ = ∅
144141, 142, 1433eqtr3g 2802 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑘 ∈ ℕ) → ((𝐹‘(𝑘 + 1)) ∩ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = ∅)
145 uneqdifeq 4420 . . . . . . . . . . . . . . . . . . 19 (((𝐹‘(𝑘 + 1)) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∧ ((𝐹‘(𝑘 + 1)) ∩ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = ∅) → (((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ↔ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1))) = 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
146116, 144, 145syl2anc 583 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → (((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ↔ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1))) = 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
147124, 146mpbid 231 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1))) = 𝑛 ∈ (1...𝑘)(𝐹𝑛))
148147ineq2d 4143 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ ℕ) → (𝐸 ∩ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1)))) = (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
149122, 148eqtr3id 2793 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))) = (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
150149fveq2d 6760 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1)))) = (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
151121, 150oveq12d 7273 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → ((vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))))) = ((vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
152 inss1 4159 . . . . . . . . . . . . . . . 16 (𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝐸
153 ovolsscl 24555 . . . . . . . . . . . . . . . 16 (((𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ ℝ)
154152, 2, 4, 153mp3an2ani 1466 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ ℝ)
155154recnd 10934 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ ℂ)
15612recnd 10934 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℂ)
157155, 156addcomd 11107 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → ((vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
158109, 151, 1573eqtrd 2782 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
159 seqp1 13664 . . . . . . . . . . . . . 14 (𝑘 ∈ (ℤ‘1) → (seq1( + , 𝐻)‘(𝑘 + 1)) = ((seq1( + , 𝐻)‘𝑘) + (𝐻‘(𝑘 + 1))))
16090, 159syl 17 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐻)‘(𝑘 + 1)) = ((seq1( + , 𝐻)‘𝑘) + (𝐻‘(𝑘 + 1))))
16196ineq2d 4143 . . . . . . . . . . . . . . . . 17 (𝑛 = (𝑘 + 1) → (𝐸 ∩ (𝐹𝑛)) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
162161fveq2d 6760 . . . . . . . . . . . . . . . 16 (𝑛 = (𝑘 + 1) → (vol*‘(𝐸 ∩ (𝐹𝑛))) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
163 fvex 6769 . . . . . . . . . . . . . . . 16 (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ V
164162, 72, 163fvmpt 6857 . . . . . . . . . . . . . . 15 ((𝑘 + 1) ∈ ℕ → (𝐻‘(𝑘 + 1)) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
165112, 164syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (𝐻‘(𝑘 + 1)) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
166165oveq2d 7271 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (𝐻‘(𝑘 + 1))) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
167160, 166eqtrd 2778 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐻)‘(𝑘 + 1)) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
168158, 167eqeq12d 2754 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ((vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1)) ↔ ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))))
169103, 168syl5ibr 245 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))
170102, 169anim12d 608 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1)))))
171170expcom 413 . . . . . . . 8 (𝑘 ∈ ℕ → (𝜑 → (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))))
172171a2d 29 . . . . . . 7 (𝑘 ∈ ℕ → ((𝜑 → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘))) → (𝜑 → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))))
17339, 48, 57, 48, 81, 172nnind 11921 . . . . . 6 (𝑘 ∈ ℕ → (𝜑 → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘))))
174173impcom 407 . . . . 5 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)))
175174simprd 495 . . . 4 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘))
176175eqcomd 2744 . . 3 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐻)‘𝑘) = (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
177176oveq1d 7270 . 2 ((𝜑𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ran 𝐹))) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ran 𝐹))))
178174simpld 494 . . 3 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol)
179 mblsplit 24601 . . 3 (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ 𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘𝐸) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
180178, 26, 4, 179syl3anc 1369 . 2 ((𝜑𝑘 ∈ ℕ) → (vol*‘𝐸) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
18130, 177, 1803brtr4d 5102 1 ((𝜑𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ran 𝐹))) ≤ (vol*‘𝐸))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395   = wceq 1539  wcel 2108  wne 2942  wral 3063  cdif 3880  cun 3881  cin 3882  wss 3883  c0 4253  {csn 4558   cuni 4836   ciun 4921  Disj wdisj 5035   class class class wbr 5070  cmpt 5153  dom cdm 5580  ran crn 5581   Fn wfn 6413  wf 6414  cfv 6418  (class class class)co 7255  cr 10801  1c1 10803   + caddc 10805   < clt 10940  cle 10941  cn 11903  cz 12249  cuz 12511  ...cfz 13168  seqcseq 13649  vol*covol 24531  volcvol 24532
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-cnex 10858  ax-resscn 10859  ax-1cn 10860  ax-icn 10861  ax-addcl 10862  ax-addrcl 10863  ax-mulcl 10864  ax-mulrcl 10865  ax-mulcom 10866  ax-addass 10867  ax-mulass 10868  ax-distr 10869  ax-i2m1 10870  ax-1ne0 10871  ax-1rid 10872  ax-rnegex 10873  ax-rrecex 10874  ax-cnre 10875  ax-pre-lttri 10876  ax-pre-lttrn 10877  ax-pre-ltadd 10878  ax-pre-mulgt0 10879  ax-pre-sup 10880
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-nel 3049  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-iun 4923  df-disj 5036  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-er 8456  df-map 8575  df-en 8692  df-dom 8693  df-sdom 8694  df-sup 9131  df-inf 9132  df-pnf 10942  df-mnf 10943  df-xr 10944  df-ltxr 10945  df-le 10946  df-sub 11137  df-neg 11138  df-div 11563  df-nn 11904  df-2 11966  df-3 11967  df-n0 12164  df-z 12250  df-uz 12512  df-q 12618  df-rp 12660  df-ioo 13012  df-ico 13014  df-icc 13015  df-fz 13169  df-fl 13440  df-seq 13650  df-exp 13711  df-cj 14738  df-re 14739  df-im 14740  df-sqrt 14874  df-abs 14875  df-ovol 24533  df-vol 24534
This theorem is referenced by:  voliunlem2  24620  voliunlem3  24621
  Copyright terms: Public domain W3C validator