| Mathbox for Glauco Siliprandi |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > MPE Home > Th. List > Mathboxes > voliooico | Structured version Visualization version GIF version | ||
| Description: An open interval and a left-closed, right-open interval with the same real bounds, have the same Lebesgue measure. (Contributed by Glauco Siliprandi, 3-Mar-2021.) |
| Ref | Expression |
|---|---|
| voliooico.1 | ⊢ (𝜑 → 𝐴 ∈ ℝ) |
| voliooico.2 | ⊢ (𝜑 → 𝐵 ∈ ℝ) |
| Ref | Expression |
|---|---|
| voliooico | ⊢ (𝜑 → (vol‘(𝐴(,)𝐵)) = (vol‘(𝐴[,)𝐵))) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | iftrue 4488 | . . . . . 6 ⊢ (𝐴 < 𝐵 → if(𝐴 < 𝐵, (𝐵 − 𝐴), 0) = (𝐵 − 𝐴)) | |
| 2 | 1 | adantl 487 | . . . . 5 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐴 < 𝐵) → if(𝐴 < 𝐵, (𝐵 − 𝐴), 0) = (𝐵 − 𝐴)) |
| 3 | voliooico.2 | . . . . . . . . . 10 ⊢ (𝜑 → 𝐵 ∈ ℝ) | |
| 4 | 3 | recnd 11262 | . . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ ℂ) |
| 5 | 4 | subidd 11582 | . . . . . . . 8 ⊢ (𝜑 → (𝐵 − 𝐵) = 0) |
| 6 | 5 | eqcomd 2766 | . . . . . . 7 ⊢ (𝜑 → 0 = (𝐵 − 𝐵)) |
| 7 | 6 | ad2antrr 739 | . . . . . 6 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → 0 = (𝐵 − 𝐵)) |
| 8 | iffalse 4491 | . . . . . . 7 ⊢ (¬ 𝐴 < 𝐵 → if(𝐴 < 𝐵, (𝐵 − 𝐴), 0) = 0) | |
| 9 | 8 | adantl 487 | . . . . . 6 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → if(𝐴 < 𝐵, (𝐵 − 𝐴), 0) = 0) |
| 10 | simpll 779 | . . . . . . 7 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → 𝜑) | |
| 11 | voliooico.1 | . . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℝ) | |
| 12 | 10, 11 | syl 18 | . . . . . . . 8 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → 𝐴 ∈ ℝ) |
| 13 | 10, 3 | syl 18 | . . . . . . . 8 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → 𝐵 ∈ ℝ) |
| 14 | simpr 490 | . . . . . . . . 9 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → 𝐴 ≤ 𝐵) | |
| 15 | 14 | adantr 486 | . . . . . . . 8 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → 𝐴 ≤ 𝐵) |
| 16 | simpr 490 | . . . . . . . 8 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → ¬ 𝐴 < 𝐵) | |
| 17 | 12, 13, 15, 16 | lenlteq 46194 | . . . . . . 7 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → 𝐴 = 𝐵) |
| 18 | oveq2 7422 | . . . . . . . 8 ⊢ (𝐴 = 𝐵 → (𝐵 − 𝐴) = (𝐵 − 𝐵)) | |
| 19 | 18 | adantl 487 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝐴 = 𝐵) → (𝐵 − 𝐴) = (𝐵 − 𝐵)) |
| 20 | 10, 17, 19 | syl2anc 596 | . . . . . 6 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → (𝐵 − 𝐴) = (𝐵 − 𝐵)) |
| 21 | 7, 9, 20 | 3eqtr4d 2805 | . . . . 5 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → if(𝐴 < 𝐵, (𝐵 − 𝐴), 0) = (𝐵 − 𝐴)) |
| 22 | 2, 21 | pm2.61dan 825 | . . . 4 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → if(𝐴 < 𝐵, (𝐵 − 𝐴), 0) = (𝐵 − 𝐴)) |
| 23 | 22 | eqcomd 2766 | . . 3 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → (𝐵 − 𝐴) = if(𝐴 < 𝐵, (𝐵 − 𝐴), 0)) |
| 24 | 11 | adantr 486 | . . . 4 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → 𝐴 ∈ ℝ) |
| 25 | 3 | adantr 486 | . . . 4 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → 𝐵 ∈ ℝ) |
| 26 | volioo 25798 | . . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴)) | |
| 27 | 24, 25, 14, 26 | syl3anc 1398 | . . 3 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴)) |
| 28 | volico 46812 | . . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (vol‘(𝐴[,)𝐵)) = if(𝐴 < 𝐵, (𝐵 − 𝐴), 0)) | |
| 29 | 11, 3, 28 | syl2anc 596 | . . . 4 ⊢ (𝜑 → (vol‘(𝐴[,)𝐵)) = if(𝐴 < 𝐵, (𝐵 − 𝐴), 0)) |
| 30 | 29 | adantr 486 | . . 3 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → (vol‘(𝐴[,)𝐵)) = if(𝐴 < 𝐵, (𝐵 − 𝐴), 0)) |
| 31 | 23, 27, 30 | 3eqtr4d 2805 | . 2 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → (vol‘(𝐴(,)𝐵)) = (vol‘(𝐴[,)𝐵))) |
| 32 | simpl 488 | . . 3 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐵) → 𝜑) | |
| 33 | simpr 490 | . . . 4 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐵) → ¬ 𝐴 ≤ 𝐵) | |
| 34 | 32, 3 | syl 18 | . . . . 5 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐵) → 𝐵 ∈ ℝ) |
| 35 | 32, 11 | syl 18 | . . . . 5 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐵) → 𝐴 ∈ ℝ) |
| 36 | 34, 35 | ltnled 11382 | . . . 4 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐵) → (𝐵 < 𝐴 ↔ ¬ 𝐴 ≤ 𝐵)) |
| 37 | 33, 36 | mpbird 260 | . . 3 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐵) → 𝐵 < 𝐴) |
| 38 | 3 | adantr 486 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → 𝐵 ∈ ℝ) |
| 39 | 11 | adantr 486 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → 𝐴 ∈ ℝ) |
| 40 | simpr 490 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → 𝐵 < 𝐴) | |
| 41 | 38, 39, 40 | ltled 11383 | . . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → 𝐵 ≤ 𝐴) |
| 42 | 39 | rexrd 11284 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → 𝐴 ∈ ℝ*) |
| 43 | 38 | rexrd 11284 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → 𝐵 ∈ ℝ*) |
| 44 | ioo0 13424 | . . . . . . 7 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐴(,)𝐵) = ∅ ↔ 𝐵 ≤ 𝐴)) | |
| 45 | 42, 43, 44 | syl2anc 596 | . . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → ((𝐴(,)𝐵) = ∅ ↔ 𝐵 ≤ 𝐴)) |
| 46 | 41, 45 | mpbird 260 | . . . . 5 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → (𝐴(,)𝐵) = ∅) |
| 47 | ico0 13445 | . . . . . . 7 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐴[,)𝐵) = ∅ ↔ 𝐵 ≤ 𝐴)) | |
| 48 | 42, 43, 47 | syl2anc 596 | . . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → ((𝐴[,)𝐵) = ∅ ↔ 𝐵 ≤ 𝐴)) |
| 49 | 41, 48 | mpbird 260 | . . . . 5 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → (𝐴[,)𝐵) = ∅) |
| 50 | 46, 49 | eqtr4d 2798 | . . . 4 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → (𝐴(,)𝐵) = (𝐴[,)𝐵)) |
| 51 | 50 | fveq2d 6883 | . . 3 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → (vol‘(𝐴(,)𝐵)) = (vol‘(𝐴[,)𝐵))) |
| 52 | 32, 37, 51 | syl2anc 596 | . 2 ⊢ ((𝜑 ∧ ¬ 𝐴 ≤ 𝐵) → (vol‘(𝐴(,)𝐵)) = (vol‘(𝐴[,)𝐵))) |
| 53 | 31, 52 | pm2.61dan 825 | 1 ⊢ (𝜑 → (vol‘(𝐴(,)𝐵)) = (vol‘(𝐴[,)𝐵))) |
| Colors of variables: wff setvar class |
| This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 = wceq 1570 ∈ wcel 2145 ∅c0 4279 ifcif 4482 class class class wbr 5103 ‘cfv 6533 (class class class)co 7414 ℝcr 11124 0cc0 11125 ℝ*cxr 11267 < clt 11268 ≤ cle 11269 − cmin 11466 (,)cioo 13399 [,)cico 13401 volcvol 25692 |
| This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2732 ax-rep 5232 ax-sep 5251 ax-nul 5263 ax-pow 5330 ax-pr 5398 ax-un 7737 ax-inf2 9621 ax-cnex 11181 ax-resscn 11182 ax-1cn 11183 ax-icn 11184 ax-addcl 11185 ax-addrcl 11186 ax-mulcl 11187 ax-mulrcl 11188 ax-mulcom 11189 ax-addass 11190 ax-mulass 11191 ax-distr 11192 ax-i2m1 11193 ax-1ne0 11194 ax-1rid 11195 ax-rnegex 11196 ax-rrecex 11197 ax-cnre 11198 ax-pre-lttri 11199 ax-pre-lttrn 11200 ax-pre-ltadd 11201 ax-pre-mulgt0 11202 ax-pre-sup 11203 |
| This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5550 df-eprel 5555 df-po 5563 df-so 5564 df-fr 5608 df-se 5609 df-we 5610 df-xp 5661 df-rel 5662 df-cnv 5663 df-co 5664 df-dm 5665 df-rn 5666 df-res 5667 df-ima 5668 df-pred 6299 df-ord 6360 df-on 6361 df-lim 6362 df-suc 6363 df-iota 6489 df-fun 6535 df-fn 6536 df-f 6537 df-f1 6538 df-fo 6539 df-f1o 6540 df-fv 6541 df-isom 6542 df-riota 7371 df-ov 7417 df-oprab 7418 df-mpo 7419 df-of 7679 df-om 7864 df-1st 7987 df-2nd 7988 df-frecs 8281 df-wrecs 8312 df-recs 8361 df-rdg 8400 df-1o 8456 df-2o 8457 df-er 8697 df-map 8829 df-pm 8830 df-en 8954 df-dom 8955 df-sdom 8956 df-fin 8957 df-fi 9382 df-sup 9413 df-inf 9414 df-oi 9483 df-dju 9907 df-card 9945 df-pnf 11270 df-mnf 11271 df-xr 11272 df-ltxr 11273 df-le 11274 df-sub 11468 df-neg 11469 df-div 11897 df-nn 12259 df-2 12328 df-3 12329 df-n0 12530 df-z 12617 df-uz 12889 df-q 12999 df-rp 13044 df-xneg 13164 df-xadd 13165 df-xmul 13166 df-ioo 13403 df-ico 13405 df-icc 13406 df-fz 13563 df-fzo 13711 df-fl 13854 df-seq 14067 df-exp 14127 df-hash 14396 df-cj 15187 df-re 15188 df-im 15189 df-sqrt 15323 df-abs 15324 df-clim 15576 df-rlim 15577 df-sum 15775 df-rest 17508 df-topgen 17529 df-psmet 21578 df-xmet 21579 df-met 21580 df-bl 21581 df-mopn 21582 df-top 23120 df-topon 23137 df-bases 23172 df-cmp 23613 df-ovol 25693 df-vol 25694 |
| This theorem is used by: voliooicof 46825 vonn0ioo2 47519 |
| Copyright terms: Public domain | W3C validator |