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

Theorem uniioombllem6 25533
Description: Lemma for uniioombl 25534. (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 12791 . . . 4 ℕ = (ℤ‘1)
2 1zzd 12523 . . . 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 25416 . . . . . . . . . 10 (𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → ((abs ∘ − ) ∘ 𝐺):ℕ⟶(0[,)+∞))
107, 9syl 17 . . . . . . . . 9 (𝜑 → ((abs ∘ − ) ∘ 𝐺):ℕ⟶(0[,)+∞))
1110ffvelcdmda 7028 . . . . . . . 8 ((𝜑𝑎 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘𝑎) ∈ (0[,)+∞))
12 elrege0 13371 . . . . . . . 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 25526 . . . . . . 7 (𝜑 → sup(ran 𝑇, ℝ*, < ) ∈ ℝ)
248, 5ovolsf 25417 . . . . . . . . . . . . 13 (𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑇:ℕ⟶(0[,)+∞))
257, 24syl 17 . . . . . . . . . . . 12 (𝜑𝑇:ℕ⟶(0[,)+∞))
2625frnd 6668 . . . . . . . . . . 11 (𝜑 → ran 𝑇 ⊆ (0[,)+∞))
27 icossxr 13349 . . . . . . . . . . 11 (0[,)+∞) ⊆ ℝ*
2826, 27sstrdi 3935 . . . . . . . . . 10 (𝜑 → ran 𝑇 ⊆ ℝ*)
29 supxrub 13240 . . . . . . . . . 10 ((ran 𝑇 ⊆ ℝ*𝑥 ∈ ran 𝑇) → 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3028, 29sylan 581 . . . . . . . . 9 ((𝜑𝑥 ∈ ran 𝑇) → 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3130ralrimiva 3130 . . . . . . . 8 (𝜑 → ∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3225ffnd 6661 . . . . . . . . 9 (𝜑𝑇 Fn ℕ)
33 breq1 5089 . . . . . . . . . 10 (𝑥 = (𝑇𝑚) → (𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3433ralrn 7032 . . . . . . . . 9 (𝑇 Fn ℕ → (∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3532, 34syl 17 . . . . . . . 8 (𝜑 → (∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3631, 35mpbid 232 . . . . . . 7 (𝜑 → ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < ))
37 brralrspcev 5146 . . . . . . 7 ((sup(ran 𝑇, ℝ*, < ) ∈ ℝ ∧ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )) → ∃𝑥 ∈ ℝ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ 𝑥)
3823, 36, 37syl2anc 585 . . . . . 6 (𝜑 → ∃𝑥 ∈ ℝ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ 𝑥)
391, 5, 2, 6, 14, 15, 38isumsup2 15770 . . . . 5 (𝜑𝑇 ⇝ sup(ran 𝑇, ℝ, < ))
40 rge0ssre 13373 . . . . . . 7 (0[,)+∞) ⊆ ℝ
4126, 40sstrdi 3935 . . . . . 6 (𝜑 → ran 𝑇 ⊆ ℝ)
42 1nn 12157 . . . . . . . . 9 1 ∈ ℕ
4325fdmd 6670 . . . . . . . . 9 (𝜑 → dom 𝑇 = ℕ)
4442, 43eleqtrrid 2844 . . . . . . . 8 (𝜑 → 1 ∈ dom 𝑇)
4544ne0d 4283 . . . . . . 7 (𝜑 → dom 𝑇 ≠ ∅)
46 dm0rn0 5871 . . . . . . . 8 (dom 𝑇 = ∅ ↔ ran 𝑇 = ∅)
4746necon3bii 2985 . . . . . . 7 (dom 𝑇 ≠ ∅ ↔ ran 𝑇 ≠ ∅)
4845, 47sylib 218 . . . . . 6 (𝜑 → ran 𝑇 ≠ ∅)
49 brralrspcev 5146 . . . . . . 7 ((sup(ran 𝑇, ℝ*, < ) ∈ ℝ ∧ ∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < )) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦)
5023, 31, 49syl2anc 585 . . . . . 6 (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦)
51 supxrre 13243 . . . . . 6 ((ran 𝑇 ⊆ ℝ ∧ ran 𝑇 ≠ ∅ ∧ ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦) → sup(ran 𝑇, ℝ*, < ) = sup(ran 𝑇, ℝ, < ))
5241, 48, 50, 51syl3anc 1374 . . . . 5 (𝜑 → sup(ran 𝑇, ℝ*, < ) = sup(ran 𝑇, ℝ, < ))
5339, 52breqtrrd 5114 . . . 4 (𝜑𝑇 ⇝ sup(ran 𝑇, ℝ*, < ))
541, 2, 3, 4, 53climi2 15435 . . 3 (𝜑 → ∃𝑗 ∈ ℕ ∀𝑚 ∈ (ℤ𝑗)(abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
551r19.2uz 15276 . . 3 (∃𝑗 ∈ ℕ ∀𝑚 ∈ (ℤ𝑗)(abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶 → ∃𝑚 ∈ ℕ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
5654, 55syl 17 . 2 (𝜑 → ∃𝑚 ∈ ℕ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
57 1zzd 12523 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 1 ∈ ℤ)
583ad2antrr 727 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝐶 ∈ ℝ+)
59 simplrl 777 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝑚 ∈ ℕ)
6059nnrpd 12948 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝑚 ∈ ℝ+)
6158, 60rpdivcld 12967 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐶 / 𝑚) ∈ ℝ+)
62 fvex 6845 . . . . . . . . . . . . . . . 16 ((,)‘(𝐹𝑧)) ∈ V
6362inex1 5252 . . . . . . . . . . . . . . 15 (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V
6463rgenw 3056 . . . . . . . . . . . . . 14 𝑧 ∈ ℕ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V
65 eqid 2737 . . . . . . . . . . . . . . 15 (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
6665fnmpt 6630 . . . . . . . . . . . . . 14 (∀𝑧 ∈ ℕ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V → (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) Fn ℕ)
6764, 66mp1i 13 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) Fn ℕ)
68 elfznn 13470 . . . . . . . . . . . . 13 (𝑖 ∈ (1...𝑛) → 𝑖 ∈ ℕ)
69 fvco2 6929 . . . . . . . . . . . . 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 6837 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑖 → ((,)‘(𝐹𝑧)) = ((,)‘(𝐹𝑖)))
7372ineq1d 4160 . . . . . . . . . . . . . . 15 (𝑧 = 𝑖 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
74 fvex 6845 . . . . . . . . . . . . . . . 16 ((,)‘(𝐹𝑖)) ∈ V
7574inex1 5252 . . . . . . . . . . . . . . 15 (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ∈ V
7673, 65, 75fvmpt 6939 . . . . . . . . . . . . . 14 (𝑖 ∈ ℕ → ((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
7771, 76syl 17 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
7877fveq2d 6836 . . . . . . . . . . . 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 4179 . . . . . . . . . . . . 13 (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ⊆ ((,)‘(𝐺𝑗))
837adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
84 elfznn 13470 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ (1...𝑚) → 𝑗 ∈ ℕ)
85 ffvelcdm 7025 . . . . . . . . . . . . . . . . . . . 20 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑗 ∈ ℕ) → (𝐺𝑗) ∈ ( ≤ ∩ (ℝ × ℝ)))
8683, 84, 85syl2an 597 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) ∈ ( ≤ ∩ (ℝ × ℝ)))
8786elin2d 4146 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) ∈ (ℝ × ℝ))
88 1st2nd2 7972 . . . . . . . . . . . . . . . . . 18 ((𝐺𝑗) ∈ (ℝ × ℝ) → (𝐺𝑗) = ⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
8987, 88syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) = ⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
9089fveq2d 6836 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) = ((,)‘⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩))
91 df-ov 7361 . . . . . . . . . . . . . . . 16 ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))) = ((,)‘⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
9290, 91eqtr4di 2790 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) = ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))))
93 ioossre 13324 . . . . . . . . . . . . . . 15 ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))) ⊆ ℝ
9492, 93eqsstrdi 3967 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) ⊆ ℝ)
9594ad2antrr 727 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((,)‘(𝐺𝑗)) ⊆ ℝ)
9692fveq2d 6836 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (vol*‘((,)‘(𝐺𝑗))) = (vol*‘((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗)))))
97 ovolfcl 25411 . . . . . . . . . . . . . . . . . 18 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑗 ∈ ℕ) → ((1st ‘(𝐺𝑗)) ∈ ℝ ∧ (2nd ‘(𝐺𝑗)) ∈ ℝ ∧ (1st ‘(𝐺𝑗)) ≤ (2nd ‘(𝐺𝑗))))
9883, 84, 97syl2an 597 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((1st ‘(𝐺𝑗)) ∈ ℝ ∧ (2nd ‘(𝐺𝑗)) ∈ ℝ ∧ (1st ‘(𝐺𝑗)) ≤ (2nd ‘(𝐺𝑗))))
99 ovolioo 25513 . . . . . . . . . . . . . . . . 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 11566 . . . . . . . . . . . . . . 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 25431 . . . . . . . . . . . . 13 (((((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ⊆ ((,)‘(𝐺𝑗)) ∧ ((,)‘(𝐺𝑗)) ⊆ ℝ ∧ (vol*‘((,)‘(𝐺𝑗))) ∈ ℝ) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℝ)
10882, 95, 106, 107mp3an2i 1469 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℝ)
109108recnd 11161 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℂ)
11079, 81, 109fsumser 15654 . . . . . . . . . 10 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = (seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))))‘𝑛))
111110eqcomd 2743 . . . . . . . . 9 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → (seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))))‘𝑛) = Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))))
112 2fveq3 6837 . . . . . . . . . . . . . 14 (𝑧 = 𝑘 → ((,)‘(𝐹𝑧)) = ((,)‘(𝐹𝑘)))
113112ineq1d 4160 . . . . . . . . . . . . 13 (𝑧 = 𝑘 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑘)) ∩ ((,)‘(𝐺𝑗))))
114113cbvmptv 5190 . . . . . . . . . . . 12 (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (𝑘 ∈ ℕ ↦ (((,)‘(𝐹𝑘)) ∩ ((,)‘(𝐺𝑗))))
115 eqeq1 2741 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → (𝑧 = ∅ ↔ 𝑥 = ∅))
116 infeq1 9381 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → inf(𝑧, ℝ*, < ) = inf(𝑥, ℝ*, < ))
117 supeq1 9349 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → sup(𝑧, ℝ*, < ) = sup(𝑥, ℝ*, < ))
118116, 117opeq12d 4825 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → ⟨inf(𝑧, ℝ*, < ), sup(𝑧, ℝ*, < )⟩ = ⟨inf(𝑥, ℝ*, < ), sup(𝑥, ℝ*, < )⟩)
119115, 118ifbieq2d 4494 . . . . . . . . . . . . 13 (𝑧 = 𝑥 → if(𝑧 = ∅, ⟨0, 0⟩, ⟨inf(𝑧, ℝ*, < ), sup(𝑧, ℝ*, < )⟩) = if(𝑥 = ∅, ⟨0, 0⟩, ⟨inf(𝑥, ℝ*, < ), sup(𝑥, ℝ*, < )⟩))
120119cbvmptv 5190 . . . . . . . . . . . 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 25528 . . . . . . . . . . 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 15435 . . . . . . . 8 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ∃𝑎 ∈ ℕ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
125 1z 12522 . . . . . . . . 9 1 ∈ ℤ
1261rexuz3 15273 . . . . . . . . 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 13896 . . . . . . 7 (1...𝑚) ∈ Fin
131 rexfiuz 15272 . . . . . . 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 15273 . . . . . 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 15276 . . . 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 6837 . . . . . . . . . . . . . 14 (𝑖 = 𝑧 → ((,)‘(𝐹𝑖)) = ((,)‘(𝐹𝑧)))
152151ineq1d 4160 . . . . . . . . . . . . 13 (𝑖 = 𝑧 → (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
153152fveq2d 6836 . . . . . . . . . . . 12 (𝑖 = 𝑧 → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))
154153cbvsumv 15620 . . . . . . . . . . 11 Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
155 2fveq3 6837 . . . . . . . . . . . . . 14 (𝑗 = 𝑘 → ((,)‘(𝐺𝑗)) = ((,)‘(𝐺𝑘)))
156155ineq2d 4161 . . . . . . . . . . . . 13 (𝑗 = 𝑘 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘))))
157156fveq2d 6836 . . . . . . . . . . . 12 (𝑗 = 𝑘 → (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
158157sumeq2sdv 15627 . . . . . . . . . . 11 (𝑗 = 𝑘 → Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
159154, 158eqtrid 2784 . . . . . . . . . 10 (𝑗 = 𝑘 → Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
160155ineq1d 4160 . . . . . . . . . . 11 (𝑗 = 𝑘 → (((,)‘(𝐺𝑗)) ∩ 𝐴) = (((,)‘(𝐺𝑘)) ∩ 𝐴))
161160fveq2d 6836 . . . . . . . . . 10 (𝑗 = 𝑘 → (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)) = (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))
162159, 161oveq12d 7376 . . . . . . . . 9 (𝑗 = 𝑘 → (Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴))) = (Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴))))
163162fveq2d 6836 . . . . . . . 8 (𝑗 = 𝑘 → (abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) = (abs‘(Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))))
164163breq1d 5096 . . . . . . 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 25532 . . . 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 3430  cdif 3887  cin 3889  wss 3890  c0 4274  ifcif 4467  cop 4574   cuni 4851  Disj wdisj 5053   class class class wbr 5086  cmpt 5167   × cxp 5620  dom cdm 5622  ran crn 5623  cima 5625  ccom 5626   Fn wfn 6485  wf 6486  cfv 6490  (class class class)co 7358  1st c1st 7931  2nd c2nd 7932  Fincfn 8884  supcsup 9344  infcinf 9345  cr 11026  0cc0 11027  1c1 11028   + caddc 11030   · cmul 11032  +∞cpnf 11164  *cxr 11166   < clt 11167  cle 11168  cmin 11365   / cdiv 11795  cn 12146  4c4 12203  cz 12489  cuz 12752  +crp 12906  (,)cioo 13262  [,)cico 13264  ...cfz 13424  seqcseq 13925  abscabs 15158  cli 15408  Σcsu 15610  vol*covol 25407
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 5212  ax-sep 5231  ax-nul 5241  ax-pow 5300  ax-pr 5368  ax-un 7680  ax-inf2 9551  ax-cnex 11083  ax-resscn 11084  ax-1cn 11085  ax-icn 11086  ax-addcl 11087  ax-addrcl 11088  ax-mulcl 11089  ax-mulrcl 11090  ax-mulcom 11091  ax-addass 11092  ax-mulass 11093  ax-distr 11094  ax-i2m1 11095  ax-1ne0 11096  ax-1rid 11097  ax-rnegex 11098  ax-rrecex 11099  ax-cnre 11100  ax-pre-lttri 11101  ax-pre-lttrn 11102  ax-pre-ltadd 11103  ax-pre-mulgt0 11104  ax-pre-sup 11105
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 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-disj 5054  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5517  df-eprel 5522  df-po 5530  df-so 5531  df-fr 5575  df-se 5576  df-we 5577  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-pred 6257  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-isom 6499  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-of 7622  df-om 7809  df-1st 7933  df-2nd 7934  df-frecs 8222  df-wrecs 8253  df-recs 8302  df-rdg 8340  df-1o 8396  df-2o 8397  df-er 8634  df-map 8766  df-pm 8767  df-en 8885  df-dom 8886  df-sdom 8887  df-fin 8888  df-fi 9315  df-sup 9346  df-inf 9347  df-oi 9416  df-dju 9814  df-card 9852  df-acn 9855  df-pnf 11169  df-mnf 11170  df-xr 11171  df-ltxr 11172  df-le 11173  df-sub 11367  df-neg 11368  df-div 11796  df-nn 12147  df-2 12209  df-3 12210  df-4 12211  df-n0 12403  df-z 12490  df-uz 12753  df-q 12863  df-rp 12907  df-xneg 13027  df-xadd 13028  df-xmul 13029  df-ioo 13266  df-ico 13268  df-icc 13269  df-fz 13425  df-fzo 13572  df-fl 13713  df-seq 13926  df-exp 13986  df-hash 14255  df-cj 15023  df-re 15024  df-im 15025  df-sqrt 15159  df-abs 15160  df-clim 15412  df-rlim 15413  df-sum 15611  df-rest 17343  df-topgen 17364  df-psmet 21303  df-xmet 21304  df-met 21305  df-bl 21306  df-mopn 21307  df-top 22837  df-topon 22854  df-bases 22889  df-cmp 23330  df-ovol 25409  df-vol 25410
This theorem is referenced by:  uniioombl  25534
  Copyright terms: Public domain W3C validator