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

Theorem ovolicc1 23484
Description: The measure of a closed interval is lower bounded by its length. (Contributed by Mario Carneiro, 13-Jun-2014.) (Proof shortened by Mario Carneiro, 25-Mar-2015.)
Hypotheses
Ref Expression
ovolicc.1 (𝜑𝐴 ∈ ℝ)
ovolicc.2 (𝜑𝐵 ∈ ℝ)
ovolicc.3 (𝜑𝐴𝐵)
ovolicc1.4 𝐺 = (𝑛 ∈ ℕ ↦ if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩))
Assertion
Ref Expression
ovolicc1 (𝜑 → (vol*‘(𝐴[,]𝐵)) ≤ (𝐵𝐴))
Distinct variable groups:   𝐴,𝑛   𝐵,𝑛   𝑛,𝐺   𝜑,𝑛

Proof of Theorem ovolicc1
Dummy variables 𝑘 𝑥 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ovolicc.1 . . . 4 (𝜑𝐴 ∈ ℝ)
2 ovolicc.2 . . . 4 (𝜑𝐵 ∈ ℝ)
3 iccssre 12448 . . . 4 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴[,]𝐵) ⊆ ℝ)
41, 2, 3syl2anc 696 . . 3 (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
5 ovolcl 23446 . . 3 ((𝐴[,]𝐵) ⊆ ℝ → (vol*‘(𝐴[,]𝐵)) ∈ ℝ*)
64, 5syl 17 . 2 (𝜑 → (vol*‘(𝐴[,]𝐵)) ∈ ℝ*)
7 ovolicc.3 . . . . . . . . . . 11 (𝜑𝐴𝐵)
8 df-br 4805 . . . . . . . . . . 11 (𝐴𝐵 ↔ ⟨𝐴, 𝐵⟩ ∈ ≤ )
97, 8sylib 208 . . . . . . . . . 10 (𝜑 → ⟨𝐴, 𝐵⟩ ∈ ≤ )
10 opelxpi 5305 . . . . . . . . . . 11 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ⟨𝐴, 𝐵⟩ ∈ (ℝ × ℝ))
111, 2, 10syl2anc 696 . . . . . . . . . 10 (𝜑 → ⟨𝐴, 𝐵⟩ ∈ (ℝ × ℝ))
129, 11elind 3941 . . . . . . . . 9 (𝜑 → ⟨𝐴, 𝐵⟩ ∈ ( ≤ ∩ (ℝ × ℝ)))
1312adantr 472 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → ⟨𝐴, 𝐵⟩ ∈ ( ≤ ∩ (ℝ × ℝ)))
14 0le0 11302 . . . . . . . . . 10 0 ≤ 0
15 df-br 4805 . . . . . . . . . 10 (0 ≤ 0 ↔ ⟨0, 0⟩ ∈ ≤ )
1614, 15mpbi 220 . . . . . . . . 9 ⟨0, 0⟩ ∈ ≤
17 0re 10232 . . . . . . . . . 10 0 ∈ ℝ
18 opelxpi 5305 . . . . . . . . . 10 ((0 ∈ ℝ ∧ 0 ∈ ℝ) → ⟨0, 0⟩ ∈ (ℝ × ℝ))
1917, 17, 18mp2an 710 . . . . . . . . 9 ⟨0, 0⟩ ∈ (ℝ × ℝ)
20 elin 3939 . . . . . . . . 9 (⟨0, 0⟩ ∈ ( ≤ ∩ (ℝ × ℝ)) ↔ (⟨0, 0⟩ ∈ ≤ ∧ ⟨0, 0⟩ ∈ (ℝ × ℝ)))
2116, 19, 20mpbir2an 993 . . . . . . . 8 ⟨0, 0⟩ ∈ ( ≤ ∩ (ℝ × ℝ))
22 ifcl 4274 . . . . . . . 8 ((⟨𝐴, 𝐵⟩ ∈ ( ≤ ∩ (ℝ × ℝ)) ∧ ⟨0, 0⟩ ∈ ( ≤ ∩ (ℝ × ℝ))) → if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) ∈ ( ≤ ∩ (ℝ × ℝ)))
2313, 21, 22sylancl 697 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) ∈ ( ≤ ∩ (ℝ × ℝ)))
24 ovolicc1.4 . . . . . . 7 𝐺 = (𝑛 ∈ ℕ ↦ if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩))
2523, 24fmptd 6548 . . . . . 6 (𝜑𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
26 eqid 2760 . . . . . . 7 ((abs ∘ − ) ∘ 𝐺) = ((abs ∘ − ) ∘ 𝐺)
27 eqid 2760 . . . . . . 7 seq1( + , ((abs ∘ − ) ∘ 𝐺)) = seq1( + , ((abs ∘ − ) ∘ 𝐺))
2826, 27ovolsf 23441 . . . . . 6 (𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → seq1( + , ((abs ∘ − ) ∘ 𝐺)):ℕ⟶(0[,)+∞))
2925, 28syl 17 . . . . 5 (𝜑 → seq1( + , ((abs ∘ − ) ∘ 𝐺)):ℕ⟶(0[,)+∞))
30 frn 6214 . . . . 5 (seq1( + , ((abs ∘ − ) ∘ 𝐺)):ℕ⟶(0[,)+∞) → ran seq1( + , ((abs ∘ − ) ∘ 𝐺)) ⊆ (0[,)+∞))
3129, 30syl 17 . . . 4 (𝜑 → ran seq1( + , ((abs ∘ − ) ∘ 𝐺)) ⊆ (0[,)+∞))
32 icossxr 12451 . . . 4 (0[,)+∞) ⊆ ℝ*
3331, 32syl6ss 3756 . . 3 (𝜑 → ran seq1( + , ((abs ∘ − ) ∘ 𝐺)) ⊆ ℝ*)
34 supxrcl 12338 . . 3 (ran seq1( + , ((abs ∘ − ) ∘ 𝐺)) ⊆ ℝ* → sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ) ∈ ℝ*)
3533, 34syl 17 . 2 (𝜑 → sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ) ∈ ℝ*)
362, 1resubcld 10650 . . 3 (𝜑 → (𝐵𝐴) ∈ ℝ)
3736rexrd 10281 . 2 (𝜑 → (𝐵𝐴) ∈ ℝ*)
38 1nn 11223 . . . . . . 7 1 ∈ ℕ
3938a1i 11 . . . . . 6 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 1 ∈ ℕ)
40 op1stg 7345 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
411, 2, 40syl2anc 696 . . . . . . . 8 (𝜑 → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
4241adantr 472 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
43 elicc2 12431 . . . . . . . . . 10 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝑥 ∈ (𝐴[,]𝐵) ↔ (𝑥 ∈ ℝ ∧ 𝐴𝑥𝑥𝐵)))
441, 2, 43syl2anc 696 . . . . . . . . 9 (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↔ (𝑥 ∈ ℝ ∧ 𝐴𝑥𝑥𝐵)))
4544biimpa 502 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (𝑥 ∈ ℝ ∧ 𝐴𝑥𝑥𝐵))
4645simp2d 1138 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝐴𝑥)
4742, 46eqbrtrd 4826 . . . . . 6 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (1st ‘⟨𝐴, 𝐵⟩) ≤ 𝑥)
4845simp3d 1139 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝑥𝐵)
49 op2ndg 7346 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
501, 2, 49syl2anc 696 . . . . . . . 8 (𝜑 → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
5150adantr 472 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
5248, 51breqtrrd 4832 . . . . . 6 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ≤ (2nd ‘⟨𝐴, 𝐵⟩))
53 fveq2 6352 . . . . . . . . . . 11 (𝑛 = 1 → (𝐺𝑛) = (𝐺‘1))
54 iftrue 4236 . . . . . . . . . . . . 13 (𝑛 = 1 → if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) = ⟨𝐴, 𝐵⟩)
55 opex 5081 . . . . . . . . . . . . 13 𝐴, 𝐵⟩ ∈ V
5654, 24, 55fvmpt 6444 . . . . . . . . . . . 12 (1 ∈ ℕ → (𝐺‘1) = ⟨𝐴, 𝐵⟩)
5738, 56ax-mp 5 . . . . . . . . . . 11 (𝐺‘1) = ⟨𝐴, 𝐵
5853, 57syl6eq 2810 . . . . . . . . . 10 (𝑛 = 1 → (𝐺𝑛) = ⟨𝐴, 𝐵⟩)
5958fveq2d 6356 . . . . . . . . 9 (𝑛 = 1 → (1st ‘(𝐺𝑛)) = (1st ‘⟨𝐴, 𝐵⟩))
6059breq1d 4814 . . . . . . . 8 (𝑛 = 1 → ((1st ‘(𝐺𝑛)) ≤ 𝑥 ↔ (1st ‘⟨𝐴, 𝐵⟩) ≤ 𝑥))
6158fveq2d 6356 . . . . . . . . 9 (𝑛 = 1 → (2nd ‘(𝐺𝑛)) = (2nd ‘⟨𝐴, 𝐵⟩))
6261breq2d 4816 . . . . . . . 8 (𝑛 = 1 → (𝑥 ≤ (2nd ‘(𝐺𝑛)) ↔ 𝑥 ≤ (2nd ‘⟨𝐴, 𝐵⟩)))
6360, 62anbi12d 749 . . . . . . 7 (𝑛 = 1 → (((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛))) ↔ ((1st ‘⟨𝐴, 𝐵⟩) ≤ 𝑥𝑥 ≤ (2nd ‘⟨𝐴, 𝐵⟩))))
6463rspcev 3449 . . . . . 6 ((1 ∈ ℕ ∧ ((1st ‘⟨𝐴, 𝐵⟩) ≤ 𝑥𝑥 ≤ (2nd ‘⟨𝐴, 𝐵⟩))) → ∃𝑛 ∈ ℕ ((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛))))
6539, 47, 52, 64syl12anc 1475 . . . . 5 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → ∃𝑛 ∈ ℕ ((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛))))
6665ralrimiva 3104 . . . 4 (𝜑 → ∀𝑥 ∈ (𝐴[,]𝐵)∃𝑛 ∈ ℕ ((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛))))
67 ovolficc 23437 . . . . 5 (((𝐴[,]𝐵) ⊆ ℝ ∧ 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ))) → ((𝐴[,]𝐵) ⊆ ran ([,] ∘ 𝐺) ↔ ∀𝑥 ∈ (𝐴[,]𝐵)∃𝑛 ∈ ℕ ((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛)))))
684, 25, 67syl2anc 696 . . . 4 (𝜑 → ((𝐴[,]𝐵) ⊆ ran ([,] ∘ 𝐺) ↔ ∀𝑥 ∈ (𝐴[,]𝐵)∃𝑛 ∈ ℕ ((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛)))))
6966, 68mpbird 247 . . 3 (𝜑 → (𝐴[,]𝐵) ⊆ ran ([,] ∘ 𝐺))
7027ovollb2 23457 . . 3 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ (𝐴[,]𝐵) ⊆ ran ([,] ∘ 𝐺)) → (vol*‘(𝐴[,]𝐵)) ≤ sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ))
7125, 69, 70syl2anc 696 . 2 (𝜑 → (vol*‘(𝐴[,]𝐵)) ≤ sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ))
72 addid1 10408 . . . . . . . . 9 (𝑘 ∈ ℂ → (𝑘 + 0) = 𝑘)
7372adantl 473 . . . . . . . 8 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ℂ) → (𝑘 + 0) = 𝑘)
74 nnuz 11916 . . . . . . . . . 10 ℕ = (ℤ‘1)
7538, 74eleqtri 2837 . . . . . . . . 9 1 ∈ (ℤ‘1)
7675a1i 11 . . . . . . . 8 ((𝜑𝑥 ∈ ℕ) → 1 ∈ (ℤ‘1))
77 simpr 479 . . . . . . . . 9 ((𝜑𝑥 ∈ ℕ) → 𝑥 ∈ ℕ)
7877, 74syl6eleq 2849 . . . . . . . 8 ((𝜑𝑥 ∈ ℕ) → 𝑥 ∈ (ℤ‘1))
79 rge0ssre 12473 . . . . . . . . . 10 (0[,)+∞) ⊆ ℝ
8029adantr 472 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℕ) → seq1( + , ((abs ∘ − ) ∘ 𝐺)):ℕ⟶(0[,)+∞))
81 ffvelrn 6520 . . . . . . . . . . 11 ((seq1( + , ((abs ∘ − ) ∘ 𝐺)):ℕ⟶(0[,)+∞) ∧ 1 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) ∈ (0[,)+∞))
8280, 38, 81sylancl 697 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) ∈ (0[,)+∞))
8379, 82sseldi 3742 . . . . . . . . 9 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) ∈ ℝ)
8483recnd 10260 . . . . . . . 8 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) ∈ ℂ)
8525ad2antrr 764 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
86 elfzuz 12531 . . . . . . . . . . . . 13 (𝑘 ∈ ((1 + 1)...𝑥) → 𝑘 ∈ (ℤ‘(1 + 1)))
8786adantl 473 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → 𝑘 ∈ (ℤ‘(1 + 1)))
88 df-2 11271 . . . . . . . . . . . . 13 2 = (1 + 1)
8988fveq2i 6355 . . . . . . . . . . . 12 (ℤ‘2) = (ℤ‘(1 + 1))
9087, 89syl6eleqr 2850 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → 𝑘 ∈ (ℤ‘2))
91 eluz2nn 11919 . . . . . . . . . . 11 (𝑘 ∈ (ℤ‘2) → 𝑘 ∈ ℕ)
9290, 91syl 17 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → 𝑘 ∈ ℕ)
9326ovolfsval 23439 . . . . . . . . . 10 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑘 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘𝑘) = ((2nd ‘(𝐺𝑘)) − (1st ‘(𝐺𝑘))))
9485, 92, 93syl2anc 696 . . . . . . . . 9 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (((abs ∘ − ) ∘ 𝐺)‘𝑘) = ((2nd ‘(𝐺𝑘)) − (1st ‘(𝐺𝑘))))
95 eqeq1 2764 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑘 → (𝑛 = 1 ↔ 𝑘 = 1))
9695ifbid 4252 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑘 → if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) = if(𝑘 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩))
97 opex 5081 . . . . . . . . . . . . . . . . 17 ⟨0, 0⟩ ∈ V
9855, 97ifex 4300 . . . . . . . . . . . . . . . 16 if(𝑘 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) ∈ V
9996, 24, 98fvmpt 6444 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ → (𝐺𝑘) = if(𝑘 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩))
10092, 99syl 17 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (𝐺𝑘) = if(𝑘 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩))
101 eluz2b3 11955 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) ↔ (𝑘 ∈ ℕ ∧ 𝑘 ≠ 1))
102101simprbi 483 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (ℤ‘2) → 𝑘 ≠ 1)
10390, 102syl 17 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → 𝑘 ≠ 1)
104103neneqd 2937 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → ¬ 𝑘 = 1)
105104iffalsed 4241 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → if(𝑘 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) = ⟨0, 0⟩)
106100, 105eqtrd 2794 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (𝐺𝑘) = ⟨0, 0⟩)
107106fveq2d 6356 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (2nd ‘(𝐺𝑘)) = (2nd ‘⟨0, 0⟩))
108 c0ex 10226 . . . . . . . . . . . . 13 0 ∈ V
109108, 108op2nd 7342 . . . . . . . . . . . 12 (2nd ‘⟨0, 0⟩) = 0
110107, 109syl6eq 2810 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (2nd ‘(𝐺𝑘)) = 0)
111106fveq2d 6356 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (1st ‘(𝐺𝑘)) = (1st ‘⟨0, 0⟩))
112108, 108op1st 7341 . . . . . . . . . . . 12 (1st ‘⟨0, 0⟩) = 0
113111, 112syl6eq 2810 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (1st ‘(𝐺𝑘)) = 0)
114110, 113oveq12d 6831 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → ((2nd ‘(𝐺𝑘)) − (1st ‘(𝐺𝑘))) = (0 − 0))
115 0m0e0 11322 . . . . . . . . . 10 (0 − 0) = 0
116114, 115syl6eq 2810 . . . . . . . . 9 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → ((2nd ‘(𝐺𝑘)) − (1st ‘(𝐺𝑘))) = 0)
11794, 116eqtrd 2794 . . . . . . . 8 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (((abs ∘ − ) ∘ 𝐺)‘𝑘) = 0)
11873, 76, 78, 84, 117seqid2 13041 . . . . . . 7 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) = (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥))
119 1z 11599 . . . . . . . 8 1 ∈ ℤ
12025adantr 472 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℕ) → 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
12126ovolfsval 23439 . . . . . . . . . 10 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 1 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘1) = ((2nd ‘(𝐺‘1)) − (1st ‘(𝐺‘1))))
122120, 38, 121sylancl 697 . . . . . . . . 9 ((𝜑𝑥 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘1) = ((2nd ‘(𝐺‘1)) − (1st ‘(𝐺‘1))))
12357fveq2i 6355 . . . . . . . . . . 11 (2nd ‘(𝐺‘1)) = (2nd ‘⟨𝐴, 𝐵⟩)
12450adantr 472 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℕ) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
125123, 124syl5eq 2806 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℕ) → (2nd ‘(𝐺‘1)) = 𝐵)
12657fveq2i 6355 . . . . . . . . . . 11 (1st ‘(𝐺‘1)) = (1st ‘⟨𝐴, 𝐵⟩)
12741adantr 472 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℕ) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
128126, 127syl5eq 2806 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℕ) → (1st ‘(𝐺‘1)) = 𝐴)
129125, 128oveq12d 6831 . . . . . . . . 9 ((𝜑𝑥 ∈ ℕ) → ((2nd ‘(𝐺‘1)) − (1st ‘(𝐺‘1))) = (𝐵𝐴))
130122, 129eqtrd 2794 . . . . . . . 8 ((𝜑𝑥 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘1) = (𝐵𝐴))
131119, 130seq1i 13009 . . . . . . 7 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) = (𝐵𝐴))
132118, 131eqtr3d 2796 . . . . . 6 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) = (𝐵𝐴))
13336leidd 10786 . . . . . . 7 (𝜑 → (𝐵𝐴) ≤ (𝐵𝐴))
134133adantr 472 . . . . . 6 ((𝜑𝑥 ∈ ℕ) → (𝐵𝐴) ≤ (𝐵𝐴))
135132, 134eqbrtrd 4826 . . . . 5 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) ≤ (𝐵𝐴))
136135ralrimiva 3104 . . . 4 (𝜑 → ∀𝑥 ∈ ℕ (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) ≤ (𝐵𝐴))
137 ffn 6206 . . . . . 6 (seq1( + , ((abs ∘ − ) ∘ 𝐺)):ℕ⟶(0[,)+∞) → seq1( + , ((abs ∘ − ) ∘ 𝐺)) Fn ℕ)
13829, 137syl 17 . . . . 5 (𝜑 → seq1( + , ((abs ∘ − ) ∘ 𝐺)) Fn ℕ)
139 breq1 4807 . . . . . 6 (𝑧 = (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) → (𝑧 ≤ (𝐵𝐴) ↔ (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) ≤ (𝐵𝐴)))
140139ralrn 6525 . . . . 5 (seq1( + , ((abs ∘ − ) ∘ 𝐺)) Fn ℕ → (∀𝑧 ∈ ran seq1( + , ((abs ∘ − ) ∘ 𝐺))𝑧 ≤ (𝐵𝐴) ↔ ∀𝑥 ∈ ℕ (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) ≤ (𝐵𝐴)))
141138, 140syl 17 . . . 4 (𝜑 → (∀𝑧 ∈ ran seq1( + , ((abs ∘ − ) ∘ 𝐺))𝑧 ≤ (𝐵𝐴) ↔ ∀𝑥 ∈ ℕ (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) ≤ (𝐵𝐴)))
142136, 141mpbird 247 . . 3 (𝜑 → ∀𝑧 ∈ ran seq1( + , ((abs ∘ − ) ∘ 𝐺))𝑧 ≤ (𝐵𝐴))
143 supxrleub 12349 . . . 4 ((ran seq1( + , ((abs ∘ − ) ∘ 𝐺)) ⊆ ℝ* ∧ (𝐵𝐴) ∈ ℝ*) → (sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ) ≤ (𝐵𝐴) ↔ ∀𝑧 ∈ ran seq1( + , ((abs ∘ − ) ∘ 𝐺))𝑧 ≤ (𝐵𝐴)))
14433, 37, 143syl2anc 696 . . 3 (𝜑 → (sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ) ≤ (𝐵𝐴) ↔ ∀𝑧 ∈ ran seq1( + , ((abs ∘ − ) ∘ 𝐺))𝑧 ≤ (𝐵𝐴)))
145142, 144mpbird 247 . 2 (𝜑 → sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ) ≤ (𝐵𝐴))
1466, 35, 37, 71, 145xrletrd 12186 1 (𝜑 → (vol*‘(𝐴[,]𝐵)) ≤ (𝐵𝐴))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 383  w3a 1072   = wceq 1632  wcel 2139  wne 2932  wral 3050  wrex 3051  cin 3714  wss 3715  ifcif 4230  cop 4327   cuni 4588   class class class wbr 4804  cmpt 4881   × cxp 5264  ran crn 5267  ccom 5270   Fn wfn 6044  wf 6045  cfv 6049  (class class class)co 6813  1st c1st 7331  2nd c2nd 7332  supcsup 8511  cc 10126  cr 10127  0cc0 10128  1c1 10129   + caddc 10131  +∞cpnf 10263  *cxr 10265   < clt 10266  cle 10267  cmin 10458  cn 11212  2c2 11262  cuz 11879  [,)cico 12370  [,]cicc 12371  ...cfz 12519  seqcseq 12995  abscabs 14173  vol*covol 23431
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1871  ax-4 1886  ax-5 1988  ax-6 2054  ax-7 2090  ax-8 2141  ax-9 2148  ax-10 2168  ax-11 2183  ax-12 2196  ax-13 2391  ax-ext 2740  ax-rep 4923  ax-sep 4933  ax-nul 4941  ax-pow 4992  ax-pr 5055  ax-un 7114  ax-inf2 8711  ax-cnex 10184  ax-resscn 10185  ax-1cn 10186  ax-icn 10187  ax-addcl 10188  ax-addrcl 10189  ax-mulcl 10190  ax-mulrcl 10191  ax-mulcom 10192  ax-addass 10193  ax-mulass 10194  ax-distr 10195  ax-i2m1 10196  ax-1ne0 10197  ax-1rid 10198  ax-rnegex 10199  ax-rrecex 10200  ax-cnre 10201  ax-pre-lttri 10202  ax-pre-lttrn 10203  ax-pre-ltadd 10204  ax-pre-mulgt0 10205  ax-pre-sup 10206
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3or 1073  df-3an 1074  df-tru 1635  df-fal 1638  df-ex 1854  df-nf 1859  df-sb 2047  df-eu 2611  df-mo 2612  df-clab 2747  df-cleq 2753  df-clel 2756  df-nfc 2891  df-ne 2933  df-nel 3036  df-ral 3055  df-rex 3056  df-reu 3057  df-rmo 3058  df-rab 3059  df-v 3342  df-sbc 3577  df-csb 3675  df-dif 3718  df-un 3720  df-in 3722  df-ss 3729  df-pss 3731  df-nul 4059  df-if 4231  df-pw 4304  df-sn 4322  df-pr 4324  df-tp 4326  df-op 4328  df-uni 4589  df-int 4628  df-iun 4674  df-br 4805  df-opab 4865  df-mpt 4882  df-tr 4905  df-id 5174  df-eprel 5179  df-po 5187  df-so 5188  df-fr 5225  df-se 5226  df-we 5227  df-xp 5272  df-rel 5273  df-cnv 5274  df-co 5275  df-dm 5276  df-rn 5277  df-res 5278  df-ima 5279  df-pred 5841  df-ord 5887  df-on 5888  df-lim 5889  df-suc 5890  df-iota 6012  df-fun 6051  df-fn 6052  df-f 6053  df-f1 6054  df-fo 6055  df-f1o 6056  df-fv 6057  df-isom 6058  df-riota 6774  df-ov 6816  df-oprab 6817  df-mpt2 6818  df-om 7231  df-1st 7333  df-2nd 7334  df-wrecs 7576  df-recs 7637  df-rdg 7675  df-1o 7729  df-oadd 7733  df-er 7911  df-map 8025  df-en 8122  df-dom 8123  df-sdom 8124  df-fin 8125  df-sup 8513  df-inf 8514  df-oi 8580  df-card 8955  df-pnf 10268  df-mnf 10269  df-xr 10270  df-ltxr 10271  df-le 10272  df-sub 10460  df-neg 10461  df-div 10877  df-nn 11213  df-2 11271  df-3 11272  df-n0 11485  df-z 11570  df-uz 11880  df-q 11982  df-rp 12026  df-ioo 12372  df-ico 12374  df-icc 12375  df-fz 12520  df-fzo 12660  df-seq 12996  df-exp 13055  df-hash 13312  df-cj 14038  df-re 14039  df-im 14040  df-sqrt 14174  df-abs 14175  df-clim 14418  df-sum 14616  df-ovol 23433
This theorem is referenced by:  ovolicc  23491
  Copyright terms: Public domain W3C validator