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

Theorem voliunlem1 25720
Description: Lemma for voliun 25724. (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 4089 . . . 4 (𝐸 ran 𝐹) ⊆ 𝐸
2 voliunlem1.7 . . . 4 (𝜑𝐸 ⊆ ℝ)
3 voliunlem1.8 . . . . 5 (𝜑 → (vol*‘𝐸) ∈ ℝ)
43adantr 485 . . . 4 ((𝜑𝑘 ∈ ℕ) → (vol*‘𝐸) ∈ ℝ)
5 ovolsscl 25656 . . . 4 (((𝐸 ran 𝐹) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 ran 𝐹)) ∈ ℝ)
61, 2, 4, 5mp3an2ani 1496 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ran 𝐹)) ∈ ℝ)
7 difss 4089 . . . 4 (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸
8 ovolsscl 25656 . . . 4 (((𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
97, 2, 4, 8mp3an2ani 1496 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
10 inss1 4188 . . . 4 (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸
11 ovolsscl 25656 . . . 4 (((𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
1210, 2, 4, 11mp3an2ani 1496 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℝ)
13 elfznn 13588 . . . . . . . . 9 (𝑛 ∈ (1...𝑘) → 𝑛 ∈ ℕ)
14 voliunlem.3 . . . . . . . . . . . 12 (𝜑𝐹:ℕ⟶dom vol)
1514ffnd 6706 . . . . . . . . . . 11 (𝜑𝐹 Fn ℕ)
16 fnfvelrn 7075 . . . . . . . . . . 11 ((𝐹 Fn ℕ ∧ 𝑛 ∈ ℕ) → (𝐹𝑛) ∈ ran 𝐹)
1715, 16sylan 591 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ∈ ran 𝐹)
18 elssuni 4903 . . . . . . . . . 10 ((𝐹𝑛) ∈ ran 𝐹 → (𝐹𝑛) ⊆ ran 𝐹)
1917, 18syl 18 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ⊆ ran 𝐹)
2013, 19sylan2 604 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑘)) → (𝐹𝑛) ⊆ ran 𝐹)
2120ralrimiva 3156 . . . . . . 7 (𝜑 → ∀𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
2221adantr 485 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ∀𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
23 iunss 5008 . . . . . 6 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹 ↔ ∀𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
2422, 23sylibr 237 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...𝑘)(𝐹𝑛) ⊆ ran 𝐹)
2524sscond 4099 . . . 4 ((𝜑𝑘 ∈ ℕ) → (𝐸 ran 𝐹) ⊆ (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
262adantr 485 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝐸 ⊆ ℝ)
277, 26sstrid 3947 . . . 4 ((𝜑𝑘 ∈ ℕ) → (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ ℝ)
28 ovolss 25655 . . . 4 (((𝐸 ran 𝐹) ⊆ (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ∧ (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)) ⊆ ℝ) → (vol*‘(𝐸 ran 𝐹)) ≤ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
2925, 27, 28syl2anc 595 . . 3 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ran 𝐹)) ≤ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
306, 9, 12, 29leadd2dd 11835 . 2 ((𝜑𝑘 ∈ ℕ) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ran 𝐹))) ≤ ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
31 oveq2 7420 . . . . . . . . . . 11 (𝑧 = 1 → (1...𝑧) = (1...1))
3231iuneq1d 4983 . . . . . . . . . 10 (𝑧 = 1 → 𝑛 ∈ (1...𝑧)(𝐹𝑛) = 𝑛 ∈ (1...1)(𝐹𝑛))
3332eleq1d 2847 . . . . . . . . 9 (𝑧 = 1 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ↔ 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol))
3432ineq2d 4172 . . . . . . . . . . 11 (𝑧 = 1 → (𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛)) = (𝐸 𝑛 ∈ (1...1)(𝐹𝑛)))
3534fveq2d 6885 . . . . . . . . . 10 (𝑧 = 1 → (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))))
36 fveq2 6881 . . . . . . . . . 10 (𝑧 = 1 → (seq1( + , 𝐻)‘𝑧) = (seq1( + , 𝐻)‘1))
3735, 36eqeq12d 2778 . . . . . . . . 9 (𝑧 = 1 → ((vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧) ↔ (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)))
3833, 37anbi12d 643 . . . . . . . 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 7420 . . . . . . . . . . 11 (𝑧 = 𝑘 → (1...𝑧) = (1...𝑘))
4140iuneq1d 4983 . . . . . . . . . 10 (𝑧 = 𝑘 𝑛 ∈ (1...𝑧)(𝐹𝑛) = 𝑛 ∈ (1...𝑘)(𝐹𝑛))
4241eleq1d 2847 . . . . . . . . 9 (𝑧 = 𝑘 → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ↔ 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol))
4341ineq2d 4172 . . . . . . . . . . 11 (𝑧 = 𝑘 → (𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛)) = (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
4443fveq2d 6885 . . . . . . . . . 10 (𝑧 = 𝑘 → (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
45 fveq2 6881 . . . . . . . . . 10 (𝑧 = 𝑘 → (seq1( + , 𝐻)‘𝑧) = (seq1( + , 𝐻)‘𝑘))
4644, 45eqeq12d 2778 . . . . . . . . 9 (𝑧 = 𝑘 → ((vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧) ↔ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)))
4742, 46anbi12d 643 . . . . . . . 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 7420 . . . . . . . . . . 11 (𝑧 = (𝑘 + 1) → (1...𝑧) = (1...(𝑘 + 1)))
5049iuneq1d 4983 . . . . . . . . . 10 (𝑧 = (𝑘 + 1) → 𝑛 ∈ (1...𝑧)(𝐹𝑛) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
5150eleq1d 2847 . . . . . . . . 9 (𝑧 = (𝑘 + 1) → ( 𝑛 ∈ (1...𝑧)(𝐹𝑛) ∈ dom vol ↔ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol))
5250ineq2d 4172 . . . . . . . . . . 11 (𝑧 = (𝑘 + 1) → (𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛)) = (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)))
5352fveq2d 6885 . . . . . . . . . 10 (𝑧 = (𝑘 + 1) → (vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))))
54 fveq2 6881 . . . . . . . . . 10 (𝑧 = (𝑘 + 1) → (seq1( + , 𝐻)‘𝑧) = (seq1( + , 𝐻)‘(𝑘 + 1)))
5553, 54eqeq12d 2778 . . . . . . . . 9 (𝑧 = (𝑘 + 1) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑧)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑧) ↔ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1))))
5651, 55anbi12d 643 . . . . . . . 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 12630 . . . . . . . . . . 11 1 ∈ ℤ
59 fzsn 13601 . . . . . . . . . . 11 (1 ∈ ℤ → (1...1) = {1})
60 iuneq1 4972 . . . . . . . . . . 11 ((1...1) = {1} → 𝑛 ∈ (1...1)(𝐹𝑛) = 𝑛 ∈ {1} (𝐹𝑛))
6158, 59, 60mp2b 10 . . . . . . . . . 10 𝑛 ∈ (1...1)(𝐹𝑛) = 𝑛 ∈ {1} (𝐹𝑛)
62 1ex 11209 . . . . . . . . . . 11 1 ∈ V
63 fveq2 6881 . . . . . . . . . . 11 (𝑛 = 1 → (𝐹𝑛) = (𝐹‘1))
6462, 63iunxsn 5056 . . . . . . . . . 10 𝑛 ∈ {1} (𝐹𝑛) = (𝐹‘1)
6561, 64eqtri 2785 . . . . . . . . 9 𝑛 ∈ (1...1)(𝐹𝑛) = (𝐹‘1)
66 1nn 12250 . . . . . . . . . 10 1 ∈ ℕ
67 ffvelcdm 7076 . . . . . . . . . 10 ((𝐹:ℕ⟶dom vol ∧ 1 ∈ ℕ) → (𝐹‘1) ∈ dom vol)
6814, 66, 67sylancl 597 . . . . . . . . 9 (𝜑 → (𝐹‘1) ∈ dom vol)
6965, 68eqeltrid 2866 . . . . . . . 8 (𝜑 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol)
7063ineq2d 4172 . . . . . . . . . . . 12 (𝑛 = 1 → (𝐸 ∩ (𝐹𝑛)) = (𝐸 ∩ (𝐹‘1)))
7170fveq2d 6885 . . . . . . . . . . 11 (𝑛 = 1 → (vol*‘(𝐸 ∩ (𝐹𝑛))) = (vol*‘(𝐸 ∩ (𝐹‘1))))
72 voliunlem1.6 . . . . . . . . . . 11 𝐻 = (𝑛 ∈ ℕ ↦ (vol*‘(𝐸 ∩ (𝐹𝑛))))
73 fvex 6894 . . . . . . . . . . 11 (vol*‘(𝐸 ∩ (𝐹‘1))) ∈ V
7471, 72, 73fvmpt 6989 . . . . . . . . . 10 (1 ∈ ℕ → (𝐻‘1) = (vol*‘(𝐸 ∩ (𝐹‘1))))
7566, 74ax-mp 5 . . . . . . . . 9 (𝐻‘1) = (vol*‘(𝐸 ∩ (𝐹‘1)))
76 seq1 14057 . . . . . . . . . 10 (1 ∈ ℤ → (seq1( + , 𝐻)‘1) = (𝐻‘1))
7758, 76ax-mp 5 . . . . . . . . 9 (seq1( + , 𝐻)‘1) = (𝐻‘1)
7865ineq2i 4169 . . . . . . . . . 10 (𝐸 𝑛 ∈ (1...1)(𝐹𝑛)) = (𝐸 ∩ (𝐹‘1))
7978fveq2i 6884 . . . . . . . . 9 (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (vol*‘(𝐸 ∩ (𝐹‘1)))
8075, 77, 793eqtr4ri 2796 . . . . . . . 8 (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)
8169, 80jctir 529 . . . . . . 7 (𝜑 → ( 𝑛 ∈ (1...1)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...1)(𝐹𝑛))) = (seq1( + , 𝐻)‘1)))
82 peano2nn 12251 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (𝑘 + 1) ∈ ℕ)
83 ffvelcdm 7076 . . . . . . . . . . . . 13 ((𝐹:ℕ⟶dom vol ∧ (𝑘 + 1) ∈ ℕ) → (𝐹‘(𝑘 + 1)) ∈ dom vol)
8414, 82, 83syl2an 607 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ∈ dom vol)
85 unmbl 25707 . . . . . . . . . . . . 13 (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (𝐹‘(𝑘 + 1)) ∈ dom vol) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol)
8685ex 417 . . . . . . . . . . . 12 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol → ((𝐹‘(𝑘 + 1)) ∈ dom vol → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol))
8784, 86syl5com 32 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol))
88 simpr 489 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
89 nnuz 12907 . . . . . . . . . . . . . . 15 ℕ = (ℤ‘1)
9088, 89eleqtrdi 2872 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ (ℤ‘1))
91 fzsuc 13606 . . . . . . . . . . . . . 14 (𝑘 ∈ (ℤ‘1) → (1...(𝑘 + 1)) = ((1...𝑘) ∪ {(𝑘 + 1)}))
92 iuneq1 4972 . . . . . . . . . . . . . 14 ((1...(𝑘 + 1)) = ((1...𝑘) ∪ {(𝑘 + 1)}) → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) = 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛))
9390, 91, 923syl 19 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) = 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛))
94 iunxun 5059 . . . . . . . . . . . . . 14 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ 𝑛 ∈ {(𝑘 + 1)} (𝐹𝑛))
95 ovex 7445 . . . . . . . . . . . . . . . 16 (𝑘 + 1) ∈ V
96 fveq2 6881 . . . . . . . . . . . . . . . 16 (𝑛 = (𝑘 + 1) → (𝐹𝑛) = (𝐹‘(𝑘 + 1)))
9795, 96iunxsn 5056 . . . . . . . . . . . . . . 15 𝑛 ∈ {(𝑘 + 1)} (𝐹𝑛) = (𝐹‘(𝑘 + 1))
9897uneq2i 4118 . . . . . . . . . . . . . 14 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ 𝑛 ∈ {(𝑘 + 1)} (𝐹𝑛)) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1)))
9994, 98eqtri 2785 . . . . . . . . . . . . 13 𝑛 ∈ ((1...𝑘) ∪ {(𝑘 + 1)})(𝐹𝑛) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1)))
10093, 99eqtrdi 2813 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) = ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))))
101100eleq1d 2847 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ↔ ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) ∈ dom vol))
10287, 101sylibrd 262 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol → 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol))
103 oveq1 7419 . . . . . . . . . . 11 ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘) → ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
104 inss1 4188 . . . . . . . . . . . . . . 15 (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ 𝐸
105104, 26sstrid 3947 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ ℝ)
106 ovolsscl 25656 . . . . . . . . . . . . . . 15 (((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) ∈ ℝ)
107104, 2, 4, 106mp3an2ani 1496 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) ∈ ℝ)
108 mblsplit 25702 . . . . . . . . . . . . . 14 (((𝐹‘(𝑘 + 1)) ∈ dom vol ∧ (𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ⊆ ℝ ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) ∈ ℝ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = ((vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))))))
10984, 105, 107, 108syl3anc 1397 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = ((vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))))))
110 in32 4181 . . . . . . . . . . . . . . . 16 ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1))) = ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ∩ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
111 inss2 4189 . . . . . . . . . . . . . . . . . 18 (𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ (𝐹‘(𝑘 + 1))
11282adantl 486 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ ℕ) → (𝑘 + 1) ∈ ℕ)
113112, 89eleqtrdi 2872 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑘 ∈ ℕ) → (𝑘 + 1) ∈ (ℤ‘1))
114 eluzfz2 13566 . . . . . . . . . . . . . . . . . . 19 ((𝑘 + 1) ∈ (ℤ‘1) → (𝑘 + 1) ∈ (1...(𝑘 + 1)))
11596ssiun2s 5012 . . . . . . . . . . . . . . . . . . 19 ((𝑘 + 1) ∈ (1...(𝑘 + 1)) → (𝐹‘(𝑘 + 1)) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
116113, 114, 1153syl 19 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
117111, 116sstrid 3947 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ ℕ) → (𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
118 dfss2 3922 . . . . . . . . . . . . . . . . 17 ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ↔ ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ∩ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
119117, 118sylib 221 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ ℕ) → ((𝐸 ∩ (𝐹‘(𝑘 + 1))) ∩ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
120110, 119eqtrid 2809 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1))) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
121120fveq2d 6885 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
122 indif2 4233 . . . . . . . . . . . . . . . 16 (𝐸 ∩ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1)))) = ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1)))
123 uncom 4111 . . . . . . . . . . . . . . . . . . 19 ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∪ (𝐹‘(𝑘 + 1))) = ((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛))
124100, 123eqtr2di 2814 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → ((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))
125 voliunlem.5 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑Disj 𝑖 ∈ ℕ (𝐹𝑖))
126125ad2antrr 738 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → Disj 𝑖 ∈ ℕ (𝐹𝑖))
127112adantr 485 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑘 + 1) ∈ ℕ)
12813adantl 486 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℕ)
129128nnred 12254 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℝ)
130 elfzle2 13562 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑛 ∈ (1...𝑘) → 𝑛𝑘)
131130adantl 486 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛𝑘)
13288adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑘 ∈ ℕ)
133 nnleltp1 12657 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑛 ∈ ℕ ∧ 𝑘 ∈ ℕ) → (𝑛𝑘𝑛 < (𝑘 + 1)))
134128, 132, 133syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑛𝑘𝑛 < (𝑘 + 1)))
135131, 134mpbid 235 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 < (𝑘 + 1))
136129, 135gtned 11351 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑘 + 1) ≠ 𝑛)
137 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = (𝑘 + 1) → (𝐹𝑖) = (𝐹‘(𝑘 + 1)))
138 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = 𝑛 → (𝐹𝑖) = (𝐹𝑛))
139137, 138disji2 5092 . . . . . . . . . . . . . . . . . . . . . 22 ((Disj 𝑖 ∈ ℕ (𝐹𝑖) ∧ ((𝑘 + 1) ∈ ℕ ∧ 𝑛 ∈ ℕ) ∧ (𝑘 + 1) ≠ 𝑛) → ((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = ∅)
140126, 127, 128, 136, 139syl121anc 1401 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → ((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = ∅)
141140iuneq2dv 4980 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...𝑘)((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = 𝑛 ∈ (1...𝑘)∅)
142 iunin2 5034 . . . . . . . . . . . . . . . . . . . 20 𝑛 ∈ (1...𝑘)((𝐹‘(𝑘 + 1)) ∩ (𝐹𝑛)) = ((𝐹‘(𝑘 + 1)) ∩ 𝑛 ∈ (1...𝑘)(𝐹𝑛))
143 iun0 5025 . . . . . . . . . . . . . . . . . . . 20 𝑛 ∈ (1...𝑘)∅ = ∅
144141, 142, 1433eqtr3g 2820 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑘 ∈ ℕ) → ((𝐹‘(𝑘 + 1)) ∩ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = ∅)
145 uneqdifeq 4452 . . . . . . . . . . . . . . . . . . 19 (((𝐹‘(𝑘 + 1)) ⊆ 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∧ ((𝐹‘(𝑘 + 1)) ∩ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = ∅) → (((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ↔ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1))) = 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
146116, 144, 145syl2anc 595 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ ℕ) → (((𝐹‘(𝑘 + 1)) ∪ 𝑛 ∈ (1...𝑘)(𝐹𝑛)) = 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ↔ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1))) = 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
147124, 146mpbid 235 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1))) = 𝑛 ∈ (1...𝑘)(𝐹𝑛))
148147ineq2d 4172 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ ℕ) → (𝐸 ∩ ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∖ (𝐹‘(𝑘 + 1)))) = (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
149122, 148eqtr3id 2811 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → ((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))) = (𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))
150149fveq2d 6885 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1)))) = (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
151121, 150oveq12d 7430 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → ((vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘((𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛)) ∖ (𝐹‘(𝑘 + 1))))) = ((vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
152 inss1 4188 . . . . . . . . . . . . . . . 16 (𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝐸
153 ovolsscl 25656 . . . . . . . . . . . . . . . 16 (((𝐸 ∩ (𝐹‘(𝑘 + 1))) ⊆ 𝐸𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ ℝ)
154152, 2, 4, 153mp3an2ani 1496 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ ℝ)
155154recnd 11243 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ ℂ)
15612recnd 11243 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) ∈ ℂ)
157155, 156addcomd 11418 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → ((vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
158109, 151, 1573eqtrd 2801 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
159 seqp1 14059 . . . . . . . . . . . . . 14 (𝑘 ∈ (ℤ‘1) → (seq1( + , 𝐻)‘(𝑘 + 1)) = ((seq1( + , 𝐻)‘𝑘) + (𝐻‘(𝑘 + 1))))
16090, 159syl 18 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐻)‘(𝑘 + 1)) = ((seq1( + , 𝐻)‘𝑘) + (𝐻‘(𝑘 + 1))))
16196ineq2d 4172 . . . . . . . . . . . . . . . . 17 (𝑛 = (𝑘 + 1) → (𝐸 ∩ (𝐹𝑛)) = (𝐸 ∩ (𝐹‘(𝑘 + 1))))
162161fveq2d 6885 . . . . . . . . . . . . . . . 16 (𝑛 = (𝑘 + 1) → (vol*‘(𝐸 ∩ (𝐹𝑛))) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
163 fvex 6894 . . . . . . . . . . . . . . . 16 (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))) ∈ V
164162, 72, 163fvmpt 6989 . . . . . . . . . . . . . . 15 ((𝑘 + 1) ∈ ℕ → (𝐻‘(𝑘 + 1)) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
165112, 164syl 18 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (𝐻‘(𝑘 + 1)) = (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1)))))
166165oveq2d 7428 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (𝐻‘(𝑘 + 1))) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
167160, 166eqtrd 2797 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐻)‘(𝑘 + 1)) = ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ∩ (𝐹‘(𝑘 + 1))))))
168158, 167eqeq12d 2778 . . . . . . . . . . 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 620 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)) → ( 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...(𝑘 + 1))(𝐹𝑛))) = (seq1( + , 𝐻)‘(𝑘 + 1)))))
171170expcom 418 . . . . . . . 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 12257 . . . . . 6 (𝑘 ∈ ℕ → (𝜑 → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘))))
174173impcom 412 . . . . 5 ((𝜑𝑘 ∈ ℕ) → ( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘)))
175174simprd 500 . . . 4 ((𝜑𝑘 ∈ ℕ) → (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) = (seq1( + , 𝐻)‘𝑘))
176175eqcomd 2768 . . 3 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐻)‘𝑘) = (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))))
177176oveq1d 7427 . 2 ((𝜑𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ran 𝐹))) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 ran 𝐹))))
178174simpld 499 . . 3 ((𝜑𝑘 ∈ ℕ) → 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol)
179 mblsplit 25702 . . 3 (( 𝑛 ∈ (1...𝑘)(𝐹𝑛) ∈ dom vol ∧ 𝐸 ⊆ ℝ ∧ (vol*‘𝐸) ∈ ℝ) → (vol*‘𝐸) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
180178, 26, 4, 179syl3anc 1397 . 2 ((𝜑𝑘 ∈ ℕ) → (vol*‘𝐸) = ((vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛))) + (vol*‘(𝐸 𝑛 ∈ (1...𝑘)(𝐹𝑛)))))
18130, 177, 1803brtr4d 5142 1 ((𝜑𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝐸 ran 𝐹))) ≤ (vol*‘𝐸))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 400   = wceq 1569  wcel 2142  wne 2957  wral 3078  cdif 3901  cun 3902  cin 3903  wss 3904  c0 4285  {csn 4588   cuni 4871   ciun 4955  Disj wdisj 5075   class class class wbr 5108  cmpt 5191  dom cdm 5660  ran crn 5661   Fn wfn 6531  wf 6532  cfv 6536  (class class class)co 7412  cr 11105  1c1 11107   + caddc 11109   < clt 11249  cle 11250  cn 12239  cz 12597  cuz 12868  ...cfz 13541  seqcseq 14044  vol*covol 25632  volcvol 25633
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-sep 5256  ax-nul 5268  ax-pow 5335  ax-pr 5403  ax-un 7734  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1103  df-3an 1104  df-tru 1572  df-fal 1582  df-ex 1809  df-nf 1813  df-sb 2096  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3064  df-ral 3079  df-rex 3089  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3456  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-iun 4957  df-disj 5076  df-br 5109  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5555  df-eprel 5560  df-po 5568  df-so 5569  df-fr 5613  df-we 5615  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-res 5672  df-ima 5673  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7861  df-1st 7984  df-2nd 7985  df-frecs 8276  df-wrecs 8307  df-recs 8356  df-rdg 8395  df-er 8692  df-map 8824  df-en 8942  df-dom 8943  df-sdom 8944  df-sup 9400  df-inf 9401  df-pnf 11251  df-mnf 11252  df-xr 11253  df-ltxr 11254  df-le 11255  df-sub 11449  df-neg 11450  df-div 11878  df-nn 12240  df-2 12309  df-3 12310  df-n0 12511  df-z 12598  df-uz 12869  df-q 12979  df-rp 13023  df-ioo 13382  df-ico 13384  df-icc 13385  df-fz 13542  df-fl 13832  df-seq 14045  df-exp 14105  df-cj 15157  df-re 15158  df-im 15159  df-sqrt 15293  df-abs 15294  df-ovol 25634  df-vol 25635
This theorem is used by:  voliunlem2  25721  voliunlem3  25722
  Copyright terms: Public domain W3C validator