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

Theorem ovoliunlem2 25265
Description: Lemma for ovoliun 25267. (Contributed by Mario Carneiro, 12-Jun-2014.)
Hypotheses
Ref Expression
ovoliun.t 𝑇 = seq1( + , 𝐺)
ovoliun.g 𝐺 = (𝑛 ∈ ℕ ↦ (vol*‘𝐴))
ovoliun.a ((𝜑𝑛 ∈ ℕ) → 𝐴 ⊆ ℝ)
ovoliun.v ((𝜑𝑛 ∈ ℕ) → (vol*‘𝐴) ∈ ℝ)
ovoliun.r (𝜑 → sup(ran 𝑇, ℝ*, < ) ∈ ℝ)
ovoliun.b (𝜑𝐵 ∈ ℝ+)
ovoliun.s 𝑆 = seq1( + , ((abs ∘ − ) ∘ (𝐹𝑛)))
ovoliun.u 𝑈 = seq1( + , ((abs ∘ − ) ∘ 𝐻))
ovoliun.h 𝐻 = (𝑘 ∈ ℕ ↦ ((𝐹‘(1st ‘(𝐽𝑘)))‘(2nd ‘(𝐽𝑘))))
ovoliun.j (𝜑𝐽:ℕ–1-1-onto→(ℕ × ℕ))
ovoliun.f (𝜑𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
ovoliun.x1 ((𝜑𝑛 ∈ ℕ) → 𝐴 ran ((,) ∘ (𝐹𝑛)))
ovoliun.x2 ((𝜑𝑛 ∈ ℕ) → sup(ran 𝑆, ℝ*, < ) ≤ ((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
Assertion
Ref Expression
ovoliunlem2 (𝜑 → (vol*‘ 𝑛 ∈ ℕ 𝐴) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
Distinct variable groups:   𝐴,𝑘   𝑘,𝑛,𝐵   𝑘,𝐹,𝑛   𝑘,𝐽,𝑛   𝑛,𝐻   𝜑,𝑘,𝑛   𝑆,𝑘   𝑘,𝐺   𝑇,𝑘   𝑛,𝐺   𝑇,𝑛
Allowed substitution hints:   𝐴(𝑛)   𝑆(𝑛)   𝑈(𝑘,𝑛)   𝐻(𝑘)

Proof of Theorem ovoliunlem2
Dummy variables 𝑗 𝑚 𝑥 𝑧 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ovoliun.a . . . . 5 ((𝜑𝑛 ∈ ℕ) → 𝐴 ⊆ ℝ)
21ralrimiva 3145 . . . 4 (𝜑 → ∀𝑛 ∈ ℕ 𝐴 ⊆ ℝ)
3 iunss 5048 . . . 4 ( 𝑛 ∈ ℕ 𝐴 ⊆ ℝ ↔ ∀𝑛 ∈ ℕ 𝐴 ⊆ ℝ)
42, 3sylibr 233 . . 3 (𝜑 𝑛 ∈ ℕ 𝐴 ⊆ ℝ)
5 ovolcl 25240 . . 3 ( 𝑛 ∈ ℕ 𝐴 ⊆ ℝ → (vol*‘ 𝑛 ∈ ℕ 𝐴) ∈ ℝ*)
64, 5syl 17 . 2 (𝜑 → (vol*‘ 𝑛 ∈ ℕ 𝐴) ∈ ℝ*)
7 ovoliun.f . . . . . . . . . 10 (𝜑𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
87adantr 480 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
9 ovoliun.j . . . . . . . . . . . 12 (𝜑𝐽:ℕ–1-1-onto→(ℕ × ℕ))
10 f1of 6833 . . . . . . . . . . . 12 (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:ℕ⟶(ℕ × ℕ))
119, 10syl 17 . . . . . . . . . . 11 (𝜑𝐽:ℕ⟶(ℕ × ℕ))
1211ffvelcdmda 7086 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → (𝐽𝑘) ∈ (ℕ × ℕ))
13 xp1st 8011 . . . . . . . . . 10 ((𝐽𝑘) ∈ (ℕ × ℕ) → (1st ‘(𝐽𝑘)) ∈ ℕ)
1412, 13syl 17 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (1st ‘(𝐽𝑘)) ∈ ℕ)
158, 14ffvelcdmd 7087 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(1st ‘(𝐽𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
16 elovolmlem 25236 . . . . . . . 8 ((𝐹‘(1st ‘(𝐽𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ) ↔ (𝐹‘(1st ‘(𝐽𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
1715, 16sylib 217 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(1st ‘(𝐽𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
18 xp2nd 8012 . . . . . . . 8 ((𝐽𝑘) ∈ (ℕ × ℕ) → (2nd ‘(𝐽𝑘)) ∈ ℕ)
1912, 18syl 17 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → (2nd ‘(𝐽𝑘)) ∈ ℕ)
2017, 19ffvelcdmd 7087 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ((𝐹‘(1st ‘(𝐽𝑘)))‘(2nd ‘(𝐽𝑘))) ∈ ( ≤ ∩ (ℝ × ℝ)))
21 ovoliun.h . . . . . 6 𝐻 = (𝑘 ∈ ℕ ↦ ((𝐹‘(1st ‘(𝐽𝑘)))‘(2nd ‘(𝐽𝑘))))
2220, 21fmptd 7115 . . . . 5 (𝜑𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
23 eqid 2731 . . . . . 6 ((abs ∘ − ) ∘ 𝐻) = ((abs ∘ − ) ∘ 𝐻)
24 ovoliun.u . . . . . 6 𝑈 = seq1( + , ((abs ∘ − ) ∘ 𝐻))
2523, 24ovolsf 25234 . . . . 5 (𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑈:ℕ⟶(0[,)+∞))
26 frn 6724 . . . . 5 (𝑈:ℕ⟶(0[,)+∞) → ran 𝑈 ⊆ (0[,)+∞))
2722, 25, 263syl 18 . . . 4 (𝜑 → ran 𝑈 ⊆ (0[,)+∞))
28 icossxr 13416 . . . 4 (0[,)+∞) ⊆ ℝ*
2927, 28sstrdi 3994 . . 3 (𝜑 → ran 𝑈 ⊆ ℝ*)
30 supxrcl 13301 . . 3 (ran 𝑈 ⊆ ℝ* → sup(ran 𝑈, ℝ*, < ) ∈ ℝ*)
3129, 30syl 17 . 2 (𝜑 → sup(ran 𝑈, ℝ*, < ) ∈ ℝ*)
32 ovoliun.r . . . 4 (𝜑 → sup(ran 𝑇, ℝ*, < ) ∈ ℝ)
33 ovoliun.b . . . . 5 (𝜑𝐵 ∈ ℝ+)
3433rpred 13023 . . . 4 (𝜑𝐵 ∈ ℝ)
3532, 34readdcld 11250 . . 3 (𝜑 → (sup(ran 𝑇, ℝ*, < ) + 𝐵) ∈ ℝ)
3635rexrd 11271 . 2 (𝜑 → (sup(ran 𝑇, ℝ*, < ) + 𝐵) ∈ ℝ*)
37 eliun 5001 . . . . . 6 (𝑧 𝑛 ∈ ℕ 𝐴 ↔ ∃𝑛 ∈ ℕ 𝑧𝐴)
38 ovoliun.x1 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → 𝐴 ran ((,) ∘ (𝐹𝑛)))
39383adant3 1131 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → 𝐴 ran ((,) ∘ (𝐹𝑛)))
4013adant3 1131 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → 𝐴 ⊆ ℝ)
417ffvelcdmda 7086 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
42 elovolmlem 25236 . . . . . . . . . . . . 13 ((𝐹𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ) ↔ (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
4341, 42sylib 217 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
44433adant3 1131 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
45 ovolfioo 25229 . . . . . . . . . . 11 ((𝐴 ⊆ ℝ ∧ (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ))) → (𝐴 ran ((,) ∘ (𝐹𝑛)) ↔ ∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
4640, 44, 45syl2anc 583 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → (𝐴 ran ((,) ∘ (𝐹𝑛)) ↔ ∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
4739, 46mpbid 231 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → ∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))))
48 simp3 1137 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → 𝑧𝐴)
49 rsp 3243 . . . . . . . . 9 (∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → (𝑧𝐴 → ∃𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
5047, 48, 49sylc 65 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → ∃𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))))
51 simpl1 1190 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝜑)
52 f1ocnv 6845 . . . . . . . . . . . 12 (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:(ℕ × ℕ)–1-1-onto→ℕ)
53 f1of 6833 . . . . . . . . . . . 12 (𝐽:(ℕ × ℕ)–1-1-onto→ℕ → 𝐽:(ℕ × ℕ)⟶ℕ)
5451, 9, 52, 534syl 19 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝐽:(ℕ × ℕ)⟶ℕ)
55 simpl2 1191 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝑛 ∈ ℕ)
56 simpr 484 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝑗 ∈ ℕ)
5754, 55, 56fovcdmd 7583 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝑛𝐽𝑗) ∈ ℕ)
58 2fveq3 6896 . . . . . . . . . . . . . . . . . . 19 (𝑘 = (𝑛𝐽𝑗) → (1st ‘(𝐽𝑘)) = (1st ‘(𝐽‘(𝑛𝐽𝑗))))
5958fveq2d 6895 . . . . . . . . . . . . . . . . . 18 (𝑘 = (𝑛𝐽𝑗) → (𝐹‘(1st ‘(𝐽𝑘))) = (𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗)))))
60 2fveq3 6896 . . . . . . . . . . . . . . . . . 18 (𝑘 = (𝑛𝐽𝑗) → (2nd ‘(𝐽𝑘)) = (2nd ‘(𝐽‘(𝑛𝐽𝑗))))
6159, 60fveq12d 6898 . . . . . . . . . . . . . . . . 17 (𝑘 = (𝑛𝐽𝑗) → ((𝐹‘(1st ‘(𝐽𝑘)))‘(2nd ‘(𝐽𝑘))) = ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))))
62 fvex 6904 . . . . . . . . . . . . . . . . 17 ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))) ∈ V
6361, 21, 62fvmpt 6998 . . . . . . . . . . . . . . . 16 ((𝑛𝐽𝑗) ∈ ℕ → (𝐻‘(𝑛𝐽𝑗)) = ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))))
6457, 63syl 17 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐻‘(𝑛𝐽𝑗)) = ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))))
65 df-ov 7415 . . . . . . . . . . . . . . . . . . . . 21 (𝑛𝐽𝑗) = (𝐽‘⟨𝑛, 𝑗⟩)
6665fveq2i 6894 . . . . . . . . . . . . . . . . . . . 20 (𝐽‘(𝑛𝐽𝑗)) = (𝐽‘(𝐽‘⟨𝑛, 𝑗⟩))
6751, 9syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝐽:ℕ–1-1-onto→(ℕ × ℕ))
6855, 56opelxpd 5715 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → ⟨𝑛, 𝑗⟩ ∈ (ℕ × ℕ))
69 f1ocnvfv2 7278 . . . . . . . . . . . . . . . . . . . . 21 ((𝐽:ℕ–1-1-onto→(ℕ × ℕ) ∧ ⟨𝑛, 𝑗⟩ ∈ (ℕ × ℕ)) → (𝐽‘(𝐽‘⟨𝑛, 𝑗⟩)) = ⟨𝑛, 𝑗⟩)
7067, 68, 69syl2anc 583 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐽‘(𝐽‘⟨𝑛, 𝑗⟩)) = ⟨𝑛, 𝑗⟩)
7166, 70eqtrid 2783 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐽‘(𝑛𝐽𝑗)) = ⟨𝑛, 𝑗⟩)
7271fveq2d 6895 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (1st ‘(𝐽‘(𝑛𝐽𝑗))) = (1st ‘⟨𝑛, 𝑗⟩))
73 vex 3477 . . . . . . . . . . . . . . . . . . 19 𝑛 ∈ V
74 vex 3477 . . . . . . . . . . . . . . . . . . 19 𝑗 ∈ V
7573, 74op1st 7987 . . . . . . . . . . . . . . . . . 18 (1st ‘⟨𝑛, 𝑗⟩) = 𝑛
7672, 75eqtrdi 2787 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (1st ‘(𝐽‘(𝑛𝐽𝑗))) = 𝑛)
7776fveq2d 6895 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗)))) = (𝐹𝑛))
7871fveq2d 6895 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (2nd ‘(𝐽‘(𝑛𝐽𝑗))) = (2nd ‘⟨𝑛, 𝑗⟩))
7973, 74op2nd 7988 . . . . . . . . . . . . . . . . 17 (2nd ‘⟨𝑛, 𝑗⟩) = 𝑗
8078, 79eqtrdi 2787 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (2nd ‘(𝐽‘(𝑛𝐽𝑗))) = 𝑗)
8177, 80fveq12d 6898 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))) = ((𝐹𝑛)‘𝑗))
8264, 81eqtrd 2771 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐻‘(𝑛𝐽𝑗)) = ((𝐹𝑛)‘𝑗))
8382fveq2d 6895 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (1st ‘(𝐻‘(𝑛𝐽𝑗))) = (1st ‘((𝐹𝑛)‘𝑗)))
8483breq1d 5158 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧 ↔ (1st ‘((𝐹𝑛)‘𝑗)) < 𝑧))
8582fveq2d 6895 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (2nd ‘(𝐻‘(𝑛𝐽𝑗))) = (2nd ‘((𝐹𝑛)‘𝑗)))
8685breq2d 5160 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))) ↔ 𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))))
8784, 86anbi12d 630 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗)))) ↔ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
8887biimprd 247 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))))))
89 2fveq3 6896 . . . . . . . . . . . . 13 (𝑚 = (𝑛𝐽𝑗) → (1st ‘(𝐻𝑚)) = (1st ‘(𝐻‘(𝑛𝐽𝑗))))
9089breq1d 5158 . . . . . . . . . . . 12 (𝑚 = (𝑛𝐽𝑗) → ((1st ‘(𝐻𝑚)) < 𝑧 ↔ (1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧))
91 2fveq3 6896 . . . . . . . . . . . . 13 (𝑚 = (𝑛𝐽𝑗) → (2nd ‘(𝐻𝑚)) = (2nd ‘(𝐻‘(𝑛𝐽𝑗))))
9291breq2d 5160 . . . . . . . . . . . 12 (𝑚 = (𝑛𝐽𝑗) → (𝑧 < (2nd ‘(𝐻𝑚)) ↔ 𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗)))))
9390, 92anbi12d 630 . . . . . . . . . . 11 (𝑚 = (𝑛𝐽𝑗) → (((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))) ↔ ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))))))
9493rspcev 3612 . . . . . . . . . 10 (((𝑛𝐽𝑗) ∈ ℕ ∧ ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))))) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))))
9557, 88, 94syl6an 681 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
9695rexlimdva 3154 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → (∃𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
9750, 96mpd 15 . . . . . . 7 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))))
9897rexlimdv3a 3158 . . . . . 6 (𝜑 → (∃𝑛 ∈ ℕ 𝑧𝐴 → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
9937, 98biimtrid 241 . . . . 5 (𝜑 → (𝑧 𝑛 ∈ ℕ 𝐴 → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
10099ralrimiv 3144 . . . 4 (𝜑 → ∀𝑧 𝑛 ∈ ℕ 𝐴𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))))
101 ovolfioo 25229 . . . . 5 (( 𝑛 ∈ ℕ 𝐴 ⊆ ℝ ∧ 𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ))) → ( 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻) ↔ ∀𝑧 𝑛 ∈ ℕ 𝐴𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
1024, 22, 101syl2anc 583 . . . 4 (𝜑 → ( 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻) ↔ ∀𝑧 𝑛 ∈ ℕ 𝐴𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
103100, 102mpbird 257 . . 3 (𝜑 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻))
10424ovollb 25241 . . 3 ((𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻)) → (vol*‘ 𝑛 ∈ ℕ 𝐴) ≤ sup(ran 𝑈, ℝ*, < ))
10522, 103, 104syl2anc 583 . 2 (𝜑 → (vol*‘ 𝑛 ∈ ℕ 𝐴) ≤ sup(ran 𝑈, ℝ*, < ))
106 fzfi 13944 . . . . . . 7 (1...𝑗) ∈ Fin
107 elfznn 13537 . . . . . . . . . 10 (𝑤 ∈ (1...𝑗) → 𝑤 ∈ ℕ)
108 ffvelcdm 7083 . . . . . . . . . . 11 ((𝐽:ℕ⟶(ℕ × ℕ) ∧ 𝑤 ∈ ℕ) → (𝐽𝑤) ∈ (ℕ × ℕ))
109 xp1st 8011 . . . . . . . . . . 11 ((𝐽𝑤) ∈ (ℕ × ℕ) → (1st ‘(𝐽𝑤)) ∈ ℕ)
110 nnre 12226 . . . . . . . . . . 11 ((1st ‘(𝐽𝑤)) ∈ ℕ → (1st ‘(𝐽𝑤)) ∈ ℝ)
111108, 109, 1103syl 18 . . . . . . . . . 10 ((𝐽:ℕ⟶(ℕ × ℕ) ∧ 𝑤 ∈ ℕ) → (1st ‘(𝐽𝑤)) ∈ ℝ)
11211, 107, 111syl2an 595 . . . . . . . . 9 ((𝜑𝑤 ∈ (1...𝑗)) → (1st ‘(𝐽𝑤)) ∈ ℝ)
113112ralrimiva 3145 . . . . . . . 8 (𝜑 → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ∈ ℝ)
114113adantr 480 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ∈ ℝ)
115 fimaxre3 12167 . . . . . . 7 (((1...𝑗) ∈ Fin ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ∈ ℝ) → ∃𝑥 ∈ ℝ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥)
116106, 114, 115sylancr 586 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → ∃𝑥 ∈ ℝ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥)
117 fllep1 13773 . . . . . . . . . . . 12 (𝑥 ∈ ℝ → 𝑥 ≤ ((⌊‘𝑥) + 1))
118117ad2antlr 724 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → 𝑥 ≤ ((⌊‘𝑥) + 1))
119112adantlr 712 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → (1st ‘(𝐽𝑤)) ∈ ℝ)
120 simplr 766 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → 𝑥 ∈ ℝ)
121 flcl 13767 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ → (⌊‘𝑥) ∈ ℤ)
122121peano2zd 12676 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ → ((⌊‘𝑥) + 1) ∈ ℤ)
123122zred 12673 . . . . . . . . . . . . 13 (𝑥 ∈ ℝ → ((⌊‘𝑥) + 1) ∈ ℝ)
124123ad2antlr 724 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → ((⌊‘𝑥) + 1) ∈ ℝ)
125 letr 11315 . . . . . . . . . . . 12 (((1st ‘(𝐽𝑤)) ∈ ℝ ∧ 𝑥 ∈ ℝ ∧ ((⌊‘𝑥) + 1) ∈ ℝ) → (((1st ‘(𝐽𝑤)) ≤ 𝑥𝑥 ≤ ((⌊‘𝑥) + 1)) → (1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
126119, 120, 124, 125syl3anc 1370 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → (((1st ‘(𝐽𝑤)) ≤ 𝑥𝑥 ≤ ((⌊‘𝑥) + 1)) → (1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
127118, 126mpan2d 691 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → ((1st ‘(𝐽𝑤)) ≤ 𝑥 → (1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
128127ralimdva 3166 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
129128adantlr 712 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
130 ovoliun.t . . . . . . . . . 10 𝑇 = seq1( + , 𝐺)
131 ovoliun.g . . . . . . . . . 10 𝐺 = (𝑛 ∈ ℕ ↦ (vol*‘𝐴))
132 simpll 764 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → 𝜑)
133132, 1sylan 579 . . . . . . . . . 10 ((((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) ∧ 𝑛 ∈ ℕ) → 𝐴 ⊆ ℝ)
134 ovoliun.v . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → (vol*‘𝐴) ∈ ℝ)
135132, 134sylan 579 . . . . . . . . . 10 ((((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) ∧ 𝑛 ∈ ℕ) → (vol*‘𝐴) ∈ ℝ)
136132, 32syl 17 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → sup(ran 𝑇, ℝ*, < ) ∈ ℝ)
137132, 33syl 17 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → 𝐵 ∈ ℝ+)
138 ovoliun.s . . . . . . . . . 10 𝑆 = seq1( + , ((abs ∘ − ) ∘ (𝐹𝑛)))
139132, 9syl 17 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → 𝐽:ℕ–1-1-onto→(ℕ × ℕ))
140132, 7syl 17 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
141132, 38sylan 579 . . . . . . . . . 10 ((((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) ∧ 𝑛 ∈ ℕ) → 𝐴 ran ((,) ∘ (𝐹𝑛)))
142 ovoliun.x2 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → sup(ran 𝑆, ℝ*, < ) ≤ ((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
143132, 142sylan 579 . . . . . . . . . 10 ((((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) ∧ 𝑛 ∈ ℕ) → sup(ran 𝑆, ℝ*, < ) ≤ ((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
144 simplr 766 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → 𝑗 ∈ ℕ)
145122ad2antrl 725 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → ((⌊‘𝑥) + 1) ∈ ℤ)
146 simprr 770 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))
147130, 131, 133, 135, 136, 137, 138, 24, 21, 139, 140, 141, 143, 144, 145, 146ovoliunlem1 25264 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
148147expr 456 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1) → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
149129, 148syld 47 . . . . . . 7 (((𝜑𝑗 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
150149rexlimdva 3154 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → (∃𝑥 ∈ ℝ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
151116, 150mpd 15 . . . . 5 ((𝜑𝑗 ∈ ℕ) → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
152151ralrimiva 3145 . . . 4 (𝜑 → ∀𝑗 ∈ ℕ (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
153 ffn 6717 . . . . 5 (𝑈:ℕ⟶(0[,)+∞) → 𝑈 Fn ℕ)
154 breq1 5151 . . . . . 6 (𝑧 = (𝑈𝑗) → (𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
155154ralrn 7089 . . . . 5 (𝑈 Fn ℕ → (∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ ∀𝑗 ∈ ℕ (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
15622, 25, 153, 1554syl 19 . . . 4 (𝜑 → (∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ ∀𝑗 ∈ ℕ (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
157152, 156mpbird 257 . . 3 (𝜑 → ∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
158 supxrleub 13312 . . . 4 ((ran 𝑈 ⊆ ℝ* ∧ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ∈ ℝ*) → (sup(ran 𝑈, ℝ*, < ) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ ∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
15929, 36, 158syl2anc 583 . . 3 (𝜑 → (sup(ran 𝑈, ℝ*, < ) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ ∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
160157, 159mpbird 257 . 2 (𝜑 → sup(ran 𝑈, ℝ*, < ) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
1616, 31, 36, 105, 160xrletrd 13148 1 (𝜑 → (vol*‘ 𝑛 ∈ ℕ 𝐴) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395  w3a 1086   = wceq 1540  wcel 2105  wral 3060  wrex 3069  cin 3947  wss 3948  cop 4634   cuni 4908   ciun 4997   class class class wbr 5148  cmpt 5231   × cxp 5674  ccnv 5675  ran crn 5677  ccom 5680   Fn wfn 6538  wf 6539  1-1-ontowf1o 6542  cfv 6543  (class class class)co 7412  1st c1st 7977  2nd c2nd 7978  m cmap 8826  Fincfn 8945  supcsup 9441  cr 11115  0cc0 11116  1c1 11117   + caddc 11119  +∞cpnf 11252  *cxr 11254   < clt 11255  cle 11256  cmin 11451   / cdiv 11878  cn 12219  2c2 12274  cz 12565  +crp 12981  (,)cioo 13331  [,)cico 13333  ...cfz 13491  cfl 13762  seqcseq 13973  cexp 14034  abscabs 15188  vol*covol 25224
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2702  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7729  ax-inf2 9642  ax-cnex 11172  ax-resscn 11173  ax-1cn 11174  ax-icn 11175  ax-addcl 11176  ax-addrcl 11177  ax-mulcl 11178  ax-mulrcl 11179  ax-mulcom 11180  ax-addass 11181  ax-mulass 11182  ax-distr 11183  ax-i2m1 11184  ax-1ne0 11185  ax-1rid 11186  ax-rnegex 11187  ax-rrecex 11188  ax-cnre 11189  ax-pre-lttri 11190  ax-pre-lttrn 11191  ax-pre-ltadd 11192  ax-pre-mulgt0 11193  ax-pre-sup 11194
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-rmo 3375  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-se 5632  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6300  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7368  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7860  df-1st 7979  df-2nd 7980  df-frecs 8272  df-wrecs 8303  df-recs 8377  df-rdg 8416  df-1o 8472  df-er 8709  df-map 8828  df-pm 8829  df-en 8946  df-dom 8947  df-sdom 8948  df-fin 8949  df-sup 9443  df-inf 9444  df-oi 9511  df-card 9940  df-pnf 11257  df-mnf 11258  df-xr 11259  df-ltxr 11260  df-le 11261  df-sub 11453  df-neg 11454  df-div 11879  df-nn 12220  df-2 12282  df-3 12283  df-n0 12480  df-z 12566  df-uz 12830  df-rp 12982  df-ioo 13335  df-ico 13337  df-fz 13492  df-fzo 13635  df-fl 13764  df-seq 13974  df-exp 14035  df-hash 14298  df-cj 15053  df-re 15054  df-im 15055  df-sqrt 15189  df-abs 15190  df-clim 15439  df-rlim 15440  df-sum 15640  df-ovol 25226
This theorem is referenced by:  ovoliunlem3  25266
  Copyright terms: Public domain W3C validator