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

Theorem ovolicc1 23810
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 12627 . . . 4 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴[,]𝐵) ⊆ ℝ)
41, 2, 3syl2anc 576 . . 3 (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
5 ovolcl 23772 . . 3 ((𝐴[,]𝐵) ⊆ ℝ → (vol*‘(𝐴[,]𝐵)) ∈ ℝ*)
64, 5syl 17 . 2 (𝜑 → (vol*‘(𝐴[,]𝐵)) ∈ ℝ*)
7 ovolicc.3 . . . . . . . . . . 11 (𝜑𝐴𝐵)
8 df-br 4924 . . . . . . . . . . 11 (𝐴𝐵 ↔ ⟨𝐴, 𝐵⟩ ∈ ≤ )
97, 8sylib 210 . . . . . . . . . 10 (𝜑 → ⟨𝐴, 𝐵⟩ ∈ ≤ )
101, 2opelxpd 5438 . . . . . . . . . 10 (𝜑 → ⟨𝐴, 𝐵⟩ ∈ (ℝ × ℝ))
119, 10elind 4055 . . . . . . . . 9 (𝜑 → ⟨𝐴, 𝐵⟩ ∈ ( ≤ ∩ (ℝ × ℝ)))
1211adantr 473 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → ⟨𝐴, 𝐵⟩ ∈ ( ≤ ∩ (ℝ × ℝ)))
13 0le0 11541 . . . . . . . . . 10 0 ≤ 0
14 df-br 4924 . . . . . . . . . 10 (0 ≤ 0 ↔ ⟨0, 0⟩ ∈ ≤ )
1513, 14mpbi 222 . . . . . . . . 9 ⟨0, 0⟩ ∈ ≤
16 0re 10433 . . . . . . . . . 10 0 ∈ ℝ
17 opelxpi 5437 . . . . . . . . . 10 ((0 ∈ ℝ ∧ 0 ∈ ℝ) → ⟨0, 0⟩ ∈ (ℝ × ℝ))
1816, 16, 17mp2an 679 . . . . . . . . 9 ⟨0, 0⟩ ∈ (ℝ × ℝ)
1915, 18elini 4054 . . . . . . . 8 ⟨0, 0⟩ ∈ ( ≤ ∩ (ℝ × ℝ))
20 ifcl 4388 . . . . . . . 8 ((⟨𝐴, 𝐵⟩ ∈ ( ≤ ∩ (ℝ × ℝ)) ∧ ⟨0, 0⟩ ∈ ( ≤ ∩ (ℝ × ℝ))) → if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) ∈ ( ≤ ∩ (ℝ × ℝ)))
2112, 19, 20sylancl 577 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) ∈ ( ≤ ∩ (ℝ × ℝ)))
22 ovolicc1.4 . . . . . . 7 𝐺 = (𝑛 ∈ ℕ ↦ if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩))
2321, 22fmptd 6695 . . . . . 6 (𝜑𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
24 eqid 2772 . . . . . . 7 ((abs ∘ − ) ∘ 𝐺) = ((abs ∘ − ) ∘ 𝐺)
25 eqid 2772 . . . . . . 7 seq1( + , ((abs ∘ − ) ∘ 𝐺)) = seq1( + , ((abs ∘ − ) ∘ 𝐺))
2624, 25ovolsf 23766 . . . . . 6 (𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → seq1( + , ((abs ∘ − ) ∘ 𝐺)):ℕ⟶(0[,)+∞))
2723, 26syl 17 . . . . 5 (𝜑 → seq1( + , ((abs ∘ − ) ∘ 𝐺)):ℕ⟶(0[,)+∞))
2827frnd 6345 . . . 4 (𝜑 → ran seq1( + , ((abs ∘ − ) ∘ 𝐺)) ⊆ (0[,)+∞))
29 icossxr 12630 . . . 4 (0[,)+∞) ⊆ ℝ*
3028, 29syl6ss 3866 . . 3 (𝜑 → ran seq1( + , ((abs ∘ − ) ∘ 𝐺)) ⊆ ℝ*)
31 supxrcl 12517 . . 3 (ran seq1( + , ((abs ∘ − ) ∘ 𝐺)) ⊆ ℝ* → sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ) ∈ ℝ*)
3230, 31syl 17 . 2 (𝜑 → sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ) ∈ ℝ*)
332, 1resubcld 10861 . . 3 (𝜑 → (𝐵𝐴) ∈ ℝ)
3433rexrd 10482 . 2 (𝜑 → (𝐵𝐴) ∈ ℝ*)
35 1nn 11444 . . . . . . 7 1 ∈ ℕ
3635a1i 11 . . . . . 6 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 1 ∈ ℕ)
37 op1stg 7506 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
381, 2, 37syl2anc 576 . . . . . . . 8 (𝜑 → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
3938adantr 473 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
40 elicc2 12610 . . . . . . . . . 10 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝑥 ∈ (𝐴[,]𝐵) ↔ (𝑥 ∈ ℝ ∧ 𝐴𝑥𝑥𝐵)))
411, 2, 40syl2anc 576 . . . . . . . . 9 (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↔ (𝑥 ∈ ℝ ∧ 𝐴𝑥𝑥𝐵)))
4241biimpa 469 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (𝑥 ∈ ℝ ∧ 𝐴𝑥𝑥𝐵))
4342simp2d 1123 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝐴𝑥)
4439, 43eqbrtrd 4945 . . . . . 6 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (1st ‘⟨𝐴, 𝐵⟩) ≤ 𝑥)
4542simp3d 1124 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝑥𝐵)
46 op2ndg 7507 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
471, 2, 46syl2anc 576 . . . . . . . 8 (𝜑 → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
4847adantr 473 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
4945, 48breqtrrd 4951 . . . . . 6 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ≤ (2nd ‘⟨𝐴, 𝐵⟩))
50 fveq2 6493 . . . . . . . . . . 11 (𝑛 = 1 → (𝐺𝑛) = (𝐺‘1))
51 iftrue 4350 . . . . . . . . . . . . 13 (𝑛 = 1 → if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) = ⟨𝐴, 𝐵⟩)
52 opex 5206 . . . . . . . . . . . . 13 𝐴, 𝐵⟩ ∈ V
5351, 22, 52fvmpt 6589 . . . . . . . . . . . 12 (1 ∈ ℕ → (𝐺‘1) = ⟨𝐴, 𝐵⟩)
5435, 53ax-mp 5 . . . . . . . . . . 11 (𝐺‘1) = ⟨𝐴, 𝐵
5550, 54syl6eq 2824 . . . . . . . . . 10 (𝑛 = 1 → (𝐺𝑛) = ⟨𝐴, 𝐵⟩)
5655fveq2d 6497 . . . . . . . . 9 (𝑛 = 1 → (1st ‘(𝐺𝑛)) = (1st ‘⟨𝐴, 𝐵⟩))
5756breq1d 4933 . . . . . . . 8 (𝑛 = 1 → ((1st ‘(𝐺𝑛)) ≤ 𝑥 ↔ (1st ‘⟨𝐴, 𝐵⟩) ≤ 𝑥))
5855fveq2d 6497 . . . . . . . . 9 (𝑛 = 1 → (2nd ‘(𝐺𝑛)) = (2nd ‘⟨𝐴, 𝐵⟩))
5958breq2d 4935 . . . . . . . 8 (𝑛 = 1 → (𝑥 ≤ (2nd ‘(𝐺𝑛)) ↔ 𝑥 ≤ (2nd ‘⟨𝐴, 𝐵⟩)))
6057, 59anbi12d 621 . . . . . . 7 (𝑛 = 1 → (((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛))) ↔ ((1st ‘⟨𝐴, 𝐵⟩) ≤ 𝑥𝑥 ≤ (2nd ‘⟨𝐴, 𝐵⟩))))
6160rspcev 3529 . . . . . 6 ((1 ∈ ℕ ∧ ((1st ‘⟨𝐴, 𝐵⟩) ≤ 𝑥𝑥 ≤ (2nd ‘⟨𝐴, 𝐵⟩))) → ∃𝑛 ∈ ℕ ((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛))))
6236, 44, 49, 61syl12anc 824 . . . . 5 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → ∃𝑛 ∈ ℕ ((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛))))
6362ralrimiva 3126 . . . 4 (𝜑 → ∀𝑥 ∈ (𝐴[,]𝐵)∃𝑛 ∈ ℕ ((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛))))
64 ovolficc 23762 . . . . 5 (((𝐴[,]𝐵) ⊆ ℝ ∧ 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ))) → ((𝐴[,]𝐵) ⊆ ran ([,] ∘ 𝐺) ↔ ∀𝑥 ∈ (𝐴[,]𝐵)∃𝑛 ∈ ℕ ((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛)))))
654, 23, 64syl2anc 576 . . . 4 (𝜑 → ((𝐴[,]𝐵) ⊆ ran ([,] ∘ 𝐺) ↔ ∀𝑥 ∈ (𝐴[,]𝐵)∃𝑛 ∈ ℕ ((1st ‘(𝐺𝑛)) ≤ 𝑥𝑥 ≤ (2nd ‘(𝐺𝑛)))))
6663, 65mpbird 249 . . 3 (𝜑 → (𝐴[,]𝐵) ⊆ ran ([,] ∘ 𝐺))
6725ovollb2 23783 . . 3 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ (𝐴[,]𝐵) ⊆ ran ([,] ∘ 𝐺)) → (vol*‘(𝐴[,]𝐵)) ≤ sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ))
6823, 66, 67syl2anc 576 . 2 (𝜑 → (vol*‘(𝐴[,]𝐵)) ≤ sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ))
69 addid1 10612 . . . . . . . . 9 (𝑘 ∈ ℂ → (𝑘 + 0) = 𝑘)
7069adantl 474 . . . . . . . 8 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ℂ) → (𝑘 + 0) = 𝑘)
71 nnuz 12088 . . . . . . . . . 10 ℕ = (ℤ‘1)
7235, 71eleqtri 2858 . . . . . . . . 9 1 ∈ (ℤ‘1)
7372a1i 11 . . . . . . . 8 ((𝜑𝑥 ∈ ℕ) → 1 ∈ (ℤ‘1))
74 simpr 477 . . . . . . . . 9 ((𝜑𝑥 ∈ ℕ) → 𝑥 ∈ ℕ)
7574, 71syl6eleq 2870 . . . . . . . 8 ((𝜑𝑥 ∈ ℕ) → 𝑥 ∈ (ℤ‘1))
76 rge0ssre 12653 . . . . . . . . . 10 (0[,)+∞) ⊆ ℝ
7727adantr 473 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℕ) → seq1( + , ((abs ∘ − ) ∘ 𝐺)):ℕ⟶(0[,)+∞))
78 ffvelrn 6668 . . . . . . . . . . 11 ((seq1( + , ((abs ∘ − ) ∘ 𝐺)):ℕ⟶(0[,)+∞) ∧ 1 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) ∈ (0[,)+∞))
7977, 35, 78sylancl 577 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) ∈ (0[,)+∞))
8076, 79sseldi 3852 . . . . . . . . 9 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) ∈ ℝ)
8180recnd 10460 . . . . . . . 8 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) ∈ ℂ)
8223ad2antrr 713 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
83 elfzuz 12713 . . . . . . . . . . . . 13 (𝑘 ∈ ((1 + 1)...𝑥) → 𝑘 ∈ (ℤ‘(1 + 1)))
8483adantl 474 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → 𝑘 ∈ (ℤ‘(1 + 1)))
85 df-2 11496 . . . . . . . . . . . . 13 2 = (1 + 1)
8685fveq2i 6496 . . . . . . . . . . . 12 (ℤ‘2) = (ℤ‘(1 + 1))
8784, 86syl6eleqr 2871 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → 𝑘 ∈ (ℤ‘2))
88 eluz2nn 12091 . . . . . . . . . . 11 (𝑘 ∈ (ℤ‘2) → 𝑘 ∈ ℕ)
8987, 88syl 17 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → 𝑘 ∈ ℕ)
9024ovolfsval 23764 . . . . . . . . . 10 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑘 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘𝑘) = ((2nd ‘(𝐺𝑘)) − (1st ‘(𝐺𝑘))))
9182, 89, 90syl2anc 576 . . . . . . . . 9 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (((abs ∘ − ) ∘ 𝐺)‘𝑘) = ((2nd ‘(𝐺𝑘)) − (1st ‘(𝐺𝑘))))
92 eqeq1 2776 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑘 → (𝑛 = 1 ↔ 𝑘 = 1))
9392ifbid 4366 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑘 → if(𝑛 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) = if(𝑘 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩))
94 opex 5206 . . . . . . . . . . . . . . . . 17 ⟨0, 0⟩ ∈ V
9552, 94ifex 4392 . . . . . . . . . . . . . . . 16 if(𝑘 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) ∈ V
9693, 22, 95fvmpt 6589 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ → (𝐺𝑘) = if(𝑘 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩))
9789, 96syl 17 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (𝐺𝑘) = if(𝑘 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩))
98 eluz2b3 12129 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) ↔ (𝑘 ∈ ℕ ∧ 𝑘 ≠ 1))
9998simprbi 489 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (ℤ‘2) → 𝑘 ≠ 1)
10087, 99syl 17 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → 𝑘 ≠ 1)
101100neneqd 2966 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → ¬ 𝑘 = 1)
102101iffalsed 4355 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → if(𝑘 = 1, ⟨𝐴, 𝐵⟩, ⟨0, 0⟩) = ⟨0, 0⟩)
10397, 102eqtrd 2808 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (𝐺𝑘) = ⟨0, 0⟩)
104103fveq2d 6497 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (2nd ‘(𝐺𝑘)) = (2nd ‘⟨0, 0⟩))
105 c0ex 10425 . . . . . . . . . . . . 13 0 ∈ V
106105, 105op2nd 7503 . . . . . . . . . . . 12 (2nd ‘⟨0, 0⟩) = 0
107104, 106syl6eq 2824 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (2nd ‘(𝐺𝑘)) = 0)
108103fveq2d 6497 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (1st ‘(𝐺𝑘)) = (1st ‘⟨0, 0⟩))
109105, 105op1st 7502 . . . . . . . . . . . 12 (1st ‘⟨0, 0⟩) = 0
110108, 109syl6eq 2824 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (1st ‘(𝐺𝑘)) = 0)
111107, 110oveq12d 6988 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → ((2nd ‘(𝐺𝑘)) − (1st ‘(𝐺𝑘))) = (0 − 0))
112 0m0e0 11560 . . . . . . . . . 10 (0 − 0) = 0
113111, 112syl6eq 2824 . . . . . . . . 9 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → ((2nd ‘(𝐺𝑘)) − (1st ‘(𝐺𝑘))) = 0)
11491, 113eqtrd 2808 . . . . . . . 8 (((𝜑𝑥 ∈ ℕ) ∧ 𝑘 ∈ ((1 + 1)...𝑥)) → (((abs ∘ − ) ∘ 𝐺)‘𝑘) = 0)
11570, 73, 75, 81, 114seqid2 13224 . . . . . . 7 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) = (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥))
116 1z 11818 . . . . . . . 8 1 ∈ ℤ
11723adantr 473 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℕ) → 𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
11824ovolfsval 23764 . . . . . . . . . 10 ((𝐺:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 1 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘1) = ((2nd ‘(𝐺‘1)) − (1st ‘(𝐺‘1))))
119117, 35, 118sylancl 577 . . . . . . . . 9 ((𝜑𝑥 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘1) = ((2nd ‘(𝐺‘1)) − (1st ‘(𝐺‘1))))
12054fveq2i 6496 . . . . . . . . . . 11 (2nd ‘(𝐺‘1)) = (2nd ‘⟨𝐴, 𝐵⟩)
12147adantr 473 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℕ) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
122120, 121syl5eq 2820 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℕ) → (2nd ‘(𝐺‘1)) = 𝐵)
12354fveq2i 6496 . . . . . . . . . . 11 (1st ‘(𝐺‘1)) = (1st ‘⟨𝐴, 𝐵⟩)
12438adantr 473 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℕ) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
125123, 124syl5eq 2820 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℕ) → (1st ‘(𝐺‘1)) = 𝐴)
126122, 125oveq12d 6988 . . . . . . . . 9 ((𝜑𝑥 ∈ ℕ) → ((2nd ‘(𝐺‘1)) − (1st ‘(𝐺‘1))) = (𝐵𝐴))
127119, 126eqtrd 2808 . . . . . . . 8 ((𝜑𝑥 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐺)‘1) = (𝐵𝐴))
128116, 127seq1i 13191 . . . . . . 7 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘1) = (𝐵𝐴))
129115, 128eqtr3d 2810 . . . . . 6 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) = (𝐵𝐴))
13033leidd 10999 . . . . . . 7 (𝜑 → (𝐵𝐴) ≤ (𝐵𝐴))
131130adantr 473 . . . . . 6 ((𝜑𝑥 ∈ ℕ) → (𝐵𝐴) ≤ (𝐵𝐴))
132129, 131eqbrtrd 4945 . . . . 5 ((𝜑𝑥 ∈ ℕ) → (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) ≤ (𝐵𝐴))
133132ralrimiva 3126 . . . 4 (𝜑 → ∀𝑥 ∈ ℕ (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) ≤ (𝐵𝐴))
13427ffnd 6339 . . . . 5 (𝜑 → seq1( + , ((abs ∘ − ) ∘ 𝐺)) Fn ℕ)
135 breq1 4926 . . . . . 6 (𝑧 = (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) → (𝑧 ≤ (𝐵𝐴) ↔ (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) ≤ (𝐵𝐴)))
136135ralrn 6673 . . . . 5 (seq1( + , ((abs ∘ − ) ∘ 𝐺)) Fn ℕ → (∀𝑧 ∈ ran seq1( + , ((abs ∘ − ) ∘ 𝐺))𝑧 ≤ (𝐵𝐴) ↔ ∀𝑥 ∈ ℕ (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) ≤ (𝐵𝐴)))
137134, 136syl 17 . . . 4 (𝜑 → (∀𝑧 ∈ ran seq1( + , ((abs ∘ − ) ∘ 𝐺))𝑧 ≤ (𝐵𝐴) ↔ ∀𝑥 ∈ ℕ (seq1( + , ((abs ∘ − ) ∘ 𝐺))‘𝑥) ≤ (𝐵𝐴)))
138133, 137mpbird 249 . . 3 (𝜑 → ∀𝑧 ∈ ran seq1( + , ((abs ∘ − ) ∘ 𝐺))𝑧 ≤ (𝐵𝐴))
139 supxrleub 12528 . . . 4 ((ran seq1( + , ((abs ∘ − ) ∘ 𝐺)) ⊆ ℝ* ∧ (𝐵𝐴) ∈ ℝ*) → (sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ) ≤ (𝐵𝐴) ↔ ∀𝑧 ∈ ran seq1( + , ((abs ∘ − ) ∘ 𝐺))𝑧 ≤ (𝐵𝐴)))
14030, 34, 139syl2anc 576 . . 3 (𝜑 → (sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ) ≤ (𝐵𝐴) ↔ ∀𝑧 ∈ ran seq1( + , ((abs ∘ − ) ∘ 𝐺))𝑧 ≤ (𝐵𝐴)))
141138, 140mpbird 249 . 2 (𝜑 → sup(ran seq1( + , ((abs ∘ − ) ∘ 𝐺)), ℝ*, < ) ≤ (𝐵𝐴))
1426, 32, 34, 68, 141xrletrd 12365 1 (𝜑 → (vol*‘(𝐴[,]𝐵)) ≤ (𝐵𝐴))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 198  wa 387  w3a 1068   = wceq 1507  wcel 2048  wne 2961  wral 3082  wrex 3083  cin 3824  wss 3825  ifcif 4344  cop 4441   cuni 4706   class class class wbr 4923  cmpt 5002   × cxp 5398  ran crn 5401  ccom 5404   Fn wfn 6177  wf 6178  cfv 6182  (class class class)co 6970  1st c1st 7492  2nd c2nd 7493  supcsup 8691  cc 10325  cr 10326  0cc0 10327  1c1 10328   + caddc 10330  +∞cpnf 10463  *cxr 10465   < clt 10466  cle 10467  cmin 10662  cn 11431  2c2 11488  cuz 12051  [,)cico 12549  [,]cicc 12550  ...cfz 12701  seqcseq 13177  abscabs 14444  vol*covol 23756
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1964  ax-8 2050  ax-9 2057  ax-10 2077  ax-11 2091  ax-12 2104  ax-13 2299  ax-ext 2745  ax-rep 5043  ax-sep 5054  ax-nul 5061  ax-pow 5113  ax-pr 5180  ax-un 7273  ax-inf2 8890  ax-cnex 10383  ax-resscn 10384  ax-1cn 10385  ax-icn 10386  ax-addcl 10387  ax-addrcl 10388  ax-mulcl 10389  ax-mulrcl 10390  ax-mulcom 10391  ax-addass 10392  ax-mulass 10393  ax-distr 10394  ax-i2m1 10395  ax-1ne0 10396  ax-1rid 10397  ax-rnegex 10398  ax-rrecex 10399  ax-cnre 10400  ax-pre-lttri 10401  ax-pre-lttrn 10402  ax-pre-ltadd 10403  ax-pre-mulgt0 10404  ax-pre-sup 10405
This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3or 1069  df-3an 1070  df-tru 1510  df-fal 1520  df-ex 1743  df-nf 1747  df-sb 2014  df-mo 2544  df-eu 2580  df-clab 2754  df-cleq 2765  df-clel 2840  df-nfc 2912  df-ne 2962  df-nel 3068  df-ral 3087  df-rex 3088  df-reu 3089  df-rmo 3090  df-rab 3091  df-v 3411  df-sbc 3678  df-csb 3783  df-dif 3828  df-un 3830  df-in 3832  df-ss 3839  df-pss 3841  df-nul 4174  df-if 4345  df-pw 4418  df-sn 4436  df-pr 4438  df-tp 4440  df-op 4442  df-uni 4707  df-int 4744  df-iun 4788  df-br 4924  df-opab 4986  df-mpt 5003  df-tr 5025  df-id 5305  df-eprel 5310  df-po 5319  df-so 5320  df-fr 5359  df-se 5360  df-we 5361  df-xp 5406  df-rel 5407  df-cnv 5408  df-co 5409  df-dm 5410  df-rn 5411  df-res 5412  df-ima 5413  df-pred 5980  df-ord 6026  df-on 6027  df-lim 6028  df-suc 6029  df-iota 6146  df-fun 6184  df-fn 6185  df-f 6186  df-f1 6187  df-fo 6188  df-f1o 6189  df-fv 6190  df-isom 6191  df-riota 6931  df-ov 6973  df-oprab 6974  df-mpo 6975  df-om 7391  df-1st 7494  df-2nd 7495  df-wrecs 7743  df-recs 7805  df-rdg 7843  df-1o 7897  df-oadd 7901  df-er 8081  df-map 8200  df-en 8299  df-dom 8300  df-sdom 8301  df-fin 8302  df-sup 8693  df-inf 8694  df-oi 8761  df-card 9154  df-pnf 10468  df-mnf 10469  df-xr 10470  df-ltxr 10471  df-le 10472  df-sub 10664  df-neg 10665  df-div 11091  df-nn 11432  df-2 11496  df-3 11497  df-n0 11701  df-z 11787  df-uz 12052  df-q 12156  df-rp 12198  df-ioo 12551  df-ico 12553  df-icc 12554  df-fz 12702  df-fzo 12843  df-seq 13178  df-exp 13238  df-hash 13499  df-cj 14309  df-re 14310  df-im 14311  df-sqrt 14445  df-abs 14446  df-clim 14696  df-sum 14894  df-ovol 23758
This theorem is referenced by:  ovolicc  23817
  Copyright terms: Public domain W3C validator