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

Theorem uniioombllem6 25541
Description: Lemma for uniioombl 25542. (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 12895 . . . 4 ℕ = (ℤ‘1)
2 1zzd 12623 . . . 4 (𝜑 → 1 ∈ ℤ)
3 uniioombl.c . . . 4 (𝜑𝐶 ∈ ℝ+)
4 eqidd 2736 . . . 4 ((𝜑𝑚 ∈ ℕ) → (𝑇𝑚) = (𝑇𝑚))
5 uniioombl.t . . . . . 6 𝑇 = seq1( + , ((abs ∘ − ) ∘ 𝐺))
6 eqidd 2736 . . . . . 6 ((𝜑𝑎 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘𝑎) = (((abs ∘ − ) ∘ 𝐺)‘𝑎))
7 uniioombl.g . . . . . . . . . 10 (𝜑𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
8 eqid 2735 . . . . . . . . . . 11 ((abs ∘ − ) ∘ 𝐺) = ((abs ∘ − ) ∘ 𝐺)
98ovolfsf 25424 . . . . . . . . . 10 (𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → ((abs ∘ − ) ∘ 𝐺):ℕ⟶(0[,)+∞))
107, 9syl 17 . . . . . . . . 9 (𝜑 → ((abs ∘ − ) ∘ 𝐺):ℕ⟶(0[,)+∞))
1110ffvelcdmda 7074 . . . . . . . 8 ((𝜑𝑎 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘𝑎) ∈ (0[,)+∞))
12 elrege0 13471 . . . . . . . 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 25534 . . . . . . 7 (𝜑 → sup(ran 𝑇, ℝ*, < ) ∈ ℝ)
248, 5ovolsf 25425 . . . . . . . . . . . . 13 (𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑇:ℕ⟶(0[,)+∞))
257, 24syl 17 . . . . . . . . . . . 12 (𝜑𝑇:ℕ⟶(0[,)+∞))
2625frnd 6714 . . . . . . . . . . 11 (𝜑 → ran 𝑇 ⊆ (0[,)+∞))
27 icossxr 13449 . . . . . . . . . . 11 (0[,)+∞) ⊆ ℝ*
2826, 27sstrdi 3971 . . . . . . . . . 10 (𝜑 → ran 𝑇 ⊆ ℝ*)
29 supxrub 13340 . . . . . . . . . 10 ((ran 𝑇 ⊆ ℝ*𝑥 ∈ ran 𝑇) → 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3028, 29sylan 580 . . . . . . . . 9 ((𝜑𝑥 ∈ ran 𝑇) → 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3130ralrimiva 3132 . . . . . . . 8 (𝜑 → ∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3225ffnd 6707 . . . . . . . . 9 (𝜑𝑇 Fn ℕ)
33 breq1 5122 . . . . . . . . . 10 (𝑥 = (𝑇𝑚) → (𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3433ralrn 7078 . . . . . . . . 9 (𝑇 Fn ℕ → (∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3532, 34syl 17 . . . . . . . 8 (𝜑 → (∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3631, 35mpbid 232 . . . . . . 7 (𝜑 → ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < ))
37 brralrspcev 5179 . . . . . . 7 ((sup(ran 𝑇, ℝ*, < ) ∈ ℝ ∧ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )) → ∃𝑥 ∈ ℝ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ 𝑥)
3823, 36, 37syl2anc 584 . . . . . 6 (𝜑 → ∃𝑥 ∈ ℝ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ 𝑥)
391, 5, 2, 6, 14, 15, 38isumsup2 15862 . . . . 5 (𝜑𝑇 ⇝ sup(ran 𝑇, ℝ, < ))
40 rge0ssre 13473 . . . . . . 7 (0[,)+∞) ⊆ ℝ
4126, 40sstrdi 3971 . . . . . 6 (𝜑 → ran 𝑇 ⊆ ℝ)
42 1nn 12251 . . . . . . . . 9 1 ∈ ℕ
4325fdmd 6716 . . . . . . . . 9 (𝜑 → dom 𝑇 = ℕ)
4442, 43eleqtrrid 2841 . . . . . . . 8 (𝜑 → 1 ∈ dom 𝑇)
4544ne0d 4317 . . . . . . 7 (𝜑 → dom 𝑇 ≠ ∅)
46 dm0rn0 5904 . . . . . . . 8 (dom 𝑇 = ∅ ↔ ran 𝑇 = ∅)
4746necon3bii 2984 . . . . . . 7 (dom 𝑇 ≠ ∅ ↔ ran 𝑇 ≠ ∅)
4845, 47sylib 218 . . . . . 6 (𝜑 → ran 𝑇 ≠ ∅)
49 brralrspcev 5179 . . . . . . 7 ((sup(ran 𝑇, ℝ*, < ) ∈ ℝ ∧ ∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < )) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦)
5023, 31, 49syl2anc 584 . . . . . 6 (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦)
51 supxrre 13343 . . . . . 6 ((ran 𝑇 ⊆ ℝ ∧ ran 𝑇 ≠ ∅ ∧ ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦) → sup(ran 𝑇, ℝ*, < ) = sup(ran 𝑇, ℝ, < ))
5241, 48, 50, 51syl3anc 1373 . . . . 5 (𝜑 → sup(ran 𝑇, ℝ*, < ) = sup(ran 𝑇, ℝ, < ))
5339, 52breqtrrd 5147 . . . 4 (𝜑𝑇 ⇝ sup(ran 𝑇, ℝ*, < ))
541, 2, 3, 4, 53climi2 15527 . . 3 (𝜑 → ∃𝑗 ∈ ℕ ∀𝑚 ∈ (ℤ𝑗)(abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
551r19.2uz 15370 . . 3 (∃𝑗 ∈ ℕ ∀𝑚 ∈ (ℤ𝑗)(abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶 → ∃𝑚 ∈ ℕ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
5654, 55syl 17 . 2 (𝜑 → ∃𝑚 ∈ ℕ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
57 1zzd 12623 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 1 ∈ ℤ)
583ad2antrr 726 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝐶 ∈ ℝ+)
59 simplrl 776 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝑚 ∈ ℕ)
6059nnrpd 13049 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝑚 ∈ ℝ+)
6158, 60rpdivcld 13068 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐶 / 𝑚) ∈ ℝ+)
62 fvex 6889 . . . . . . . . . . . . . . . 16 ((,)‘(𝐹𝑧)) ∈ V
6362inex1 5287 . . . . . . . . . . . . . . 15 (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V
6463rgenw 3055 . . . . . . . . . . . . . 14 𝑧 ∈ ℕ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V
65 eqid 2735 . . . . . . . . . . . . . . 15 (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
6665fnmpt 6678 . . . . . . . . . . . . . 14 (∀𝑧 ∈ ℕ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V → (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) Fn ℕ)
6764, 66mp1i 13 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) Fn ℕ)
68 elfznn 13570 . . . . . . . . . . . . 13 (𝑖 ∈ (1...𝑛) → 𝑖 ∈ ℕ)
69 fvco2 6976 . . . . . . . . . . . . 13 (((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) Fn ℕ ∧ 𝑖 ∈ ℕ) → ((vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))‘𝑖) = (vol*‘((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖)))
7067, 68, 69syl2an 596 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))‘𝑖) = (vol*‘((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖)))
7168adantl 481 . . . . . . . . . . . . . 14 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → 𝑖 ∈ ℕ)
72 2fveq3 6881 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑖 → ((,)‘(𝐹𝑧)) = ((,)‘(𝐹𝑖)))
7372ineq1d 4194 . . . . . . . . . . . . . . 15 (𝑧 = 𝑖 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
74 fvex 6889 . . . . . . . . . . . . . . . 16 ((,)‘(𝐹𝑖)) ∈ V
7574inex1 5287 . . . . . . . . . . . . . . 15 (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ∈ V
7673, 65, 75fvmpt 6986 . . . . . . . . . . . . . 14 (𝑖 ∈ ℕ → ((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
7771, 76syl 17 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
7877fveq2d 6880 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖)) = (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))))
7970, 78eqtrd 2770 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))‘𝑖) = (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))))
80 simpr 484 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
8180, 1eleqtrdi 2844 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ (ℤ‘1))
82 inss2 4213 . . . . . . . . . . . . 13 (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ⊆ ((,)‘(𝐺𝑗))
837adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
84 elfznn 13570 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ (1...𝑚) → 𝑗 ∈ ℕ)
85 ffvelcdm 7071 . . . . . . . . . . . . . . . . . . . 20 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑗 ∈ ℕ) → (𝐺𝑗) ∈ ( ≤ ∩ (ℝ × ℝ)))
8683, 84, 85syl2an 596 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) ∈ ( ≤ ∩ (ℝ × ℝ)))
8786elin2d 4180 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) ∈ (ℝ × ℝ))
88 1st2nd2 8027 . . . . . . . . . . . . . . . . . 18 ((𝐺𝑗) ∈ (ℝ × ℝ) → (𝐺𝑗) = ⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
8987, 88syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) = ⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
9089fveq2d 6880 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) = ((,)‘⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩))
91 df-ov 7408 . . . . . . . . . . . . . . . 16 ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))) = ((,)‘⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
9290, 91eqtr4di 2788 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) = ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))))
93 ioossre 13424 . . . . . . . . . . . . . . 15 ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))) ⊆ ℝ
9492, 93eqsstrdi 4003 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) ⊆ ℝ)
9594ad2antrr 726 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((,)‘(𝐺𝑗)) ⊆ ℝ)
9692fveq2d 6880 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (vol*‘((,)‘(𝐺𝑗))) = (vol*‘((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗)))))
97 ovolfcl 25419 . . . . . . . . . . . . . . . . . 18 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑗 ∈ ℕ) → ((1st ‘(𝐺𝑗)) ∈ ℝ ∧ (2nd ‘(𝐺𝑗)) ∈ ℝ ∧ (1st ‘(𝐺𝑗)) ≤ (2nd ‘(𝐺𝑗))))
9883, 84, 97syl2an 596 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((1st ‘(𝐺𝑗)) ∈ ℝ ∧ (2nd ‘(𝐺𝑗)) ∈ ℝ ∧ (1st ‘(𝐺𝑗)) ≤ (2nd ‘(𝐺𝑗))))
99 ovolioo 25521 . . . . . . . . . . . . . . . . 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 2770 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (vol*‘((,)‘(𝐺𝑗))) = ((2nd ‘(𝐺𝑗)) − (1st ‘(𝐺𝑗))))
10298simp2d 1143 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (2nd ‘(𝐺𝑗)) ∈ ℝ)
10398simp1d 1142 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (1st ‘(𝐺𝑗)) ∈ ℝ)
104102, 103resubcld 11665 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((2nd ‘(𝐺𝑗)) − (1st ‘(𝐺𝑗))) ∈ ℝ)
105101, 104eqeltrd 2834 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (vol*‘((,)‘(𝐺𝑗))) ∈ ℝ)
106105ad2antrr 726 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘((,)‘(𝐺𝑗))) ∈ ℝ)
107 ovolsscl 25439 . . . . . . . . . . . . 13 (((((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ⊆ ((,)‘(𝐺𝑗)) ∧ ((,)‘(𝐺𝑗)) ⊆ ℝ ∧ (vol*‘((,)‘(𝐺𝑗))) ∈ ℝ) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℝ)
10882, 95, 106, 107mp3an2i 1468 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℝ)
109108recnd 11263 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℂ)
11079, 81, 109fsumser 15746 . . . . . . . . . 10 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = (seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))))‘𝑛))
111110eqcomd 2741 . . . . . . . . 9 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → (seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))))‘𝑛) = Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))))
112 2fveq3 6881 . . . . . . . . . . . . . 14 (𝑧 = 𝑘 → ((,)‘(𝐹𝑧)) = ((,)‘(𝐹𝑘)))
113112ineq1d 4194 . . . . . . . . . . . . 13 (𝑧 = 𝑘 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑘)) ∩ ((,)‘(𝐺𝑗))))
114113cbvmptv 5225 . . . . . . . . . . . 12 (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (𝑘 ∈ ℕ ↦ (((,)‘(𝐹𝑘)) ∩ ((,)‘(𝐺𝑗))))
115 eqeq1 2739 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → (𝑧 = ∅ ↔ 𝑥 = ∅))
116 infeq1 9489 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → inf(𝑧, ℝ*, < ) = inf(𝑥, ℝ*, < ))
117 supeq1 9457 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → sup(𝑧, ℝ*, < ) = sup(𝑥, ℝ*, < ))
118116, 117opeq12d 4857 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → ⟨inf(𝑧, ℝ*, < ), sup(𝑧, ℝ*, < )⟩ = ⟨inf(𝑥, ℝ*, < ), sup(𝑥, ℝ*, < )⟩)
119115, 118ifbieq2d 4527 . . . . . . . . . . . . 13 (𝑧 = 𝑥 → if(𝑧 = ∅, ⟨0, 0⟩, ⟨inf(𝑧, ℝ*, < ), sup(𝑧, ℝ*, < )⟩) = if(𝑥 = ∅, ⟨0, 0⟩, ⟨inf(𝑥, ℝ*, < ), sup(𝑥, ℝ*, < )⟩))
120119cbvmptv 5225 . . . . . . . . . . . 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 25536 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))) ⇝ (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))
12284, 121sylan2 593 . . . . . . . . . 10 ((𝜑𝑗 ∈ (1...𝑚)) → seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))) ⇝ (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))
123122adantlr 715 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))) ⇝ (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))
1241, 57, 61, 111, 123climi2 15527 . . . . . . . 8 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ∃𝑎 ∈ ℕ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
125 1z 12622 . . . . . . . . 9 1 ∈ ℤ
1261rexuz3 15367 . . . . . . . . 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 3132 . . . . . 6 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → ∀𝑗 ∈ (1...𝑚)∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
130 fzfi 13990 . . . . . . 7 (1...𝑚) ∈ Fin
131 rexfiuz 15366 . . . . . . 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 15367 . . . . . 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 15370 . . . 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 778 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → 𝑚 ∈ ℕ)
147 simprlr 779 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
148 eqid 2735 . . . . 5 (((,) ∘ 𝐺) “ (1...𝑚)) = (((,) ∘ 𝐺) “ (1...𝑚))
149 simprrl 780 . . . . 5 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → 𝑛 ∈ ℕ)
150 simprrr 781 . . . . . 6 ((𝜑 ∧ ((𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶) ∧ (𝑛 ∈ ℕ ∧ ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚)))) → ∀𝑗 ∈ (1...𝑚)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
151 2fveq3 6881 . . . . . . . . . . . . . 14 (𝑖 = 𝑧 → ((,)‘(𝐹𝑖)) = ((,)‘(𝐹𝑧)))
152151ineq1d 4194 . . . . . . . . . . . . 13 (𝑖 = 𝑧 → (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
153152fveq2d 6880 . . . . . . . . . . . 12 (𝑖 = 𝑧 → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))
154153cbvsumv 15712 . . . . . . . . . . 11 Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
155 2fveq3 6881 . . . . . . . . . . . . . 14 (𝑗 = 𝑘 → ((,)‘(𝐺𝑗)) = ((,)‘(𝐺𝑘)))
156155ineq2d 4195 . . . . . . . . . . . . 13 (𝑗 = 𝑘 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘))))
157156fveq2d 6880 . . . . . . . . . . . 12 (𝑗 = 𝑘 → (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
158157sumeq2sdv 15719 . . . . . . . . . . 11 (𝑗 = 𝑘 → Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
159154, 158eqtrid 2782 . . . . . . . . . 10 (𝑗 = 𝑘 → Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
160155ineq1d 4194 . . . . . . . . . . 11 (𝑗 = 𝑘 → (((,)‘(𝐺𝑗)) ∩ 𝐴) = (((,)‘(𝐺𝑘)) ∩ 𝐴))
161160fveq2d 6880 . . . . . . . . . 10 (𝑗 = 𝑘 → (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)) = (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))
162159, 161oveq12d 7423 . . . . . . . . 9 (𝑗 = 𝑘 → (Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴))) = (Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴))))
163162fveq2d 6880 . . . . . . . 8 (𝑗 = 𝑘 → (abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) = (abs‘(Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))))
164163breq1d 5129 . . . . . . 7 (𝑗 = 𝑘 → ((abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) ↔ (abs‘(Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))) < (𝐶 / 𝑚)))
165164cbvralvw 3220 . . . . . 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 2735 . . . . 5 (((,) ∘ 𝐹) “ (1...𝑛)) = (((,) ∘ 𝐹) “ (1...𝑛))
168139, 140, 18, 19, 141, 142, 143, 144, 5, 145, 146, 147, 148, 149, 166, 167uniioombllem5 25540 . . . 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 3147 . 2 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → ((vol*‘(𝐸𝐴)) + (vol*‘(𝐸𝐴))) ≤ ((vol*‘𝐸) + (4 · 𝐶)))
17156, 170rexlimddv 3147 1 (𝜑 → ((vol*‘(𝐸𝐴)) + (vol*‘(𝐸𝐴))) ≤ ((vol*‘𝐸) + (4 · 𝐶)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1540  wcel 2108  wne 2932  wral 3051  wrex 3060  Vcvv 3459  cdif 3923  cin 3925  wss 3926  c0 4308  ifcif 4500  cop 4607   cuni 4883  Disj wdisj 5086   class class class wbr 5119  cmpt 5201   × cxp 5652  dom cdm 5654  ran crn 5655  cima 5657  ccom 5658   Fn wfn 6526  wf 6527  cfv 6531  (class class class)co 7405  1st c1st 7986  2nd c2nd 7987  Fincfn 8959  supcsup 9452  infcinf 9453  cr 11128  0cc0 11129  1c1 11130   + caddc 11132   · cmul 11134  +∞cpnf 11266  *cxr 11268   < clt 11269  cle 11270  cmin 11466   / cdiv 11894  cn 12240  4c4 12297  cz 12588  cuz 12852  +crp 13008  (,)cioo 13362  [,)cico 13364  ...cfz 13524  seqcseq 14019  abscabs 15253  cli 15500  Σcsu 15702  vol*covol 25415
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-rep 5249  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7729  ax-inf2 9655  ax-cnex 11185  ax-resscn 11186  ax-1cn 11187  ax-icn 11188  ax-addcl 11189  ax-addrcl 11190  ax-mulcl 11191  ax-mulrcl 11192  ax-mulcom 11193  ax-addass 11194  ax-mulass 11195  ax-distr 11196  ax-i2m1 11197  ax-1ne0 11198  ax-1rid 11199  ax-rnegex 11200  ax-rrecex 11201  ax-cnre 11202  ax-pre-lttri 11203  ax-pre-lttrn 11204  ax-pre-ltadd 11205  ax-pre-mulgt0 11206  ax-pre-sup 11207
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3359  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-op 4608  df-uni 4884  df-int 4923  df-iun 4969  df-disj 5087  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-se 5607  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6290  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6484  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-isom 6540  df-riota 7362  df-ov 7408  df-oprab 7409  df-mpo 7410  df-of 7671  df-om 7862  df-1st 7988  df-2nd 7989  df-frecs 8280  df-wrecs 8311  df-recs 8385  df-rdg 8424  df-1o 8480  df-2o 8481  df-er 8719  df-map 8842  df-pm 8843  df-en 8960  df-dom 8961  df-sdom 8962  df-fin 8963  df-fi 9423  df-sup 9454  df-inf 9455  df-oi 9524  df-dju 9915  df-card 9953  df-acn 9956  df-pnf 11271  df-mnf 11272  df-xr 11273  df-ltxr 11274  df-le 11275  df-sub 11468  df-neg 11469  df-div 11895  df-nn 12241  df-2 12303  df-3 12304  df-4 12305  df-n0 12502  df-z 12589  df-uz 12853  df-q 12965  df-rp 13009  df-xneg 13128  df-xadd 13129  df-xmul 13130  df-ioo 13366  df-ico 13368  df-icc 13369  df-fz 13525  df-fzo 13672  df-fl 13809  df-seq 14020  df-exp 14080  df-hash 14349  df-cj 15118  df-re 15119  df-im 15120  df-sqrt 15254  df-abs 15255  df-clim 15504  df-rlim 15505  df-sum 15703  df-rest 17436  df-topgen 17457  df-psmet 21307  df-xmet 21308  df-met 21309  df-bl 21310  df-mopn 21311  df-top 22832  df-topon 22849  df-bases 22884  df-cmp 23325  df-ovol 25417  df-vol 25418
This theorem is referenced by:  uniioombl  25542
  Copyright terms: Public domain W3C validator