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

Theorem uniioombllem6 25559
Description: Lemma for uniioombl 25560. (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 12903 . . . 4 ℕ = (ℤ‘1)
2 1zzd 12631 . . . 4 (𝜑 → 1 ∈ ℤ)
3 uniioombl.c . . . 4 (𝜑𝐶 ∈ ℝ+)
4 eqidd 2735 . . . 4 ((𝜑𝑚 ∈ ℕ) → (𝑇𝑚) = (𝑇𝑚))
5 uniioombl.t . . . . . 6 𝑇 = seq1( + , ((abs ∘ − ) ∘ 𝐺))
6 eqidd 2735 . . . . . 6 ((𝜑𝑎 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘𝑎) = (((abs ∘ − ) ∘ 𝐺)‘𝑎))
7 uniioombl.g . . . . . . . . . 10 (𝜑𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
8 eqid 2734 . . . . . . . . . . 11 ((abs ∘ − ) ∘ 𝐺) = ((abs ∘ − ) ∘ 𝐺)
98ovolfsf 25442 . . . . . . . . . 10 (𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → ((abs ∘ − ) ∘ 𝐺):ℕ⟶(0[,)+∞))
107, 9syl 17 . . . . . . . . 9 (𝜑 → ((abs ∘ − ) ∘ 𝐺):ℕ⟶(0[,)+∞))
1110ffvelcdmda 7084 . . . . . . . 8 ((𝜑𝑎 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘𝑎) ∈ (0[,)+∞))
12 elrege0 13476 . . . . . . . 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 25552 . . . . . . 7 (𝜑 → sup(ran 𝑇, ℝ*, < ) ∈ ℝ)
248, 5ovolsf 25443 . . . . . . . . . . . . 13 (𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑇:ℕ⟶(0[,)+∞))
257, 24syl 17 . . . . . . . . . . . 12 (𝜑𝑇:ℕ⟶(0[,)+∞))
2625frnd 6724 . . . . . . . . . . 11 (𝜑 → ran 𝑇 ⊆ (0[,)+∞))
27 icossxr 13454 . . . . . . . . . . 11 (0[,)+∞) ⊆ ℝ*
2826, 27sstrdi 3976 . . . . . . . . . 10 (𝜑 → ran 𝑇 ⊆ ℝ*)
29 supxrub 13348 . . . . . . . . . 10 ((ran 𝑇 ⊆ ℝ*𝑥 ∈ ran 𝑇) → 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3028, 29sylan 580 . . . . . . . . 9 ((𝜑𝑥 ∈ ran 𝑇) → 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3130ralrimiva 3133 . . . . . . . 8 (𝜑 → ∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ))
3225ffnd 6717 . . . . . . . . 9 (𝜑𝑇 Fn ℕ)
33 breq1 5126 . . . . . . . . . 10 (𝑥 = (𝑇𝑚) → (𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3433ralrn 7088 . . . . . . . . 9 (𝑇 Fn ℕ → (∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3532, 34syl 17 . . . . . . . 8 (𝜑 → (∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < ) ↔ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )))
3631, 35mpbid 232 . . . . . . 7 (𝜑 → ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < ))
37 brralrspcev 5183 . . . . . . 7 ((sup(ran 𝑇, ℝ*, < ) ∈ ℝ ∧ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ sup(ran 𝑇, ℝ*, < )) → ∃𝑥 ∈ ℝ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ 𝑥)
3823, 36, 37syl2anc 584 . . . . . 6 (𝜑 → ∃𝑥 ∈ ℝ ∀𝑚 ∈ ℕ (𝑇𝑚) ≤ 𝑥)
391, 5, 2, 6, 14, 15, 38isumsup2 15864 . . . . 5 (𝜑𝑇 ⇝ sup(ran 𝑇, ℝ, < ))
40 rge0ssre 13478 . . . . . . 7 (0[,)+∞) ⊆ ℝ
4126, 40sstrdi 3976 . . . . . 6 (𝜑 → ran 𝑇 ⊆ ℝ)
42 1nn 12259 . . . . . . . . 9 1 ∈ ℕ
4325fdmd 6726 . . . . . . . . 9 (𝜑 → dom 𝑇 = ℕ)
4442, 43eleqtrrid 2840 . . . . . . . 8 (𝜑 → 1 ∈ dom 𝑇)
4544ne0d 4322 . . . . . . 7 (𝜑 → dom 𝑇 ≠ ∅)
46 dm0rn0 5915 . . . . . . . 8 (dom 𝑇 = ∅ ↔ ran 𝑇 = ∅)
4746necon3bii 2983 . . . . . . 7 (dom 𝑇 ≠ ∅ ↔ ran 𝑇 ≠ ∅)
4845, 47sylib 218 . . . . . 6 (𝜑 → ran 𝑇 ≠ ∅)
49 brralrspcev 5183 . . . . . . 7 ((sup(ran 𝑇, ℝ*, < ) ∈ ℝ ∧ ∀𝑥 ∈ ran 𝑇 𝑥 ≤ sup(ran 𝑇, ℝ*, < )) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦)
5023, 31, 49syl2anc 584 . . . . . 6 (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦)
51 supxrre 13351 . . . . . 6 ((ran 𝑇 ⊆ ℝ ∧ ran 𝑇 ≠ ∅ ∧ ∃𝑦 ∈ ℝ ∀𝑥 ∈ ran 𝑇 𝑥𝑦) → sup(ran 𝑇, ℝ*, < ) = sup(ran 𝑇, ℝ, < ))
5241, 48, 50, 51syl3anc 1372 . . . . 5 (𝜑 → sup(ran 𝑇, ℝ*, < ) = sup(ran 𝑇, ℝ, < ))
5339, 52breqtrrd 5151 . . . 4 (𝜑𝑇 ⇝ sup(ran 𝑇, ℝ*, < ))
541, 2, 3, 4, 53climi2 15529 . . 3 (𝜑 → ∃𝑗 ∈ ℕ ∀𝑚 ∈ (ℤ𝑗)(abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
551r19.2uz 15372 . . 3 (∃𝑗 ∈ ℕ ∀𝑚 ∈ (ℤ𝑗)(abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶 → ∃𝑚 ∈ ℕ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
5654, 55syl 17 . 2 (𝜑 → ∃𝑚 ∈ ℕ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)
57 1zzd 12631 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 1 ∈ ℤ)
583ad2antrr 726 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝐶 ∈ ℝ+)
59 simplrl 776 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝑚 ∈ ℕ)
6059nnrpd 13057 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → 𝑚 ∈ ℝ+)
6158, 60rpdivcld 13076 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐶 / 𝑚) ∈ ℝ+)
62 fvex 6899 . . . . . . . . . . . . . . . 16 ((,)‘(𝐹𝑧)) ∈ V
6362inex1 5297 . . . . . . . . . . . . . . 15 (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V
6463rgenw 3054 . . . . . . . . . . . . . 14 𝑧 ∈ ℕ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V
65 eqid 2734 . . . . . . . . . . . . . . 15 (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
6665fnmpt 6688 . . . . . . . . . . . . . 14 (∀𝑧 ∈ ℕ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) ∈ V → (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) Fn ℕ)
6764, 66mp1i 13 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) Fn ℕ)
68 elfznn 13575 . . . . . . . . . . . . 13 (𝑖 ∈ (1...𝑛) → 𝑖 ∈ ℕ)
69 fvco2 6986 . . . . . . . . . . . . 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 6891 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑖 → ((,)‘(𝐹𝑧)) = ((,)‘(𝐹𝑖)))
7372ineq1d 4199 . . . . . . . . . . . . . . 15 (𝑧 = 𝑖 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
74 fvex 6899 . . . . . . . . . . . . . . . 16 ((,)‘(𝐹𝑖)) ∈ V
7574inex1 5297 . . . . . . . . . . . . . . 15 (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ∈ V
7673, 65, 75fvmpt 6996 . . . . . . . . . . . . . 14 (𝑖 ∈ ℕ → ((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
7771, 76syl 17 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖) = (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))))
7877fveq2d 6890 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘((𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))‘𝑖)) = (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))))
7970, 78eqtrd 2769 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))‘𝑖) = (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))))
80 simpr 484 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
8180, 1eleqtrdi 2843 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ (ℤ‘1))
82 inss2 4218 . . . . . . . . . . . . 13 (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ⊆ ((,)‘(𝐺𝑗))
837adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
84 elfznn 13575 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ (1...𝑚) → 𝑗 ∈ ℕ)
85 ffvelcdm 7081 . . . . . . . . . . . . . . . . . . . 20 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑗 ∈ ℕ) → (𝐺𝑗) ∈ ( ≤ ∩ (ℝ × ℝ)))
8683, 84, 85syl2an 596 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) ∈ ( ≤ ∩ (ℝ × ℝ)))
8786elin2d 4185 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) ∈ (ℝ × ℝ))
88 1st2nd2 8035 . . . . . . . . . . . . . . . . . 18 ((𝐺𝑗) ∈ (ℝ × ℝ) → (𝐺𝑗) = ⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
8987, 88syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (𝐺𝑗) = ⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
9089fveq2d 6890 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) = ((,)‘⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩))
91 df-ov 7416 . . . . . . . . . . . . . . . 16 ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))) = ((,)‘⟨(1st ‘(𝐺𝑗)), (2nd ‘(𝐺𝑗))⟩)
9290, 91eqtr4di 2787 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) = ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))))
93 ioossre 13430 . . . . . . . . . . . . . . 15 ((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗))) ⊆ ℝ
9492, 93eqsstrdi 4008 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((,)‘(𝐺𝑗)) ⊆ ℝ)
9594ad2antrr 726 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → ((,)‘(𝐺𝑗)) ⊆ ℝ)
9692fveq2d 6890 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (vol*‘((,)‘(𝐺𝑗))) = (vol*‘((1st ‘(𝐺𝑗))(,)(2nd ‘(𝐺𝑗)))))
97 ovolfcl 25437 . . . . . . . . . . . . . . . . . 18 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑗 ∈ ℕ) → ((1st ‘(𝐺𝑗)) ∈ ℝ ∧ (2nd ‘(𝐺𝑗)) ∈ ℝ ∧ (1st ‘(𝐺𝑗)) ≤ (2nd ‘(𝐺𝑗))))
9883, 84, 97syl2an 596 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((1st ‘(𝐺𝑗)) ∈ ℝ ∧ (2nd ‘(𝐺𝑗)) ∈ ℝ ∧ (1st ‘(𝐺𝑗)) ≤ (2nd ‘(𝐺𝑗))))
99 ovolioo 25539 . . . . . . . . . . . . . . . . 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 2769 . . . . . . . . . . . . . . 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 11673 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ((2nd ‘(𝐺𝑗)) − (1st ‘(𝐺𝑗))) ∈ ℝ)
105101, 104eqeltrd 2833 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → (vol*‘((,)‘(𝐺𝑗))) ∈ ℝ)
106105ad2antrr 726 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘((,)‘(𝐺𝑗))) ∈ ℝ)
107 ovolsscl 25457 . . . . . . . . . . . . 13 (((((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) ⊆ ((,)‘(𝐺𝑗)) ∧ ((,)‘(𝐺𝑗)) ⊆ ℝ ∧ (vol*‘((,)‘(𝐺𝑗))) ∈ ℝ) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℝ)
10882, 95, 106, 107mp3an2i 1467 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℝ)
109108recnd 11271 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (1...𝑛)) → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) ∈ ℂ)
11079, 81, 109fsumser 15748 . . . . . . . . . 10 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = (seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))))‘𝑛))
111110eqcomd 2740 . . . . . . . . 9 ((((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) ∧ 𝑛 ∈ ℕ) → (seq1( + , (vol* ∘ (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))))‘𝑛) = Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))))
112 2fveq3 6891 . . . . . . . . . . . . . 14 (𝑧 = 𝑘 → ((,)‘(𝐹𝑧)) = ((,)‘(𝐹𝑘)))
113112ineq1d 4199 . . . . . . . . . . . . 13 (𝑧 = 𝑘 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑘)) ∩ ((,)‘(𝐺𝑗))))
114113cbvmptv 5235 . . . . . . . . . . . 12 (𝑧 ∈ ℕ ↦ (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (𝑘 ∈ ℕ ↦ (((,)‘(𝐹𝑘)) ∩ ((,)‘(𝐺𝑗))))
115 eqeq1 2738 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → (𝑧 = ∅ ↔ 𝑥 = ∅))
116 infeq1 9498 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → inf(𝑧, ℝ*, < ) = inf(𝑥, ℝ*, < ))
117 supeq1 9467 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → sup(𝑧, ℝ*, < ) = sup(𝑥, ℝ*, < ))
118116, 117opeq12d 4861 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → ⟨inf(𝑧, ℝ*, < ), sup(𝑧, ℝ*, < )⟩ = ⟨inf(𝑥, ℝ*, < ), sup(𝑥, ℝ*, < )⟩)
119115, 118ifbieq2d 4532 . . . . . . . . . . . . 13 (𝑧 = 𝑥 → if(𝑧 = ∅, ⟨0, 0⟩, ⟨inf(𝑧, ℝ*, < ), sup(𝑧, ℝ*, < )⟩) = if(𝑥 = ∅, ⟨0, 0⟩, ⟨inf(𝑥, ℝ*, < ), sup(𝑥, ℝ*, < )⟩))
120119cbvmptv 5235 . . . . . . . . . . . 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 25554 . . . . . . . . . . 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 15529 . . . . . . . 8 (((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) ∧ 𝑗 ∈ (1...𝑚)) → ∃𝑎 ∈ ℕ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
125 1z 12630 . . . . . . . . 9 1 ∈ ℤ
1261rexuz3 15369 . . . . . . . . 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 3133 . . . . . 6 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → ∀𝑗 ∈ (1...𝑚)∃𝑎 ∈ ℤ ∀𝑛 ∈ (ℤ𝑎)(abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚))
130 fzfi 13995 . . . . . . 7 (1...𝑚) ∈ Fin
131 rexfiuz 15368 . . . . . . 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 15369 . . . . . 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 15372 . . . 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 2734 . . . . 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 6891 . . . . . . . . . . . . . 14 (𝑖 = 𝑧 → ((,)‘(𝐹𝑖)) = ((,)‘(𝐹𝑧)))
152151ineq1d 4199 . . . . . . . . . . . . 13 (𝑖 = 𝑧 → (((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
153152fveq2d 6890 . . . . . . . . . . . 12 (𝑖 = 𝑧 → (vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))))
154153cbvsumv 15714 . . . . . . . . . . 11 Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))))
155 2fveq3 6891 . . . . . . . . . . . . . 14 (𝑗 = 𝑘 → ((,)‘(𝐺𝑗)) = ((,)‘(𝐺𝑘)))
156155ineq2d 4200 . . . . . . . . . . . . 13 (𝑗 = 𝑘 → (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗))) = (((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘))))
157156fveq2d 6890 . . . . . . . . . . . 12 (𝑗 = 𝑘 → (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = (vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
158157sumeq2sdv 15721 . . . . . . . . . . 11 (𝑗 = 𝑘 → Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
159154, 158eqtrid 2781 . . . . . . . . . 10 (𝑗 = 𝑘 → Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) = Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))))
160155ineq1d 4199 . . . . . . . . . . 11 (𝑗 = 𝑘 → (((,)‘(𝐺𝑗)) ∩ 𝐴) = (((,)‘(𝐺𝑘)) ∩ 𝐴))
161160fveq2d 6890 . . . . . . . . . 10 (𝑗 = 𝑘 → (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)) = (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))
162159, 161oveq12d 7431 . . . . . . . . 9 (𝑗 = 𝑘 → (Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴))) = (Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴))))
163162fveq2d 6890 . . . . . . . 8 (𝑗 = 𝑘 → (abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) = (abs‘(Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))))
164163breq1d 5133 . . . . . . 7 (𝑗 = 𝑘 → ((abs‘(Σ𝑖 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑖)) ∩ ((,)‘(𝐺𝑗)))) − (vol*‘(((,)‘(𝐺𝑗)) ∩ 𝐴)))) < (𝐶 / 𝑚) ↔ (abs‘(Σ𝑧 ∈ (1...𝑛)(vol*‘(((,)‘(𝐹𝑧)) ∩ ((,)‘(𝐺𝑘)))) − (vol*‘(((,)‘(𝐺𝑘)) ∩ 𝐴)))) < (𝐶 / 𝑚)))
165164cbvralvw 3223 . . . . . 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 2734 . . . . 5 (((,) ∘ 𝐹) “ (1...𝑛)) = (((,) ∘ 𝐹) “ (1...𝑛))
168139, 140, 18, 19, 141, 142, 143, 144, 5, 145, 146, 147, 148, 149, 166, 167uniioombllem5 25558 . . . 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 3148 . 2 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ (abs‘((𝑇𝑚) − sup(ran 𝑇, ℝ*, < ))) < 𝐶)) → ((vol*‘(𝐸𝐴)) + (vol*‘(𝐸𝐴))) ≤ ((vol*‘𝐸) + (4 · 𝐶)))
17156, 170rexlimddv 3148 1 (𝜑 → ((vol*‘(𝐸𝐴)) + (vol*‘(𝐸𝐴))) ≤ ((vol*‘𝐸) + (4 · 𝐶)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1539  wcel 2107  wne 2931  wral 3050  wrex 3059  Vcvv 3463  cdif 3928  cin 3930  wss 3931  c0 4313  ifcif 4505  cop 4612   cuni 4887  Disj wdisj 5090   class class class wbr 5123  cmpt 5205   × cxp 5663  dom cdm 5665  ran crn 5666  cima 5668  ccom 5669   Fn wfn 6536  wf 6537  cfv 6541  (class class class)co 7413  1st c1st 7994  2nd c2nd 7995  Fincfn 8967  supcsup 9462  infcinf 9463  cr 11136  0cc0 11137  1c1 11138   + caddc 11140   · cmul 11142  +∞cpnf 11274  *cxr 11276   < clt 11277  cle 11278  cmin 11474   / cdiv 11902  cn 12248  4c4 12305  cz 12596  cuz 12860  +crp 13016  (,)cioo 13369  [,)cico 13371  ...cfz 13529  seqcseq 14024  abscabs 15255  cli 15502  Σcsu 15704  vol*covol 25433
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1909  ax-6 1966  ax-7 2006  ax-8 2109  ax-9 2117  ax-10 2140  ax-11 2156  ax-12 2176  ax-ext 2706  ax-rep 5259  ax-sep 5276  ax-nul 5286  ax-pow 5345  ax-pr 5412  ax-un 7737  ax-inf2 9663  ax-cnex 11193  ax-resscn 11194  ax-1cn 11195  ax-icn 11196  ax-addcl 11197  ax-addrcl 11198  ax-mulcl 11199  ax-mulrcl 11200  ax-mulcom 11201  ax-addass 11202  ax-mulass 11203  ax-distr 11204  ax-i2m1 11205  ax-1ne0 11206  ax-1rid 11207  ax-rnegex 11208  ax-rrecex 11209  ax-cnre 11210  ax-pre-lttri 11211  ax-pre-lttrn 11212  ax-pre-ltadd 11213  ax-pre-mulgt0 11214  ax-pre-sup 11215
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1779  df-nf 1783  df-sb 2064  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2808  df-nfc 2884  df-ne 2932  df-nel 3036  df-ral 3051  df-rex 3060  df-rmo 3363  df-reu 3364  df-rab 3420  df-v 3465  df-sbc 3771  df-csb 3880  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-pss 3951  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-op 4613  df-uni 4888  df-int 4927  df-iun 4973  df-disj 5091  df-br 5124  df-opab 5186  df-mpt 5206  df-tr 5240  df-id 5558  df-eprel 5564  df-po 5572  df-so 5573  df-fr 5617  df-se 5618  df-we 5619  df-xp 5671  df-rel 5672  df-cnv 5673  df-co 5674  df-dm 5675  df-rn 5676  df-res 5677  df-ima 5678  df-pred 6301  df-ord 6366  df-on 6367  df-lim 6368  df-suc 6369  df-iota 6494  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-isom 6550  df-riota 7370  df-ov 7416  df-oprab 7417  df-mpo 7418  df-of 7679  df-om 7870  df-1st 7996  df-2nd 7997  df-frecs 8288  df-wrecs 8319  df-recs 8393  df-rdg 8432  df-1o 8488  df-2o 8489  df-er 8727  df-map 8850  df-pm 8851  df-en 8968  df-dom 8969  df-sdom 8970  df-fin 8971  df-fi 9433  df-sup 9464  df-inf 9465  df-oi 9532  df-dju 9923  df-card 9961  df-acn 9964  df-pnf 11279  df-mnf 11280  df-xr 11281  df-ltxr 11282  df-le 11283  df-sub 11476  df-neg 11477  df-div 11903  df-nn 12249  df-2 12311  df-3 12312  df-4 12313  df-n0 12510  df-z 12597  df-uz 12861  df-q 12973  df-rp 13017  df-xneg 13136  df-xadd 13137  df-xmul 13138  df-ioo 13373  df-ico 13375  df-icc 13376  df-fz 13530  df-fzo 13677  df-fl 13814  df-seq 14025  df-exp 14085  df-hash 14352  df-cj 15120  df-re 15121  df-im 15122  df-sqrt 15256  df-abs 15257  df-clim 15506  df-rlim 15507  df-sum 15705  df-rest 17438  df-topgen 17459  df-psmet 21318  df-xmet 21319  df-met 21320  df-bl 21321  df-mopn 21322  df-top 22848  df-topon 22865  df-bases 22900  df-cmp 23341  df-ovol 25435  df-vol 25436
This theorem is referenced by:  uniioombl  25560
  Copyright terms: Public domain W3C validator