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

Theorem uniioombllem6 25562
Description: Lemma for uniioombl 25563. (Contributed by Mario Carneiro, 26-Mar-2015.)
Hypotheses
Ref Expression
uniioombl.1 (𝜑𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
uniioombl.2 (𝜑Disj 𝑥 ∈ ℕ ((,)‘(𝐹𝑥)))
uniioombl.3 𝑆 = seq1( + , ((abs ∘ − ) ∘ 𝐹))
uniioombl.a 𝐴 = ran ((,) ∘ 𝐹)
uniioombl.e (𝜑 → (vol*‘𝐸) ∈ ℝ)
uniioombl.c (𝜑𝐶 ∈ ℝ+)
uniioombl.g (𝜑𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
uniioombl.s (𝜑𝐸 ran ((,) ∘ 𝐺))
uniioombl.t 𝑇 = seq1( + , ((abs ∘ − ) ∘ 𝐺))
uniioombl.v (𝜑 → sup(ran 𝑇, ℝ*, < ) ≤ ((vol*‘𝐸) + 𝐶))
Assertion
Ref Expression
uniioombllem6 (𝜑 → ((vol*‘(𝐸𝐴)) + (vol*‘(𝐸𝐴))) ≤ ((vol*‘𝐸) + (4 · 𝐶)))
Distinct variable groups:   𝑥,𝐹   𝑥,𝐺   𝑥,𝐴   𝑥,𝐶   𝜑,𝑥   𝑥,𝑇
Allowed substitution hints:   𝑆(𝑥)   𝐸(𝑥)

Proof of Theorem uniioombllem6
Dummy variables 𝑎 𝑖 𝑗 𝑘 𝑛 𝑦 𝑧 𝑚 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nnuz 12804 . . . 4 ℕ = (ℤ‘1)
2 1zzd 12536 . . . 4 (𝜑 → 1 ∈ ℤ)
3 uniioombl.c . . . 4 (𝜑𝐶 ∈ ℝ+)
4 eqidd 2738 . . . 4 ((𝜑𝑚 ∈ ℕ) → (𝑇𝑚) = (𝑇𝑚))
5 uniioombl.t . . . . . 6 𝑇 = seq1( + , ((abs ∘ − ) ∘ 𝐺))
6 eqidd 2738 . . . . . 6 ((𝜑𝑎 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘𝑎) = (((abs ∘ − ) ∘ 𝐺)‘𝑎))
7 uniioombl.g . . . . . . . . . 10 (𝜑𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
8 eqid 2737 . . . . . . . . . . 11 ((abs ∘ − ) ∘ 𝐺) = ((abs ∘ − ) ∘ 𝐺)
98ovolfsf 25445 . . . . . . . . . 10 (𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → ((abs ∘ − ) ∘ 𝐺):ℕ⟶(0[,)+∞))
107, 9syl 17 . . . . . . . . 9 (𝜑 → ((abs ∘ − ) ∘ 𝐺):ℕ⟶(0[,)+∞))
1110ffvelcdmda 7040 . . . . . . . 8 ((𝜑𝑎 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘𝑎) ∈ (0[,)+∞))
12 elrege0 13384 . . . . . . . 8 ((((abs ∘ − ) ∘ 𝐺)‘𝑎) ∈ (0[,)+∞) ↔ ((((abs ∘ − ) ∘ 𝐺)‘𝑎) ∈ ℝ ∧ 0 ≤ (((abs ∘ − ) ∘ 𝐺)‘𝑎)))
1311, 12sylib 218 . . . . . . 7 ((𝜑𝑎 ∈ ℕ) → ((((abs ∘ − ) ∘ 𝐺)‘𝑎) ∈ ℝ ∧ 0 ≤ (((abs ∘ − ) ∘ 𝐺)‘𝑎)))
1413simpld 494 . . . . . 6 ((𝜑𝑎 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘𝑎) ∈ ℝ)
1513simprd 495 . . . . . 6 ((𝜑𝑎 ∈ ℕ) → 0 ≤ (((abs ∘ − ) ∘ 𝐺)‘𝑎))
16 uniioombl.1 . . . . . . . 8 (𝜑𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
17 uniioombl.2 . . . . . . . 8 (𝜑Disj 𝑥 ∈ ℕ ((,)‘(𝐹𝑥)))
18 uniioombl.3 . . . . . . . 8 𝑆 = seq1( + , ((abs ∘ − ) ∘ 𝐹))
19 uniioombl.a . . . . . . . 8 𝐴 = ran ((,) ∘ 𝐹)
20 uniioombl.e . . . . . . . 8 (𝜑 → (vol*‘𝐸) ∈ ℝ)
21 uniioombl.s . . . . . . . 8 (𝜑𝐸 ran ((,) ∘ 𝐺))
22 uniioombl.v . . . . . . . 8 (𝜑 → sup(ran 𝑇, ℝ*, < ) ≤ ((vol*‘𝐸) + 𝐶))
2316, 17, 18, 19, 20, 3, 7, 21, 5, 22uniioombllem1 25555 . . . . . . 7 (𝜑 → sup(ran 𝑇, ℝ*, < ) ∈ ℝ)
248, 5ovolsf 25446 . . . . . . . . . . . . 13 (𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑇:ℕ⟶(0[,)+∞))
257, 24syl 17 . . . . . . . . . . . 12 (𝜑𝑇:ℕ⟶(0[,)+∞))
2625frnd 6680 . . . . . . . . . . 11 (𝜑 → ran 𝑇 ⊆ (0[,)+∞))
27 icossxr 13362 . . . . . . . . . . 11 (0[,)+∞) ⊆ ℝ*
2826, 27sstrdi 3948 . . . . . . . . . 10 (𝜑 → ran 𝑇 ⊆ ℝ*)
29 supxrub 13253 . . . . . . . . . 10 ((ran 𝑇 ⊆ ℝ*𝑥 ∈ ran 𝑇) → 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3028, 29sylan 581 . . . . . . . . 9 ((𝜑𝑥 ∈ ran 𝑇) → 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3130ralrimiva 3130 . . . . . . . 8 (𝜑 → ∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3225ffnd 6673 . . . . . . . . 9 (𝜑𝑇 Fn ℕ)
33 breq1 5103 . . . . . . . . . 10 (𝑥 = (𝑇𝑚) → (𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3433ralrn 7044 . . . . . . . . 9 (𝑇 Fn ℕ → (∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3532, 34syl 17 . . . . . . . 8 (𝜑 → (∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3631, 35mpbid 232 . . . . . . 7 (𝜑 → ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < ))
37 brralrspcev 5160 . . . . . . 7 ((sup(ran 𝑇, ℝ*, < ) ∈ ℝ ∧ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )) → ∃𝑥 ∈ ℝ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ 𝑥)
3823, 36, 37syl2anc 585 . . . . . 6 (𝜑 → ∃𝑥 ∈ ℝ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ 𝑥)
391, 5, 2, 6, 14, 15, 38isumsup2 15783 . . . . 5 (𝜑𝑇 ⇝ sup(ran 𝑇, ℝ, < ))
40 rge0ssre 13386 . . . . . . 7 (0[,)+∞) ⊆ ℝ
4126, 40sstrdi 3948 . . . . . 6 (𝜑 → ran 𝑇 ⊆ ℝ)
42 1nn 12170 . . . . . . . . 9 1 ∈ ℕ
4325fdmd 6682 . . . . . . . . 9 (𝜑 → dom 𝑇 = ℕ)
4442, 43eleqtrrid 2844 . . . . . . . 8 (𝜑 → 1 ∈ dom 𝑇)
4544ne0d 4296 . . . . . . 7 (𝜑 → dom 𝑇 ≠ ∅)
46 dm0rn0 5883 . . . . . . . 8 (dom 𝑇 = ∅ ↔ ran 𝑇 = ∅)
4746necon3bii 2985 . . . . . . 7 (dom 𝑇 ≠ ∅ ↔ ran 𝑇 ≠ ∅)
4845, 47sylib 218 . . . . . 6 (𝜑 → ran 𝑇 ≠ ∅)
49 brralrspcev 5160 . . . . . . 7 ((sup(ran 𝑇, ℝ*, < ) ∈ ℝ ∧ ∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < )) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦)
5023, 31, 49syl2anc 585 . . . . . 6 (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦)
51 supxrre 13256 . . . . . 6 ((ran 𝑇 ⊆ ℝ ∧ ran 𝑇 ≠ ∅ ∧ ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦) → sup(ran 𝑇, ℝ*, < ) = sup(ran 𝑇, ℝ, < ))
5241, 48, 50, 51syl3anc 1374 . . . . 5 (𝜑 → sup(ran 𝑇, ℝ*, < ) = sup(ran 𝑇, ℝ, < ))
5339, 52breqtrrd 5128 . . . 4 (𝜑𝑇 ⇝ sup(ran 𝑇, ℝ*, < ))
541, 2, 3, 4, 53climi2 15448 . . 3 (𝜑 → ∃𝑗 ∈ ℕ ∀𝑚 ∈ (ℤ𝑗)(abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
551r19.2uz 15289 . . 3 (∃𝑗 ∈ ℕ ∀𝑚 ∈ (ℤ𝑗)(abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶 → ∃𝑚 ∈ ℕ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
5654, 55syl 17 . 2 (𝜑 → ∃𝑚 ∈ ℕ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
57 1zzd 12536 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 1 ∈ ℤ)
583ad2antrr 727 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝐶 ∈ ℝ+)
59 simplrl 777 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝑚 ∈ ℕ)
6059nnrpd 12961 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝑚 ∈ ℝ+)
6158, 60rpdivcld 12980 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐶 / 𝑚) ∈ ℝ+)
62 fvex 6857 . . . . . . . . . . . . . . . 16 ((,)‘(𝐹𝑧)) ∈ V
6362inex1 5266 . . . . . . . . . . . . . . 15 (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V
6463rgenw 3056 . . . . . . . . . . . . . 14 𝑧 ∈ ℕ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V
65 eqid 2737 . . . . . . . . . . . . . . 15 (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
6665fnmpt 6642 . . . . . . . . . . . . . 14 (∀𝑧 ∈ ℕ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V → (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) Fn ℕ)
6764, 66mp1i 13 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) Fn ℕ)
68 elfznn 13483 . . . . . . . . . . . . 13 (𝑖 ∈ (1...𝑛) → 𝑖 ∈ ℕ)
69 fvco2 6941 . . . . . . . . . . . . 13 (((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) Fn ℕ ∧ 𝑖 ∈ ℕ) → ((vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))‘𝑖) = (vol*‘((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖)))
7067, 68, 69syl2an 597 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))‘𝑖) = (vol*‘((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖)))
7168adantl 481 . . . . . . . . . . . . . 14 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → 𝑖 ∈ ℕ)
72 2fveq3 6849 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑖 → ((,)‘(𝐹𝑧)) = ((,)‘(𝐹𝑖)))
7372ineq1d 4173 . . . . . . . . . . . . . . 15 (𝑧 = 𝑖 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
74 fvex 6857 . . . . . . . . . . . . . . . 16 ((,)‘(𝐹𝑖)) ∈ V
7574inex1 5266 . . . . . . . . . . . . . . 15 (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ∈ V
7673, 65, 75fvmpt 6951 . . . . . . . . . . . . . 14 (𝑖 ∈ ℕ → ((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
7771, 76syl 17 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
7877fveq2d 6848 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖)) = (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))))
7970, 78eqtrd 2772 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))‘𝑖) = (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))))
80 simpr 484 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
8180, 1eleqtrdi 2847 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ (ℤ‘1))
82 inss2 4192 . . . . . . . . . . . . 13 (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ⊆ ((,)‘(𝐺𝑗))
837adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
84 elfznn 13483 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ (1...𝑚) → 𝑗 ∈ ℕ)
85 ffvelcdm 7037 . . . . . . . . . . . . . . . . . . . 20 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑗 ∈ ℕ) → (𝐺𝑗) ∈ ( ≤ ∩ (ℝ × ℝ)))
8683, 84, 85syl2an 597 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) ∈ ( ≤ ∩ (ℝ × ℝ)))
8786elin2d 4159 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) ∈ (ℝ × ℝ))
88 1st2nd2 7984 . . . . . . . . . . . . . . . . . 18 ((𝐺𝑗) ∈ (ℝ × ℝ) → (𝐺𝑗) = ⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
8987, 88syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) = ⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
9089fveq2d 6848 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) = ((,)‘⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩))
91 df-ov 7373 . . . . . . . . . . . . . . . 16 ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))) = ((,)‘⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
9290, 91eqtr4di 2790 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) = ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))))
93 ioossre 13337 . . . . . . . . . . . . . . 15 ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))) ⊆ ℝ
9492, 93eqsstrdi 3980 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) ⊆ ℝ)
9594ad2antrr 727 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((,)‘(𝐺𝑗)) ⊆ ℝ)
9692fveq2d 6848 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (vol*‘((,)‘(𝐺𝑗))) = (vol*‘((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗)))))
97 ovolfcl 25440 . . . . . . . . . . . . . . . . . 18 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑗 ∈ ℕ) → ((1st ‘(𝐺𝑗)) ∈ ℝ ∧ (2nd ‘(𝐺𝑗)) ∈ ℝ ∧ (1st ‘(𝐺𝑗)) ≤ (2nd ‘(𝐺𝑗))))
9883, 84, 97syl2an 597 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((1st ‘(𝐺𝑗)) ∈ ℝ ∧ (2nd ‘(𝐺𝑗)) ∈ ℝ ∧ (1st ‘(𝐺𝑗)) ≤ (2nd ‘(𝐺𝑗))))
99 ovolioo 25542 . . . . . . . . . . . . . . . . 17 (((1st ‘(𝐺𝑗)) ∈ ℝ ∧ (2nd ‘(𝐺𝑗)) ∈ ℝ ∧ (1st ‘(𝐺𝑗)) ≤ (2nd ‘(𝐺𝑗))) → (vol*‘((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗)))) = ((2nd ‘(𝐺𝑗)) − (1st ‘(𝐺𝑗))))
10098, 99syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (vol*‘((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗)))) = ((2nd ‘(𝐺𝑗)) − (1st ‘(𝐺𝑗))))
10196, 100eqtrd 2772 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (vol*‘((,)‘(𝐺𝑗))) = ((2nd ‘(𝐺𝑗)) − (1st ‘(𝐺𝑗))))
10298simp2d 1144 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (2nd ‘(𝐺𝑗)) ∈ ℝ)
10398simp1d 1143 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (1st ‘(𝐺𝑗)) ∈ ℝ)
104102, 103resubcld 11579 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((2nd ‘(𝐺𝑗)) − (1st ‘(𝐺𝑗))) ∈ ℝ)
105101, 104eqeltrd 2837 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (vol*‘((,)‘(𝐺𝑗))) ∈ ℝ)
106105ad2antrr 727 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘((,)‘(𝐺𝑗))) ∈ ℝ)
107 ovolsscl 25460 . . . . . . . . . . . . 13 (((((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ⊆ ((,)‘(𝐺𝑗)) ∧ ((,)‘(𝐺𝑗)) ⊆ ℝ ∧ (vol*‘((,)‘(𝐺𝑗))) ∈ ℝ) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℝ)
10882, 95, 106, 107mp3an2i 1469 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℝ)
109108recnd 11174 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℂ)
11079, 81, 109fsumser 15667 . . . . . . . . . 10 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = (seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))))‘𝑛))
111110eqcomd 2743 . . . . . . . . 9 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → (seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))))‘𝑛) = Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))))
112 2fveq3 6849 . . . . . . . . . . . . . 14 (𝑧 = 𝑘 → ((,)‘(𝐹𝑧)) = ((,)‘(𝐹𝑘)))
113112ineq1d 4173 . . . . . . . . . . . . 13 (𝑧 = 𝑘 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑘)) ∩ ((,)‘(𝐺𝑗))))
114113cbvmptv 5204 . . . . . . . . . . . 12 (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (𝑘 ∈ ℕ ↦ (((,)‘(𝐹𝑘)) ∩ ((,)‘(𝐺𝑗))))
115 eqeq1 2741 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → (𝑧 = ∅ ↔ 𝑥 = ∅))
116 infeq1 9394 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → inf(𝑧, ℝ*, < ) = inf(𝑥, ℝ*, < ))
117 supeq1 9362 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → sup(𝑧, ℝ*, < ) = sup(𝑥, ℝ*, < ))
118116, 117opeq12d 4839 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → ⟨inf(𝑧, ℝ*, < ), sup(𝑧, ℝ*, < )⟩ = ⟨inf(𝑥, ℝ*, < ), sup(𝑥, ℝ*, < )⟩)
119115, 118ifbieq2d 4508 . . . . . . . . . . . . 13 (𝑧 = 𝑥 → if(𝑧 = ∅, ⟨0, 0⟩, ⟨inf(𝑧, ℝ*, < ), sup(𝑧, ℝ*, < )⟩) = if(𝑥 = ∅, ⟨0, 0⟩, ⟨inf(𝑥, ℝ*, < ), sup(𝑥, ℝ*, < )⟩))
120119cbvmptv 5204 . . . . . . . . . . . 12 (𝑧 ∈ ran (,) ↦ if(𝑧 = ∅, ⟨0, 0⟩, ⟨inf(𝑧, ℝ*, < ), sup(𝑧, ℝ*, < )⟩)) = (𝑥 ∈ ran (,) ↦ if(𝑥 = ∅, ⟨0, 0⟩, ⟨inf(𝑥, ℝ*, < ), sup(𝑥, ℝ*, < )⟩))
12116, 17, 18, 19, 20, 3, 7, 21, 5, 22, 114, 120uniioombllem2 25557 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))) ⇝ (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))
12284, 121sylan2 594 . . . . . . . . . 10 ((𝜑𝑗 ∈ (1...𝑚)) → seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))) ⇝ (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))
123122adantlr 716 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))) ⇝ (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))
1241, 57, 61, 111, 123climi2 15448 . . . . . . . 8 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ∃𝑎 ∈ ℕ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
125 1z 12535 . . . . . . . . 9 1 ∈ ℤ
1261rexuz3 15286 . . . . . . . . 9 (1 ∈ ℤ → (∃𝑎 ∈ ℕ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) ↔ ∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))
127125, 126ax-mp 5 . . . . . . . 8 (∃𝑎 ∈ ℕ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) ↔ ∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
128124, 127sylib 218 . . . . . . 7 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
129128ralrimiva 3130 . . . . . 6 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → ∀𝑗 ∈ (1...𝑚)∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
130 fzfi 13909 . . . . . . 7 (1...𝑚) ∈ Fin
131 rexfiuz 15285 . . . . . . 7 ((1...𝑚) ∈ Fin → (∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) ↔ ∀𝑗 ∈ (1...𝑚)∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))
132130, 131ax-mp 5 . . . . . 6 (∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) ↔ ∀𝑗 ∈ (1...𝑚)∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
133129, 132sylibr 234 . . . . 5 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → ∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
1341rexuz3 15286 . . . . . 6 (1 ∈ ℤ → (∃𝑎 ∈ ℕ ∀𝑛 ∈ (ℤ𝑎)∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) ↔ ∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))
135125, 134ax-mp 5 . . . . 5 (∃𝑎 ∈ ℕ ∀𝑛 ∈ (ℤ𝑎)∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) ↔ ∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
136133, 135sylibr 234 . . . 4 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → ∃𝑎 ∈ ℕ ∀𝑛 ∈ (ℤ𝑎)∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
1371r19.2uz 15289 . . . 4 (∃𝑎 ∈ ℕ ∀𝑛 ∈ (ℤ𝑎)∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) → ∃𝑛 ∈ ℕ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
138136, 137syl 17 . . 3 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → ∃𝑛 ∈ ℕ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
13916adantr 480 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → 𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
14017adantr 480 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → Disj 𝑥 ∈ ℕ ((,)‘(𝐹𝑥)))
14120adantr 480 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → (vol*‘𝐸) ∈ ℝ)
1423adantr 480 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → 𝐶 ∈ ℝ+)
1437adantr 480 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
14421adantr 480 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → 𝐸 ran ((,) ∘ 𝐺))
14522adantr 480 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → sup(ran 𝑇, ℝ*, < ) ≤ ((vol*‘𝐸) + 𝐶))
146 simprll 779 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → 𝑚 ∈ ℕ)
147 simprlr 780 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
148 eqid 2737 . . . . 5 (((,) ∘ 𝐺) “ (1...𝑚)) = (((,) ∘ 𝐺) “ (1...𝑚))
149 simprrl 781 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → 𝑛 ∈ ℕ)
150 simprrr 782 . . . . . 6 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
151 2fveq3 6849 . . . . . . . . . . . . . 14 (𝑖 = 𝑧 → ((,)‘(𝐹𝑖)) = ((,)‘(𝐹𝑧)))
152151ineq1d 4173 . . . . . . . . . . . . 13 (𝑖 = 𝑧 → (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
153152fveq2d 6848 . . . . . . . . . . . 12 (𝑖 = 𝑧 → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))
154153cbvsumv 15633 . . . . . . . . . . 11 Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
155 2fveq3 6849 . . . . . . . . . . . . . 14 (𝑗 = 𝑘 → ((,)‘(𝐺𝑗)) = ((,)‘(𝐺𝑘)))
156155ineq2d 4174 . . . . . . . . . . . . 13 (𝑗 = 𝑘 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘))))
157156fveq2d 6848 . . . . . . . . . . . 12 (𝑗 = 𝑘 → (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
158157sumeq2sdv 15640 . . . . . . . . . . 11 (𝑗 = 𝑘 → Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
159154, 158eqtrid 2784 . . . . . . . . . 10 (𝑗 = 𝑘 → Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
160155ineq1d 4173 . . . . . . . . . . 11 (𝑗 = 𝑘 → (((,)‘(𝐺𝑗)) ∩ 𝐴) = (((,)‘(𝐺𝑘)) ∩ 𝐴))
161160fveq2d 6848 . . . . . . . . . 10 (𝑗 = 𝑘 → (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)) = (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))
162159, 161oveq12d 7388 . . . . . . . . 9 (𝑗 = 𝑘 → (Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴))) = (Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴))))
163162fveq2d 6848 . . . . . . . 8 (𝑗 = 𝑘 → (abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) = (abs‘(Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))))
164163breq1d 5110 . . . . . . 7 (𝑗 = 𝑘 → ((abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) ↔ (abs‘(Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))) < (𝐶 / 𝑚)))
165164cbvralvw 3216 . . . . . 6 (∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) ↔ ∀𝑘 ∈ (1...𝑚)(abs‘(Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))) < (𝐶 / 𝑚))
166150, 165sylib 218 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → ∀𝑘 ∈ (1...𝑚)(abs‘(Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))) < (𝐶 / 𝑚))
167 eqid 2737 . . . . 5 (((,) ∘ 𝐹) “ (1...𝑛)) = (((,) ∘ 𝐹) “ (1...𝑛))
168139, 140, 18, 19, 141, 142, 143, 144, 5, 145, 146, 147, 148, 149, 166, 167uniioombllem5 25561 . . . 4 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → ((vol*‘(𝐸𝐴)) + (vol*‘(𝐸𝐴))) ≤ ((vol*‘𝐸) + (4 · 𝐶)))
169168anassrs 467 . . 3 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))) → ((vol*‘(𝐸𝐴)) + (vol*‘(𝐸𝐴))) ≤ ((vol*‘𝐸) + (4 · 𝐶)))
170138, 169rexlimddv 3145 . 2 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → ((vol*‘(𝐸𝐴)) + (vol*‘(𝐸𝐴))) ≤ ((vol*‘𝐸) + (4 · 𝐶)))
17156, 170rexlimddv 3145 1 (𝜑 → ((vol*‘(𝐸𝐴)) + (vol*‘(𝐸𝐴))) ≤ ((vol*‘𝐸) + (4 · 𝐶)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wne 2933  wral 3052  wrex 3062  Vcvv 3442  cdif 3900  cin 3902  wss 3903  c0 4287  ifcif 4481  cop 4588   cuni 4865  Disj wdisj 5067   class class class wbr 5100  cmpt 5181   × cxp 5632  dom cdm 5634  ran crn 5635  cima 5637  ccom 5638   Fn wfn 6497  wf 6498  cfv 6502  (class class class)co 7370  1st c1st 7943  2nd c2nd 7944  Fincfn 8897  supcsup 9357  infcinf 9358  cr 11039  0cc0 11040  1c1 11041   + caddc 11043   · cmul 11045  +∞cpnf 11177  *cxr 11179   < clt 11180  cle 11181  cmin 11378   / cdiv 11808  cn 12159  4c4 12216  cz 12502  cuz 12765  +crp 12919  (,)cioo 13275  [,)cico 13277  ...cfz 13437  seqcseq 13938  abscabs 15171  cli 15421  Σcsu 15623  vol*covol 25436
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5245  ax-nul 5255  ax-pow 5314  ax-pr 5381  ax-un 7692  ax-inf2 9564  ax-cnex 11096  ax-resscn 11097  ax-1cn 11098  ax-icn 11099  ax-addcl 11100  ax-addrcl 11101  ax-mulcl 11102  ax-mulrcl 11103  ax-mulcom 11104  ax-addass 11105  ax-mulass 11106  ax-distr 11107  ax-i2m1 11108  ax-1ne0 11109  ax-1rid 11110  ax-rnegex 11111  ax-rrecex 11112  ax-cnre 11113  ax-pre-lttri 11114  ax-pre-lttrn 11115  ax-pre-ltadd 11116  ax-pre-mulgt0 11117  ax-pre-sup 11118
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-disj 5068  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5529  df-eprel 5534  df-po 5542  df-so 5543  df-fr 5587  df-se 5588  df-we 5589  df-xp 5640  df-rel 5641  df-cnv 5642  df-co 5643  df-dm 5644  df-rn 5645  df-res 5646  df-ima 5647  df-pred 6269  df-ord 6330  df-on 6331  df-lim 6332  df-suc 6333  df-iota 6458  df-fun 6504  df-fn 6505  df-f 6506  df-f1 6507  df-fo 6508  df-f1o 6509  df-fv 6510  df-isom 6511  df-riota 7327  df-ov 7373  df-oprab 7374  df-mpo 7375  df-of 7634  df-om 7821  df-1st 7945  df-2nd 7946  df-frecs 8235  df-wrecs 8266  df-recs 8315  df-rdg 8353  df-1o 8409  df-2o 8410  df-er 8647  df-map 8779  df-pm 8780  df-en 8898  df-dom 8899  df-sdom 8900  df-fin 8901  df-fi 9328  df-sup 9359  df-inf 9360  df-oi 9429  df-dju 9827  df-card 9865  df-acn 9868  df-pnf 11182  df-mnf 11183  df-xr 11184  df-ltxr 11185  df-le 11186  df-sub 11380  df-neg 11381  df-div 11809  df-nn 12160  df-2 12222  df-3 12223  df-4 12224  df-n0 12416  df-z 12503  df-uz 12766  df-q 12876  df-rp 12920  df-xneg 13040  df-xadd 13041  df-xmul 13042  df-ioo 13279  df-ico 13281  df-icc 13282  df-fz 13438  df-fzo 13585  df-fl 13726  df-seq 13939  df-exp 13999  df-hash 14268  df-cj 15036  df-re 15037  df-im 15038  df-sqrt 15172  df-abs 15173  df-clim 15425  df-rlim 15426  df-sum 15624  df-rest 17356  df-topgen 17377  df-psmet 21318  df-xmet 21319  df-met 21320  df-bl 21321  df-mopn 21322  df-top 22855  df-topon 22872  df-bases 22907  df-cmp 23348  df-ovol 25438  df-vol 25439
This theorem is referenced by:  uniioombl  25563
  Copyright terms: Public domain W3C validator