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

Theorem ovoliunlem2 25489
Description: Lemma for ovoliun 25491. (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 3131 . . . 4 (𝜑 → ∀𝑛 ∈ ℕ 𝐴 ⊆ ℝ)
3 iunss 4975 . . . 4 ( 𝑛 ∈ ℕ 𝐴 ⊆ ℝ ↔ ∀𝑛 ∈ ℕ 𝐴 ⊆ ℝ)
42, 3sylibr 235 . . 3 (𝜑 𝑛 ∈ ℕ 𝐴 ⊆ ℝ)
5 ovolcl 25464 . . 3 ( 𝑛 ∈ ℕ 𝐴 ⊆ ℝ → (vol*‘ 𝑛 ∈ ℕ 𝐴) ∈ ℝ*)
64, 5syl 17 . 2 (𝜑 → (vol*‘ 𝑛 ∈ ℕ 𝐴) ∈ ℝ*)
7 ovoliun.f . . . . . . . . . 10 (𝜑𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
87adantr 481 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
9 ovoliun.j . . . . . . . . . . . 12 (𝜑𝐽:ℕ–1-1-onto→(ℕ × ℕ))
10 f1of 6768 . . . . . . . . . . . 12 (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:ℕ⟶(ℕ × ℕ))
119, 10syl 17 . . . . . . . . . . 11 (𝜑𝐽:ℕ⟶(ℕ × ℕ))
1211ffvelcdmda 7026 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → (𝐽𝑘) ∈ (ℕ × ℕ))
13 xp1st 7964 . . . . . . . . . 10 ((𝐽𝑘) ∈ (ℕ × ℕ) → (1st ‘(𝐽𝑘)) ∈ ℕ)
1412, 13syl 17 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (1st ‘(𝐽𝑘)) ∈ ℕ)
158, 14ffvelcdmd 7027 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(1st ‘(𝐽𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
16 elovolmlem 25460 . . . . . . . 8 ((𝐹‘(1st ‘(𝐽𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ) ↔ (𝐹‘(1st ‘(𝐽𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
1715, 16sylib 219 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(1st ‘(𝐽𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
18 xp2nd 7965 . . . . . . . 8 ((𝐽𝑘) ∈ (ℕ × ℕ) → (2nd ‘(𝐽𝑘)) ∈ ℕ)
1912, 18syl 17 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → (2nd ‘(𝐽𝑘)) ∈ ℕ)
2017, 19ffvelcdmd 7027 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ((𝐹‘(1st ‘(𝐽𝑘)))‘(2nd ‘(𝐽𝑘))) ∈ ( ≤ ∩ (ℝ × ℝ)))
21 ovoliun.h . . . . . 6 𝐻 = (𝑘 ∈ ℕ ↦ ((𝐹‘(1st ‘(𝐽𝑘)))‘(2nd ‘(𝐽𝑘))))
2220, 21fmptd 7056 . . . . 5 (𝜑𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
23 eqid 2739 . . . . . 6 ((abs ∘ − ) ∘ 𝐻) = ((abs ∘ − ) ∘ 𝐻)
24 ovoliun.u . . . . . 6 𝑈 = seq1( + , ((abs ∘ − ) ∘ 𝐻))
2523, 24ovolsf 25458 . . . . 5 (𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑈:ℕ⟶(0[,)+∞))
26 frn 6663 . . . . 5 (𝑈:ℕ⟶(0[,)+∞) → ran 𝑈 ⊆ (0[,)+∞))
2722, 25, 263syl 18 . . . 4 (𝜑 → ran 𝑈 ⊆ (0[,)+∞))
28 icossxr 13377 . . . 4 (0[,)+∞) ⊆ ℝ*
2927, 28sstrdi 3927 . . 3 (𝜑 → ran 𝑈 ⊆ ℝ*)
30 supxrcl 13259 . . 3 (ran 𝑈 ⊆ ℝ* → sup(ran 𝑈, ℝ*, < ) ∈ ℝ*)
3129, 30syl 17 . 2 (𝜑 → sup(ran 𝑈, ℝ*, < ) ∈ ℝ*)
32 ovoliun.r . . . 4 (𝜑 → sup(ran 𝑇, ℝ*, < ) ∈ ℝ)
33 ovoliun.b . . . . 5 (𝜑𝐵 ∈ ℝ+)
3433rpred 12978 . . . 4 (𝜑𝐵 ∈ ℝ)
3532, 34readdcld 11166 . . 3 (𝜑 → (sup(ran 𝑇, ℝ*, < ) + 𝐵) ∈ ℝ)
3635rexrd 11187 . 2 (𝜑 → (sup(ran 𝑇, ℝ*, < ) + 𝐵) ∈ ℝ*)
37 eliun 4926 . . . . . 6 (𝑧 𝑛 ∈ ℕ 𝐴 ↔ ∃𝑛 ∈ ℕ 𝑧𝐴)
38 ovoliun.x1 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → 𝐴 ran ((,) ∘ (𝐹𝑛)))
39383adant3 1138 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → 𝐴 ran ((,) ∘ (𝐹𝑛)))
4013adant3 1138 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → 𝐴 ⊆ ℝ)
417ffvelcdmda 7026 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
42 elovolmlem 25460 . . . . . . . . . . . . 13 ((𝐹𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ) ↔ (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
4341, 42sylib 219 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
44433adant3 1138 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
45 ovolfioo 25453 . . . . . . . . . . 11 ((𝐴 ⊆ ℝ ∧ (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ))) → (𝐴 ran ((,) ∘ (𝐹𝑛)) ↔ ∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
4640, 44, 45syl2anc 590 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → (𝐴 ran ((,) ∘ (𝐹𝑛)) ↔ ∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
4739, 46mpbid 233 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → ∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))))
48 simp3 1144 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → 𝑧𝐴)
49 rsp 3227 . . . . . . . . 9 (∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → (𝑧𝐴 → ∃𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
5047, 48, 49sylc 65 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → ∃𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))))
51 simpl1 1198 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝜑)
52 f1ocnv 6780 . . . . . . . . . . . 12 (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:(ℕ × ℕ)–1-1-onto→ℕ)
53 f1of 6768 . . . . . . . . . . . 12 (𝐽:(ℕ × ℕ)–1-1-onto→ℕ → 𝐽:(ℕ × ℕ)⟶ℕ)
5451, 9, 52, 534syl 19 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝐽:(ℕ × ℕ)⟶ℕ)
55 simpl2 1199 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝑛 ∈ ℕ)
56 simpr 485 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝑗 ∈ ℕ)
5754, 55, 56fovcdmd 7529 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝑛𝐽𝑗) ∈ ℕ)
58 2fveq3 6833 . . . . . . . . . . . . . . . . . . 19 (𝑘 = (𝑛𝐽𝑗) → (1st ‘(𝐽𝑘)) = (1st ‘(𝐽‘(𝑛𝐽𝑗))))
5958fveq2d 6832 . . . . . . . . . . . . . . . . . 18 (𝑘 = (𝑛𝐽𝑗) → (𝐹‘(1st ‘(𝐽𝑘))) = (𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗)))))
60 2fveq3 6833 . . . . . . . . . . . . . . . . . 18 (𝑘 = (𝑛𝐽𝑗) → (2nd ‘(𝐽𝑘)) = (2nd ‘(𝐽‘(𝑛𝐽𝑗))))
6159, 60fveq12d 6835 . . . . . . . . . . . . . . . . 17 (𝑘 = (𝑛𝐽𝑗) → ((𝐹‘(1st ‘(𝐽𝑘)))‘(2nd ‘(𝐽𝑘))) = ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))))
62 fvex 6841 . . . . . . . . . . . . . . . . 17 ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))) ∈ V
6361, 21, 62fvmpt 6936 . . . . . . . . . . . . . . . 16 ((𝑛𝐽𝑗) ∈ ℕ → (𝐻‘(𝑛𝐽𝑗)) = ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))))
6457, 63syl 17 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐻‘(𝑛𝐽𝑗)) = ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))))
65 df-ov 7360 . . . . . . . . . . . . . . . . . . . . 21 (𝑛𝐽𝑗) = (𝐽‘⟨𝑛, 𝑗⟩)
6665fveq2i 6831 . . . . . . . . . . . . . . . . . . . 20 (𝐽‘(𝑛𝐽𝑗)) = (𝐽‘(𝐽‘⟨𝑛, 𝑗⟩))
6751, 9syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝐽:ℕ–1-1-onto→(ℕ × ℕ))
6855, 56opelxpd 5658 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → ⟨𝑛, 𝑗⟩ ∈ (ℕ × ℕ))
69 f1ocnvfv2 7222 . . . . . . . . . . . . . . . . . . . . 21 ((𝐽:ℕ–1-1-onto→(ℕ × ℕ) ∧ ⟨𝑛, 𝑗⟩ ∈ (ℕ × ℕ)) → (𝐽‘(𝐽‘⟨𝑛, 𝑗⟩)) = ⟨𝑛, 𝑗⟩)
7067, 68, 69syl2anc 590 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐽‘(𝐽‘⟨𝑛, 𝑗⟩)) = ⟨𝑛, 𝑗⟩)
7166, 70eqtrid 2786 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐽‘(𝑛𝐽𝑗)) = ⟨𝑛, 𝑗⟩)
7271fveq2d 6832 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (1st ‘(𝐽‘(𝑛𝐽𝑗))) = (1st ‘⟨𝑛, 𝑗⟩))
73 vex 3435 . . . . . . . . . . . . . . . . . . 19 𝑛 ∈ V
74 vex 3435 . . . . . . . . . . . . . . . . . . 19 𝑗 ∈ V
7573, 74op1st 7940 . . . . . . . . . . . . . . . . . 18 (1st ‘⟨𝑛, 𝑗⟩) = 𝑛
7672, 75eqtrdi 2790 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (1st ‘(𝐽‘(𝑛𝐽𝑗))) = 𝑛)
7776fveq2d 6832 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗)))) = (𝐹𝑛))
7871fveq2d 6832 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (2nd ‘(𝐽‘(𝑛𝐽𝑗))) = (2nd ‘⟨𝑛, 𝑗⟩))
7973, 74op2nd 7941 . . . . . . . . . . . . . . . . 17 (2nd ‘⟨𝑛, 𝑗⟩) = 𝑗
8078, 79eqtrdi 2790 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (2nd ‘(𝐽‘(𝑛𝐽𝑗))) = 𝑗)
8177, 80fveq12d 6835 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))) = ((𝐹𝑛)‘𝑗))
8264, 81eqtrd 2774 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐻‘(𝑛𝐽𝑗)) = ((𝐹𝑛)‘𝑗))
8382fveq2d 6832 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (1st ‘(𝐻‘(𝑛𝐽𝑗))) = (1st ‘((𝐹𝑛)‘𝑗)))
8483breq1d 5083 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧 ↔ (1st ‘((𝐹𝑛)‘𝑗)) < 𝑧))
8582fveq2d 6832 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (2nd ‘(𝐻‘(𝑛𝐽𝑗))) = (2nd ‘((𝐹𝑛)‘𝑗)))
8685breq2d 5085 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))) ↔ 𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))))
8784, 86anbi12d 638 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗)))) ↔ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
8887biimprd 249 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))))))
89 2fveq3 6833 . . . . . . . . . . . . 13 (𝑚 = (𝑛𝐽𝑗) → (1st ‘(𝐻𝑚)) = (1st ‘(𝐻‘(𝑛𝐽𝑗))))
9089breq1d 5083 . . . . . . . . . . . 12 (𝑚 = (𝑛𝐽𝑗) → ((1st ‘(𝐻𝑚)) < 𝑧 ↔ (1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧))
91 2fveq3 6833 . . . . . . . . . . . . 13 (𝑚 = (𝑛𝐽𝑗) → (2nd ‘(𝐻𝑚)) = (2nd ‘(𝐻‘(𝑛𝐽𝑗))))
9291breq2d 5085 . . . . . . . . . . . 12 (𝑚 = (𝑛𝐽𝑗) → (𝑧 < (2nd ‘(𝐻𝑚)) ↔ 𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗)))))
9390, 92anbi12d 638 . . . . . . . . . . 11 (𝑚 = (𝑛𝐽𝑗) → (((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))) ↔ ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))))))
9493rspcev 3560 . . . . . . . . . 10 (((𝑛𝐽𝑗) ∈ ℕ ∧ ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))))) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))))
9557, 88, 94syl6an 690 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
9695rexlimdva 3140 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → (∃𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
9750, 96mpd 15 . . . . . . 7 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))))
9897rexlimdv3a 3144 . . . . . 6 (𝜑 → (∃𝑛 ∈ ℕ 𝑧𝐴 → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
9937, 98biimtrid 243 . . . . 5 (𝜑 → (𝑧 𝑛 ∈ ℕ 𝐴 → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
10099ralrimiv 3130 . . . 4 (𝜑 → ∀𝑧 𝑛 ∈ ℕ 𝐴𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))))
101 ovolfioo 25453 . . . . 5 (( 𝑛 ∈ ℕ 𝐴 ⊆ ℝ ∧ 𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ))) → ( 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻) ↔ ∀𝑧 𝑛 ∈ ℕ 𝐴𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
1024, 22, 101syl2anc 590 . . . 4 (𝜑 → ( 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻) ↔ ∀𝑧 𝑛 ∈ ℕ 𝐴𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
103100, 102mpbird 258 . . 3 (𝜑 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻))
10424ovollb 25465 . . 3 ((𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻)) → (vol*‘ 𝑛 ∈ ℕ 𝐴) ≤ sup(ran 𝑈, ℝ*, < ))
10522, 103, 104syl2anc 590 . 2 (𝜑 → (vol*‘ 𝑛 ∈ ℕ 𝐴) ≤ sup(ran 𝑈, ℝ*, < ))
106 fzfi 13926 . . . . . . 7 (1...𝑗) ∈ Fin
107 elfznn 13499 . . . . . . . . . 10 (𝑤 ∈ (1...𝑗) → 𝑤 ∈ ℕ)
108 ffvelcdm 7023 . . . . . . . . . . 11 ((𝐽:ℕ⟶(ℕ × ℕ) ∧ 𝑤 ∈ ℕ) → (𝐽𝑤) ∈ (ℕ × ℕ))
109 xp1st 7964 . . . . . . . . . . 11 ((𝐽𝑤) ∈ (ℕ × ℕ) → (1st ‘(𝐽𝑤)) ∈ ℕ)
110 nnre 12173 . . . . . . . . . . 11 ((1st ‘(𝐽𝑤)) ∈ ℕ → (1st ‘(𝐽𝑤)) ∈ ℝ)
111108, 109, 1103syl 18 . . . . . . . . . 10 ((𝐽:ℕ⟶(ℕ × ℕ) ∧ 𝑤 ∈ ℕ) → (1st ‘(𝐽𝑤)) ∈ ℝ)
11211, 107, 111syl2an 602 . . . . . . . . 9 ((𝜑𝑤 ∈ (1...𝑗)) → (1st ‘(𝐽𝑤)) ∈ ℝ)
113112ralrimiva 3131 . . . . . . . 8 (𝜑 → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ∈ ℝ)
114113adantr 481 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ∈ ℝ)
115 fimaxre3 12094 . . . . . . 7 (((1...𝑗) ∈ Fin ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ∈ ℝ) → ∃𝑥 ∈ ℝ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥)
116106, 114, 115sylancr 593 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → ∃𝑥 ∈ ℝ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥)
117 fllep1 13752 . . . . . . . . . . . 12 (𝑥 ∈ ℝ → 𝑥 ≤ ((⌊‘𝑥) + 1))
118117ad2antlr 733 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → 𝑥 ≤ ((⌊‘𝑥) + 1))
119112adantlr 721 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → (1st ‘(𝐽𝑤)) ∈ ℝ)
120 simplr 774 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → 𝑥 ∈ ℝ)
121 flcl 13746 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ → (⌊‘𝑥) ∈ ℤ)
122121peano2zd 12628 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ → ((⌊‘𝑥) + 1) ∈ ℤ)
123122zred 12625 . . . . . . . . . . . . 13 (𝑥 ∈ ℝ → ((⌊‘𝑥) + 1) ∈ ℝ)
124123ad2antlr 733 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → ((⌊‘𝑥) + 1) ∈ ℝ)
125 letr 11232 . . . . . . . . . . . 12 (((1st ‘(𝐽𝑤)) ∈ ℝ ∧ 𝑥 ∈ ℝ ∧ ((⌊‘𝑥) + 1) ∈ ℝ) → (((1st ‘(𝐽𝑤)) ≤ 𝑥𝑥 ≤ ((⌊‘𝑥) + 1)) → (1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
126119, 120, 124, 125syl3anc 1379 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → (((1st ‘(𝐽𝑤)) ≤ 𝑥𝑥 ≤ ((⌊‘𝑥) + 1)) → (1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
127118, 126mpan2d 700 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → ((1st ‘(𝐽𝑤)) ≤ 𝑥 → (1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
128127ralimdva 3151 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
129128adantlr 721 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
130 ovoliun.t . . . . . . . . . 10 𝑇 = seq1( + , 𝐺)
131 ovoliun.g . . . . . . . . . 10 𝐺 = (𝑛 ∈ ℕ ↦ (vol*‘𝐴))
132 simpll 772 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → 𝜑)
133132, 1sylan 586 . . . . . . . . . 10 ((((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) ∧ 𝑛 ∈ ℕ) → 𝐴 ⊆ ℝ)
134 ovoliun.v . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → (vol*‘𝐴) ∈ ℝ)
135132, 134sylan 586 . . . . . . . . . 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 586 . . . . . . . . . 10 ((((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) ∧ 𝑛 ∈ ℕ) → 𝐴 ran ((,) ∘ (𝐹𝑛)))
142 ovoliun.x2 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → sup(ran 𝑆, ℝ*, < ) ≤ ((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
143132, 142sylan 586 . . . . . . . . . 10 ((((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) ∧ 𝑛 ∈ ℕ) → sup(ran 𝑆, ℝ*, < ) ≤ ((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
144 simplr 774 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → 𝑗 ∈ ℕ)
145122ad2antrl 734 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → ((⌊‘𝑥) + 1) ∈ ℤ)
146 simprr 778 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))
147130, 131, 133, 135, 136, 137, 138, 24, 21, 139, 140, 141, 143, 144, 145, 146ovoliunlem1 25488 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
148147expr 457 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1) → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
149129, 148syld 47 . . . . . . 7 (((𝜑𝑗 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
150149rexlimdva 3140 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → (∃𝑥 ∈ ℝ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
151116, 150mpd 15 . . . . 5 ((𝜑𝑗 ∈ ℕ) → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
152151ralrimiva 3131 . . . 4 (𝜑 → ∀𝑗 ∈ ℕ (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
153 ffn 6656 . . . . 5 (𝑈:ℕ⟶(0[,)+∞) → 𝑈 Fn ℕ)
154 breq1 5076 . . . . . 6 (𝑧 = (𝑈𝑗) → (𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
155154ralrn 7030 . . . . 5 (𝑈 Fn ℕ → (∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ ∀𝑗 ∈ ℕ (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
15622, 25, 153, 1554syl 19 . . . 4 (𝜑 → (∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ ∀𝑗 ∈ ℕ (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
157152, 156mpbird 258 . . 3 (𝜑 → ∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
158 supxrleub 13270 . . . 4 ((ran 𝑈 ⊆ ℝ* ∧ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ∈ ℝ*) → (sup(ran 𝑈, ℝ*, < ) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ ∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
15929, 36, 158syl2anc 590 . . 3 (𝜑 → (sup(ran 𝑈, ℝ*, < ) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ ∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
160157, 159mpbird 258 . 2 (𝜑 → sup(ran 𝑈, ℝ*, < ) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
1616, 31, 36, 105, 160xrletrd 13105 1 (𝜑 → (vol*‘ 𝑛 ∈ ℕ 𝐴) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3a 1092   = wceq 1547  wcel 2119  wral 3053  wrex 3063  cin 3882  wss 3883  cop 4562   cuni 4839   ciun 4922   class class class wbr 5073  cmpt 5154   × cxp 5617  ccnv 5618  ran crn 5620  ccom 5623   Fn wfn 6481  wf 6482  1-1-ontowf1o 6485  cfv 6486  (class class class)co 7357  1st c1st 7930  2nd c2nd 7931  m cmap 8764  Fincfn 8884  supcsup 9344  cr 11029  0cc0 11030  1c1 11031   + caddc 11033  +∞cpnf 11168  *cxr 11170   < clt 11171  cle 11172  cmin 11369   / cdiv 11799  cn 12166  2c2 12228  cz 12516  +crp 12934  (,)cioo 13290  [,)cico 13292  ...cfz 13453  cfl 13741  seqcseq 13955  cexp 14015  abscabs 15188  vol*covol 25448
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-rep 5200  ax-sep 5219  ax-nul 5229  ax-pow 5295  ax-pr 5363  ax-un 7679  ax-inf2 9554  ax-cnex 11086  ax-resscn 11087  ax-1cn 11088  ax-icn 11089  ax-addcl 11090  ax-addrcl 11091  ax-mulcl 11092  ax-mulrcl 11093  ax-mulcom 11094  ax-addass 11095  ax-mulass 11096  ax-distr 11097  ax-i2m1 11098  ax-1ne0 11099  ax-1rid 11100  ax-rnegex 11101  ax-rrecex 11102  ax-cnre 11103  ax-pre-lttri 11104  ax-pre-lttrn 11105  ax-pre-ltadd 11106  ax-pre-mulgt0 11107  ax-pre-sup 11108
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4263  df-if 4456  df-pw 4532  df-sn 4557  df-pr 4559  df-op 4563  df-uni 4840  df-int 4879  df-iun 4924  df-br 5074  df-opab 5136  df-mpt 5155  df-tr 5181  df-id 5514  df-eprel 5519  df-po 5527  df-so 5528  df-fr 5572  df-se 5573  df-we 5574  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-pred 6253  df-ord 6314  df-on 6315  df-lim 6316  df-suc 6317  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-isom 6495  df-riota 7314  df-ov 7360  df-oprab 7361  df-mpo 7362  df-om 7808  df-1st 7932  df-2nd 7933  df-frecs 8222  df-wrecs 8253  df-recs 8302  df-rdg 8340  df-1o 8396  df-er 8634  df-map 8766  df-pm 8767  df-en 8885  df-dom 8886  df-sdom 8887  df-fin 8888  df-sup 9346  df-inf 9347  df-oi 9416  df-card 9855  df-pnf 11173  df-mnf 11174  df-xr 11175  df-ltxr 11176  df-le 11177  df-sub 11371  df-neg 11372  df-div 11800  df-nn 12167  df-2 12236  df-3 12237  df-n0 12430  df-z 12517  df-uz 12781  df-rp 12935  df-ioo 13294  df-ico 13296  df-fz 13454  df-fzo 13601  df-fl 13743  df-seq 13956  df-exp 14016  df-hash 14285  df-cj 15053  df-re 15054  df-im 15055  df-sqrt 15189  df-abs 15190  df-clim 15442  df-rlim 15443  df-sum 15641  df-ovol 25450
This theorem is referenced by:  ovoliunlem3  25490
  Copyright terms: Public domain W3C validator