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

Theorem ovoliunlem2 25475
Description: Lemma for ovoliun 25477. (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 3130 . . . 4 (𝜑 → ∀𝑛 ∈ ℕ 𝐴 ⊆ ℝ)
3 iunss 5002 . . . 4 ( 𝑛 ∈ ℕ 𝐴 ⊆ ℝ ↔ ∀𝑛 ∈ ℕ 𝐴 ⊆ ℝ)
42, 3sylibr 234 . . 3 (𝜑 𝑛 ∈ ℕ 𝐴 ⊆ ℝ)
5 ovolcl 25450 . . 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 6782 . . . . . . . . . . . 12 (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:ℕ⟶(ℕ × ℕ))
119, 10syl 17 . . . . . . . . . . 11 (𝜑𝐽:ℕ⟶(ℕ × ℕ))
1211ffvelcdmda 7038 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → (𝐽𝑘) ∈ (ℕ × ℕ))
13 xp1st 7975 . . . . . . . . . 10 ((𝐽𝑘) ∈ (ℕ × ℕ) → (1st ‘(𝐽𝑘)) ∈ ℕ)
1412, 13syl 17 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → (1st ‘(𝐽𝑘)) ∈ ℕ)
158, 14ffvelcdmd 7039 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(1st ‘(𝐽𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
16 elovolmlem 25446 . . . . . . . 8 ((𝐹‘(1st ‘(𝐽𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ) ↔ (𝐹‘(1st ‘(𝐽𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
1715, 16sylib 218 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → (𝐹‘(1st ‘(𝐽𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
18 xp2nd 7976 . . . . . . . 8 ((𝐽𝑘) ∈ (ℕ × ℕ) → (2nd ‘(𝐽𝑘)) ∈ ℕ)
1912, 18syl 17 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → (2nd ‘(𝐽𝑘)) ∈ ℕ)
2017, 19ffvelcdmd 7039 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ((𝐹‘(1st ‘(𝐽𝑘)))‘(2nd ‘(𝐽𝑘))) ∈ ( ≤ ∩ (ℝ × ℝ)))
21 ovoliun.h . . . . . 6 𝐻 = (𝑘 ∈ ℕ ↦ ((𝐹‘(1st ‘(𝐽𝑘)))‘(2nd ‘(𝐽𝑘))))
2220, 21fmptd 7068 . . . . 5 (𝜑𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
23 eqid 2737 . . . . . 6 ((abs ∘ − ) ∘ 𝐻) = ((abs ∘ − ) ∘ 𝐻)
24 ovoliun.u . . . . . 6 𝑈 = seq1( + , ((abs ∘ − ) ∘ 𝐻))
2523, 24ovolsf 25444 . . . . 5 (𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑈:ℕ⟶(0[,)+∞))
26 frn 6677 . . . . 5 (𝑈:ℕ⟶(0[,)+∞) → ran 𝑈 ⊆ (0[,)+∞))
2722, 25, 263syl 18 . . . 4 (𝜑 → ran 𝑈 ⊆ (0[,)+∞))
28 icossxr 13360 . . . 4 (0[,)+∞) ⊆ ℝ*
2927, 28sstrdi 3948 . . 3 (𝜑 → ran 𝑈 ⊆ ℝ*)
30 supxrcl 13242 . . 3 (ran 𝑈 ⊆ ℝ* → sup(ran 𝑈, ℝ*, < ) ∈ ℝ*)
3129, 30syl 17 . 2 (𝜑 → sup(ran 𝑈, ℝ*, < ) ∈ ℝ*)
32 ovoliun.r . . . 4 (𝜑 → sup(ran 𝑇, ℝ*, < ) ∈ ℝ)
33 ovoliun.b . . . . 5 (𝜑𝐵 ∈ ℝ+)
3433rpred 12961 . . . 4 (𝜑𝐵 ∈ ℝ)
3532, 34readdcld 11173 . . 3 (𝜑 → (sup(ran 𝑇, ℝ*, < ) + 𝐵) ∈ ℝ)
3635rexrd 11194 . 2 (𝜑 → (sup(ran 𝑇, ℝ*, < ) + 𝐵) ∈ ℝ*)
37 eliun 4952 . . . . . 6 (𝑧 𝑛 ∈ ℕ 𝐴 ↔ ∃𝑛 ∈ ℕ 𝑧𝐴)
38 ovoliun.x1 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → 𝐴 ran ((,) ∘ (𝐹𝑛)))
39383adant3 1133 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → 𝐴 ran ((,) ∘ (𝐹𝑛)))
4013adant3 1133 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → 𝐴 ⊆ ℝ)
417ffvelcdmda 7038 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ))
42 elovolmlem 25446 . . . . . . . . . . . . 13 ((𝐹𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑m ℕ) ↔ (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
4341, 42sylib 218 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
44433adant3 1133 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
45 ovolfioo 25439 . . . . . . . . . . 11 ((𝐴 ⊆ ℝ ∧ (𝐹𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ))) → (𝐴 ran ((,) ∘ (𝐹𝑛)) ↔ ∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
4640, 44, 45syl2anc 585 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → (𝐴 ran ((,) ∘ (𝐹𝑛)) ↔ ∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
4739, 46mpbid 232 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → ∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))))
48 simp3 1139 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → 𝑧𝐴)
49 rsp 3226 . . . . . . . . 9 (∀𝑧𝐴𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → (𝑧𝐴 → ∃𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
5047, 48, 49sylc 65 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → ∃𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))))
51 simpl1 1193 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝜑)
52 f1ocnv 6794 . . . . . . . . . . . 12 (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:(ℕ × ℕ)–1-1-onto→ℕ)
53 f1of 6782 . . . . . . . . . . . 12 (𝐽:(ℕ × ℕ)–1-1-onto→ℕ → 𝐽:(ℕ × ℕ)⟶ℕ)
5451, 9, 52, 534syl 19 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝐽:(ℕ × ℕ)⟶ℕ)
55 simpl2 1194 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝑛 ∈ ℕ)
56 simpr 484 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝑗 ∈ ℕ)
5754, 55, 56fovcdmd 7540 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝑛𝐽𝑗) ∈ ℕ)
58 2fveq3 6847 . . . . . . . . . . . . . . . . . . 19 (𝑘 = (𝑛𝐽𝑗) → (1st ‘(𝐽𝑘)) = (1st ‘(𝐽‘(𝑛𝐽𝑗))))
5958fveq2d 6846 . . . . . . . . . . . . . . . . . 18 (𝑘 = (𝑛𝐽𝑗) → (𝐹‘(1st ‘(𝐽𝑘))) = (𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗)))))
60 2fveq3 6847 . . . . . . . . . . . . . . . . . 18 (𝑘 = (𝑛𝐽𝑗) → (2nd ‘(𝐽𝑘)) = (2nd ‘(𝐽‘(𝑛𝐽𝑗))))
6159, 60fveq12d 6849 . . . . . . . . . . . . . . . . 17 (𝑘 = (𝑛𝐽𝑗) → ((𝐹‘(1st ‘(𝐽𝑘)))‘(2nd ‘(𝐽𝑘))) = ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))))
62 fvex 6855 . . . . . . . . . . . . . . . . 17 ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))) ∈ V
6361, 21, 62fvmpt 6949 . . . . . . . . . . . . . . . 16 ((𝑛𝐽𝑗) ∈ ℕ → (𝐻‘(𝑛𝐽𝑗)) = ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))))
6457, 63syl 17 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐻‘(𝑛𝐽𝑗)) = ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))))
65 df-ov 7371 . . . . . . . . . . . . . . . . . . . . 21 (𝑛𝐽𝑗) = (𝐽‘⟨𝑛, 𝑗⟩)
6665fveq2i 6845 . . . . . . . . . . . . . . . . . . . 20 (𝐽‘(𝑛𝐽𝑗)) = (𝐽‘(𝐽‘⟨𝑛, 𝑗⟩))
6751, 9syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → 𝐽:ℕ–1-1-onto→(ℕ × ℕ))
6855, 56opelxpd 5671 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → ⟨𝑛, 𝑗⟩ ∈ (ℕ × ℕ))
69 f1ocnvfv2 7233 . . . . . . . . . . . . . . . . . . . . 21 ((𝐽:ℕ–1-1-onto→(ℕ × ℕ) ∧ ⟨𝑛, 𝑗⟩ ∈ (ℕ × ℕ)) → (𝐽‘(𝐽‘⟨𝑛, 𝑗⟩)) = ⟨𝑛, 𝑗⟩)
7067, 68, 69syl2anc 585 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐽‘(𝐽‘⟨𝑛, 𝑗⟩)) = ⟨𝑛, 𝑗⟩)
7166, 70eqtrid 2784 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐽‘(𝑛𝐽𝑗)) = ⟨𝑛, 𝑗⟩)
7271fveq2d 6846 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (1st ‘(𝐽‘(𝑛𝐽𝑗))) = (1st ‘⟨𝑛, 𝑗⟩))
73 vex 3446 . . . . . . . . . . . . . . . . . . 19 𝑛 ∈ V
74 vex 3446 . . . . . . . . . . . . . . . . . . 19 𝑗 ∈ V
7573, 74op1st 7951 . . . . . . . . . . . . . . . . . 18 (1st ‘⟨𝑛, 𝑗⟩) = 𝑛
7672, 75eqtrdi 2788 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (1st ‘(𝐽‘(𝑛𝐽𝑗))) = 𝑛)
7776fveq2d 6846 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗)))) = (𝐹𝑛))
7871fveq2d 6846 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (2nd ‘(𝐽‘(𝑛𝐽𝑗))) = (2nd ‘⟨𝑛, 𝑗⟩))
7973, 74op2nd 7952 . . . . . . . . . . . . . . . . 17 (2nd ‘⟨𝑛, 𝑗⟩) = 𝑗
8078, 79eqtrdi 2788 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (2nd ‘(𝐽‘(𝑛𝐽𝑗))) = 𝑗)
8177, 80fveq12d 6849 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → ((𝐹‘(1st ‘(𝐽‘(𝑛𝐽𝑗))))‘(2nd ‘(𝐽‘(𝑛𝐽𝑗)))) = ((𝐹𝑛)‘𝑗))
8264, 81eqtrd 2772 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝐻‘(𝑛𝐽𝑗)) = ((𝐹𝑛)‘𝑗))
8382fveq2d 6846 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (1st ‘(𝐻‘(𝑛𝐽𝑗))) = (1st ‘((𝐹𝑛)‘𝑗)))
8483breq1d 5110 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧 ↔ (1st ‘((𝐹𝑛)‘𝑗)) < 𝑧))
8582fveq2d 6846 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (2nd ‘(𝐻‘(𝑛𝐽𝑗))) = (2nd ‘((𝐹𝑛)‘𝑗)))
8685breq2d 5112 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))) ↔ 𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))))
8784, 86anbi12d 633 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗)))) ↔ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗)))))
8887biimprd 248 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))))))
89 2fveq3 6847 . . . . . . . . . . . . 13 (𝑚 = (𝑛𝐽𝑗) → (1st ‘(𝐻𝑚)) = (1st ‘(𝐻‘(𝑛𝐽𝑗))))
9089breq1d 5110 . . . . . . . . . . . 12 (𝑚 = (𝑛𝐽𝑗) → ((1st ‘(𝐻𝑚)) < 𝑧 ↔ (1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧))
91 2fveq3 6847 . . . . . . . . . . . . 13 (𝑚 = (𝑛𝐽𝑗) → (2nd ‘(𝐻𝑚)) = (2nd ‘(𝐻‘(𝑛𝐽𝑗))))
9291breq2d 5112 . . . . . . . . . . . 12 (𝑚 = (𝑛𝐽𝑗) → (𝑧 < (2nd ‘(𝐻𝑚)) ↔ 𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗)))))
9390, 92anbi12d 633 . . . . . . . . . . 11 (𝑚 = (𝑛𝐽𝑗) → (((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))) ↔ ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))))))
9493rspcev 3578 . . . . . . . . . 10 (((𝑛𝐽𝑗) ∈ ℕ ∧ ((1st ‘(𝐻‘(𝑛𝐽𝑗))) < 𝑧𝑧 < (2nd ‘(𝐻‘(𝑛𝐽𝑗))))) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))))
9557, 88, 94syl6an 685 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) ∧ 𝑗 ∈ ℕ) → (((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
9695rexlimdva 3139 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → (∃𝑗 ∈ ℕ ((1st ‘((𝐹𝑛)‘𝑗)) < 𝑧𝑧 < (2nd ‘((𝐹𝑛)‘𝑗))) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
9750, 96mpd 15 . . . . . . 7 ((𝜑𝑛 ∈ ℕ ∧ 𝑧𝐴) → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))))
9897rexlimdv3a 3143 . . . . . 6 (𝜑 → (∃𝑛 ∈ ℕ 𝑧𝐴 → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
9937, 98biimtrid 242 . . . . 5 (𝜑 → (𝑧 𝑛 ∈ ℕ 𝐴 → ∃𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
10099ralrimiv 3129 . . . 4 (𝜑 → ∀𝑧 𝑛 ∈ ℕ 𝐴𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚))))
101 ovolfioo 25439 . . . . 5 (( 𝑛 ∈ ℕ 𝐴 ⊆ ℝ ∧ 𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ))) → ( 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻) ↔ ∀𝑧 𝑛 ∈ ℕ 𝐴𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
1024, 22, 101syl2anc 585 . . . 4 (𝜑 → ( 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻) ↔ ∀𝑧 𝑛 ∈ ℕ 𝐴𝑚 ∈ ℕ ((1st ‘(𝐻𝑚)) < 𝑧𝑧 < (2nd ‘(𝐻𝑚)))))
103100, 102mpbird 257 . . 3 (𝜑 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻))
10424ovollb 25451 . . 3 ((𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑛 ∈ ℕ 𝐴 ran ((,) ∘ 𝐻)) → (vol*‘ 𝑛 ∈ ℕ 𝐴) ≤ sup(ran 𝑈, ℝ*, < ))
10522, 103, 104syl2anc 585 . 2 (𝜑 → (vol*‘ 𝑛 ∈ ℕ 𝐴) ≤ sup(ran 𝑈, ℝ*, < ))
106 fzfi 13907 . . . . . . 7 (1...𝑗) ∈ Fin
107 elfznn 13481 . . . . . . . . . 10 (𝑤 ∈ (1...𝑗) → 𝑤 ∈ ℕ)
108 ffvelcdm 7035 . . . . . . . . . . 11 ((𝐽:ℕ⟶(ℕ × ℕ) ∧ 𝑤 ∈ ℕ) → (𝐽𝑤) ∈ (ℕ × ℕ))
109 xp1st 7975 . . . . . . . . . . 11 ((𝐽𝑤) ∈ (ℕ × ℕ) → (1st ‘(𝐽𝑤)) ∈ ℕ)
110 nnre 12164 . . . . . . . . . . 11 ((1st ‘(𝐽𝑤)) ∈ ℕ → (1st ‘(𝐽𝑤)) ∈ ℝ)
111108, 109, 1103syl 18 . . . . . . . . . 10 ((𝐽:ℕ⟶(ℕ × ℕ) ∧ 𝑤 ∈ ℕ) → (1st ‘(𝐽𝑤)) ∈ ℝ)
11211, 107, 111syl2an 597 . . . . . . . . 9 ((𝜑𝑤 ∈ (1...𝑗)) → (1st ‘(𝐽𝑤)) ∈ ℝ)
113112ralrimiva 3130 . . . . . . . 8 (𝜑 → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ∈ ℝ)
114113adantr 480 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ∈ ℝ)
115 fimaxre3 12100 . . . . . . 7 (((1...𝑗) ∈ Fin ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ∈ ℝ) → ∃𝑥 ∈ ℝ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥)
116106, 114, 115sylancr 588 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → ∃𝑥 ∈ ℝ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥)
117 fllep1 13733 . . . . . . . . . . . 12 (𝑥 ∈ ℝ → 𝑥 ≤ ((⌊‘𝑥) + 1))
118117ad2antlr 728 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → 𝑥 ≤ ((⌊‘𝑥) + 1))
119112adantlr 716 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → (1st ‘(𝐽𝑤)) ∈ ℝ)
120 simplr 769 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → 𝑥 ∈ ℝ)
121 flcl 13727 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ → (⌊‘𝑥) ∈ ℤ)
122121peano2zd 12611 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ → ((⌊‘𝑥) + 1) ∈ ℤ)
123122zred 12608 . . . . . . . . . . . . 13 (𝑥 ∈ ℝ → ((⌊‘𝑥) + 1) ∈ ℝ)
124123ad2antlr 728 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → ((⌊‘𝑥) + 1) ∈ ℝ)
125 letr 11239 . . . . . . . . . . . 12 (((1st ‘(𝐽𝑤)) ∈ ℝ ∧ 𝑥 ∈ ℝ ∧ ((⌊‘𝑥) + 1) ∈ ℝ) → (((1st ‘(𝐽𝑤)) ≤ 𝑥𝑥 ≤ ((⌊‘𝑥) + 1)) → (1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
126119, 120, 124, 125syl3anc 1374 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → (((1st ‘(𝐽𝑤)) ≤ 𝑥𝑥 ≤ ((⌊‘𝑥) + 1)) → (1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
127118, 126mpan2d 695 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ) ∧ 𝑤 ∈ (1...𝑗)) → ((1st ‘(𝐽𝑤)) ≤ 𝑥 → (1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
128127ralimdva 3150 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
129128adantlr 716 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1)))
130 ovoliun.t . . . . . . . . . 10 𝑇 = seq1( + , 𝐺)
131 ovoliun.g . . . . . . . . . 10 𝐺 = (𝑛 ∈ ℕ ↦ (vol*‘𝐴))
132 simpll 767 . . . . . . . . . . 11 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → 𝜑)
133132, 1sylan 581 . . . . . . . . . 10 ((((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) ∧ 𝑛 ∈ ℕ) → 𝐴 ⊆ ℝ)
134 ovoliun.v . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → (vol*‘𝐴) ∈ ℝ)
135132, 134sylan 581 . . . . . . . . . 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 581 . . . . . . . . . 10 ((((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) ∧ 𝑛 ∈ ℕ) → 𝐴 ran ((,) ∘ (𝐹𝑛)))
142 ovoliun.x2 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → sup(ran 𝑆, ℝ*, < ) ≤ ((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
143132, 142sylan 581 . . . . . . . . . 10 ((((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) ∧ 𝑛 ∈ ℕ) → sup(ran 𝑆, ℝ*, < ) ≤ ((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
144 simplr 769 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → 𝑗 ∈ ℕ)
145122ad2antrl 729 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → ((⌊‘𝑥) + 1) ∈ ℤ)
146 simprr 773 . . . . . . . . . 10 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))
147130, 131, 133, 135, 136, 137, 138, 24, 21, 139, 140, 141, 143, 144, 145, 146ovoliunlem1 25474 . . . . . . . . 9 (((𝜑𝑗 ∈ ℕ) ∧ (𝑥 ∈ ℝ ∧ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1))) → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
148147expr 456 . . . . . . . 8 (((𝜑𝑗 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ ((⌊‘𝑥) + 1) → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
149129, 148syld 47 . . . . . . 7 (((𝜑𝑗 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
150149rexlimdva 3139 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → (∃𝑥 ∈ ℝ ∀𝑤 ∈ (1...𝑗)(1st ‘(𝐽𝑤)) ≤ 𝑥 → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
151116, 150mpd 15 . . . . 5 ((𝜑𝑗 ∈ ℕ) → (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
152151ralrimiva 3130 . . . 4 (𝜑 → ∀𝑗 ∈ ℕ (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
153 ffn 6670 . . . . 5 (𝑈:ℕ⟶(0[,)+∞) → 𝑈 Fn ℕ)
154 breq1 5103 . . . . . 6 (𝑧 = (𝑈𝑗) → (𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ (𝑈𝑗) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
155154ralrn 7042 . . . . 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 13253 . . . 4 ((ran 𝑈 ⊆ ℝ* ∧ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ∈ ℝ*) → (sup(ran 𝑈, ℝ*, < ) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ ∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
15929, 36, 158syl2anc 585 . . 3 (𝜑 → (sup(ran 𝑈, ℝ*, < ) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵) ↔ ∀𝑧 ∈ ran 𝑈 𝑧 ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵)))
160157, 159mpbird 257 . 2 (𝜑 → sup(ran 𝑈, ℝ*, < ) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
1616, 31, 36, 105, 160xrletrd 13088 1 (𝜑 → (vol*‘ 𝑛 ∈ ℕ 𝐴) ≤ (sup(ran 𝑇, ℝ*, < ) + 𝐵))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wral 3052  wrex 3062  cin 3902  wss 3903  cop 4588   cuni 4865   ciun 4948   class class class wbr 5100  cmpt 5181   × cxp 5630  ccnv 5631  ran crn 5633  ccom 5636   Fn wfn 6495  wf 6496  1-1-ontowf1o 6499  cfv 6500  (class class class)co 7368  1st c1st 7941  2nd c2nd 7942  m cmap 8775  Fincfn 8895  supcsup 9355  cr 11037  0cc0 11038  1c1 11039   + caddc 11041  +∞cpnf 11175  *cxr 11177   < clt 11178  cle 11179  cmin 11376   / cdiv 11806  cn 12157  2c2 12212  cz 12500  +crp 12917  (,)cioo 13273  [,)cico 13275  ...cfz 13435  cfl 13722  seqcseq 13936  cexp 13996  abscabs 15169  vol*covol 25434
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 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690  ax-inf2 9562  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115  ax-pre-sup 11116
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 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-se 5586  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-isom 6509  df-riota 7325  df-ov 7371  df-oprab 7372  df-mpo 7373  df-om 7819  df-1st 7943  df-2nd 7944  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-er 8645  df-map 8777  df-pm 8778  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-sup 9357  df-inf 9358  df-oi 9427  df-card 9863  df-pnf 11180  df-mnf 11181  df-xr 11182  df-ltxr 11183  df-le 11184  df-sub 11378  df-neg 11379  df-div 11807  df-nn 12158  df-2 12220  df-3 12221  df-n0 12414  df-z 12501  df-uz 12764  df-rp 12918  df-ioo 13277  df-ico 13279  df-fz 13436  df-fzo 13583  df-fl 13724  df-seq 13937  df-exp 13997  df-hash 14266  df-cj 15034  df-re 15035  df-im 15036  df-sqrt 15170  df-abs 15171  df-clim 15423  df-rlim 15424  df-sum 15622  df-ovol 25436
This theorem is referenced by:  ovoliunlem3  25476
  Copyright terms: Public domain W3C validator