| 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 4491 | . . . . . 6 ⊢ (𝐴 < 𝐵 → if(𝐴 < 𝐵, (𝐵 − 𝐴), 0) = (𝐵 − 𝐴)) | |
| 2 | 1 | adantl 487 | . . . . 5 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ 𝐴 < 𝐵) → if(𝐴 < 𝐵, (𝐵 − 𝐴), 0) = (𝐵 − 𝐴)) |
| 3 | voliooico.2 | . . . . . . . . . 10 ⊢ (𝜑 → 𝐵 ∈ ℝ) | |
| 4 | 3 | recnd 11376 | . . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ ℂ) |
| 5 | 4 | subidd 11696 | . . . . . . . 8 ⊢ (𝜑 → (𝐵 − 𝐵) = 0) |
| 6 | 5 | eqcomd 2769 | . . . . . . 7 ⊢ (𝜑 → 0 = (𝐵 − 𝐵)) |
| 7 | 6 | ad2antrr 739 | . . . . . 6 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → 0 = (𝐵 − 𝐵)) |
| 8 | iffalse 4494 | . . . . . . 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 46648 | . . . . . . 7 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → 𝐴 = 𝐵) |
| 18 | oveq2 7459 | . . . . . . . 8 ⊢ (𝐴 = 𝐵 → (𝐵 − 𝐴) = (𝐵 − 𝐵)) | |
| 19 | 18 | adantl 487 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝐴 = 𝐵) → (𝐵 − 𝐴) = (𝐵 − 𝐵)) |
| 20 | 10, 17, 19 | syl2anc 596 | . . . . . 6 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → (𝐵 − 𝐴) = (𝐵 − 𝐵)) |
| 21 | 7, 9, 20 | 3eqtr4d 2808 | . . . . 5 ⊢ (((𝜑 ∧ 𝐴 ≤ 𝐵) ∧ ¬ 𝐴 < 𝐵) → if(𝐴 < 𝐵, (𝐵 − 𝐴), 0) = (𝐵 − 𝐴)) |
| 22 | 2, 21 | pm2.61dan 825 | . . . 4 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → if(𝐴 < 𝐵, (𝐵 − 𝐴), 0) = (𝐵 − 𝐴)) |
| 23 | 22 | eqcomd 2769 | . . 3 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → (𝐵 − 𝐴) = if(𝐴 < 𝐵, (𝐵 − 𝐴), 0)) |
| 24 | 11 | adantr 486 | . . . 4 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → 𝐴 ∈ ℝ) |
| 25 | 3 | adantr 486 | . . . 4 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → 𝐵 ∈ ℝ) |
| 26 | volioo 25945 | . . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴)) | |
| 27 | 24, 25, 14, 26 | syl3anc 1399 | . . 3 ⊢ ((𝜑 ∧ 𝐴 ≤ 𝐵) → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴)) |
| 28 | volico 47266 | . . . . 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 2808 | . 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 11496 | . . . 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 11497 | . . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → 𝐵 ≤ 𝐴) |
| 42 | 39 | rexrd 11398 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → 𝐴 ∈ ℝ*) |
| 43 | 38 | rexrd 11398 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → 𝐵 ∈ ℝ*) |
| 44 | ioo0 13541 | . . . . . . 7 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐴(,)𝐵) = ∅ ↔ 𝐵 ≤ 𝐴)) | |
| 45 | 42, 43, 44 | syl2anc 596 | . . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → ((𝐴(,)𝐵) = ∅ ↔ 𝐵 ≤ 𝐴)) |
| 46 | 41, 45 | mpbird 260 | . . . . 5 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → (𝐴(,)𝐵) = ∅) |
| 47 | ico0 13562 | . . . . . . 7 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐴[,)𝐵) = ∅ ↔ 𝐵 ≤ 𝐴)) | |
| 48 | 42, 43, 47 | syl2anc 596 | . . . . . 6 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → ((𝐴[,)𝐵) = ∅ ↔ 𝐵 ≤ 𝐴)) |
| 49 | 41, 48 | mpbird 260 | . . . . 5 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → (𝐴[,)𝐵) = ∅) |
| 50 | 46, 49 | eqtr4d 2801 | . . . 4 ⊢ ((𝜑 ∧ 𝐵 < 𝐴) → (𝐴(,)𝐵) = (𝐴[,)𝐵)) |
| 51 | 50 | fveq2d 6920 | . . 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 2147 ∅c0 4281 ifcif 4485 class class class wbr 5108 ‘cfv 6566 (class class class)co 7451 ℝcr 11238 0cc0 11239 ℝ*cxr 11381 < clt 11382 ≤ cle 11383 − cmin 11580 (,)cioo 13516 [,)cico 13518 volcvol 25839 |
| 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 1945 ax-6 2002 ax-7 2043 ax-8 2149 ax-9 2157 ax-10 2180 ax-11 2197 ax-12 2216 ax-ext 2735 ax-rep 5238 ax-sep 5255 ax-nul 5266 ax-pow 5334 ax-pr 5398 ax-un 7783 ax-inf2 9679 ax-cnex 11295 ax-resscn 11296 ax-1cn 11297 ax-icn 11298 ax-addcl 11299 ax-addrcl 11300 ax-mulcl 11301 ax-mulrcl 11302 ax-mulcom 11303 ax-addass 11304 ax-mulass 11305 ax-distr 11306 ax-i2m1 11307 ax-1ne0 11308 ax-1rid 11309 ax-rnegex 11310 ax-rrecex 11311 ax-cnre 11312 ax-pre-lttri 11313 ax-pre-lttrn 11314 ax-pre-ltadd 11315 ax-pre-mulgt0 11316 ax-pre-sup 11317 |
| 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 2102 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-nel 3066 df-ral 3081 df-rex 3091 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3456 df-sbc 3743 df-csb 3852 df-ss 3901 df-pss 4017 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-pw 4562 df-sn 4589 df-pr 4591 df-op 4841 df-uni 4873 df-int 4913 df-iun 4958 df-br 5109 df-opab 5174 df-mpt 5193 df-tr 5219 df-id 5553 df-eprel 5558 df-po 5566 df-so 5567 df-fr 5611 df-se 5612 df-we 5613 df-xp 5664 df-rel 5665 df-cnv 5666 df-co 5667 df-dm 5668 df-rn 5669 df-res 5670 df-ima 5671 df-pred 6330 df-ord 6391 df-on 6392 df-lim 6393 df-suc 6394 df-iota 6520 df-fun 6568 df-fn 6569 df-f 6570 df-f1 6571 df-fo 6572 df-f1o 6573 df-fv 6574 df-isom 6575 df-riota 7408 df-ov 7454 df-oprab 7455 df-mpo 7456 df-of 7725 df-om 7912 df-1st 8035 df-2nd 8036 df-frecs 8337 df-wrecs 8368 df-recs 8417 df-rdg 8456 df-1o 8514 df-2o 8515 df-er 8755 df-map 8887 df-pm 8888 df-en 9012 df-dom 9013 df-sdom 9014 df-fin 9015 df-fi 9440 df-sup 9471 df-inf 9472 df-oi 9541 df-dju 10019 df-card 10057 df-pnf 11384 df-mnf 11385 df-xr 11386 df-ltxr 11387 df-le 11388 df-sub 11582 df-neg 11583 df-div 12014 df-nn 12376 df-2 12445 df-3 12446 df-n0 12647 df-z 12734 df-uz 13006 df-q 13116 df-rp 13161 df-xneg 13281 df-xadd 13282 df-xmul 13283 df-ioo 13520 df-ico 13522 df-icc 13523 df-fz 13680 df-fzo 13829 df-fl 13972 df-seq 14185 df-exp 14245 df-hash 14516 df-cj 15309 df-re 15310 df-im 15311 df-sqrt 15445 df-abs 15446 df-clim 15699 df-rlim 15700 df-sum 15898 df-rest 17643 df-topgen 17664 df-psmet 21721 df-xmet 21722 df-met 21723 df-bl 21724 df-mopn 21725 df-top 23267 df-topon 23284 df-bases 23319 df-cmp 23760 df-ovol 25840 df-vol 25841 |
| This theorem is used by: voliooicof 47279 vonn0ioo2 47973 |
| Copyright terms: Public domain | W3C validator |