Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > iccid | Structured version Visualization version GIF version |
Description: A closed interval with identical lower and upper bounds is a singleton. (Contributed by Jeff Hankins, 13-Jul-2009.) |
Ref | Expression |
---|---|
iccid | ⊢ (𝐴 ∈ ℝ* → (𝐴[,]𝐴) = {𝐴}) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | elicc1 12785 | . . . 4 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐴 ∈ ℝ*) → (𝑥 ∈ (𝐴[,]𝐴) ↔ (𝑥 ∈ ℝ* ∧ 𝐴 ≤ 𝑥 ∧ 𝑥 ≤ 𝐴))) | |
2 | 1 | anidms 569 | . . 3 ⊢ (𝐴 ∈ ℝ* → (𝑥 ∈ (𝐴[,]𝐴) ↔ (𝑥 ∈ ℝ* ∧ 𝐴 ≤ 𝑥 ∧ 𝑥 ≤ 𝐴))) |
3 | xrlenlt 10708 | . . . . . . . 8 ⊢ ((𝐴 ∈ ℝ* ∧ 𝑥 ∈ ℝ*) → (𝐴 ≤ 𝑥 ↔ ¬ 𝑥 < 𝐴)) | |
4 | xrlenlt 10708 | . . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℝ* ∧ 𝐴 ∈ ℝ*) → (𝑥 ≤ 𝐴 ↔ ¬ 𝐴 < 𝑥)) | |
5 | 4 | ancoms 461 | . . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ* ∧ 𝑥 ∈ ℝ*) → (𝑥 ≤ 𝐴 ↔ ¬ 𝐴 < 𝑥)) |
6 | xrlttri3 12539 | . . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℝ* ∧ 𝐴 ∈ ℝ*) → (𝑥 = 𝐴 ↔ (¬ 𝑥 < 𝐴 ∧ ¬ 𝐴 < 𝑥))) | |
7 | 6 | biimprd 250 | . . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℝ* ∧ 𝐴 ∈ ℝ*) → ((¬ 𝑥 < 𝐴 ∧ ¬ 𝐴 < 𝑥) → 𝑥 = 𝐴)) |
8 | 7 | ancoms 461 | . . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℝ* ∧ 𝑥 ∈ ℝ*) → ((¬ 𝑥 < 𝐴 ∧ ¬ 𝐴 < 𝑥) → 𝑥 = 𝐴)) |
9 | 8 | expcomd 419 | . . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ* ∧ 𝑥 ∈ ℝ*) → (¬ 𝐴 < 𝑥 → (¬ 𝑥 < 𝐴 → 𝑥 = 𝐴))) |
10 | 5, 9 | sylbid 242 | . . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ* ∧ 𝑥 ∈ ℝ*) → (𝑥 ≤ 𝐴 → (¬ 𝑥 < 𝐴 → 𝑥 = 𝐴))) |
11 | 10 | com23 86 | . . . . . . . 8 ⊢ ((𝐴 ∈ ℝ* ∧ 𝑥 ∈ ℝ*) → (¬ 𝑥 < 𝐴 → (𝑥 ≤ 𝐴 → 𝑥 = 𝐴))) |
12 | 3, 11 | sylbid 242 | . . . . . . 7 ⊢ ((𝐴 ∈ ℝ* ∧ 𝑥 ∈ ℝ*) → (𝐴 ≤ 𝑥 → (𝑥 ≤ 𝐴 → 𝑥 = 𝐴))) |
13 | 12 | ex 415 | . . . . . 6 ⊢ (𝐴 ∈ ℝ* → (𝑥 ∈ ℝ* → (𝐴 ≤ 𝑥 → (𝑥 ≤ 𝐴 → 𝑥 = 𝐴)))) |
14 | 13 | 3impd 1344 | . . . . 5 ⊢ (𝐴 ∈ ℝ* → ((𝑥 ∈ ℝ* ∧ 𝐴 ≤ 𝑥 ∧ 𝑥 ≤ 𝐴) → 𝑥 = 𝐴)) |
15 | eleq1a 2910 | . . . . . 6 ⊢ (𝐴 ∈ ℝ* → (𝑥 = 𝐴 → 𝑥 ∈ ℝ*)) | |
16 | xrleid 12547 | . . . . . . 7 ⊢ (𝐴 ∈ ℝ* → 𝐴 ≤ 𝐴) | |
17 | breq2 5072 | . . . . . . 7 ⊢ (𝑥 = 𝐴 → (𝐴 ≤ 𝑥 ↔ 𝐴 ≤ 𝐴)) | |
18 | 16, 17 | syl5ibrcom 249 | . . . . . 6 ⊢ (𝐴 ∈ ℝ* → (𝑥 = 𝐴 → 𝐴 ≤ 𝑥)) |
19 | breq1 5071 | . . . . . . 7 ⊢ (𝑥 = 𝐴 → (𝑥 ≤ 𝐴 ↔ 𝐴 ≤ 𝐴)) | |
20 | 16, 19 | syl5ibrcom 249 | . . . . . 6 ⊢ (𝐴 ∈ ℝ* → (𝑥 = 𝐴 → 𝑥 ≤ 𝐴)) |
21 | 15, 18, 20 | 3jcad 1125 | . . . . 5 ⊢ (𝐴 ∈ ℝ* → (𝑥 = 𝐴 → (𝑥 ∈ ℝ* ∧ 𝐴 ≤ 𝑥 ∧ 𝑥 ≤ 𝐴))) |
22 | 14, 21 | impbid 214 | . . . 4 ⊢ (𝐴 ∈ ℝ* → ((𝑥 ∈ ℝ* ∧ 𝐴 ≤ 𝑥 ∧ 𝑥 ≤ 𝐴) ↔ 𝑥 = 𝐴)) |
23 | velsn 4585 | . . . 4 ⊢ (𝑥 ∈ {𝐴} ↔ 𝑥 = 𝐴) | |
24 | 22, 23 | syl6bbr 291 | . . 3 ⊢ (𝐴 ∈ ℝ* → ((𝑥 ∈ ℝ* ∧ 𝐴 ≤ 𝑥 ∧ 𝑥 ≤ 𝐴) ↔ 𝑥 ∈ {𝐴})) |
25 | 2, 24 | bitrd 281 | . 2 ⊢ (𝐴 ∈ ℝ* → (𝑥 ∈ (𝐴[,]𝐴) ↔ 𝑥 ∈ {𝐴})) |
26 | 25 | eqrdv 2821 | 1 ⊢ (𝐴 ∈ ℝ* → (𝐴[,]𝐴) = {𝐴}) |
Colors of variables: wff setvar class |
Syntax hints: ¬ wn 3 → wi 4 ↔ wb 208 ∧ wa 398 ∧ w3a 1083 = wceq 1537 ∈ wcel 2114 {csn 4569 class class class wbr 5068 (class class class)co 7158 ℝ*cxr 10676 < clt 10677 ≤ cle 10678 [,]cicc 12744 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2795 ax-sep 5205 ax-nul 5212 ax-pow 5268 ax-pr 5332 ax-un 7463 ax-cnex 10595 ax-resscn 10596 ax-pre-lttri 10613 ax-pre-lttrn 10614 |
This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1540 df-ex 1781 df-nf 1785 df-sb 2070 df-mo 2622 df-eu 2654 df-clab 2802 df-cleq 2816 df-clel 2895 df-nfc 2965 df-ne 3019 df-nel 3126 df-ral 3145 df-rex 3146 df-rab 3149 df-v 3498 df-sbc 3775 df-csb 3886 df-dif 3941 df-un 3943 df-in 3945 df-ss 3954 df-nul 4294 df-if 4470 df-pw 4543 df-sn 4570 df-pr 4572 df-op 4576 df-uni 4841 df-br 5069 df-opab 5131 df-mpt 5149 df-id 5462 df-po 5476 df-so 5477 df-xp 5563 df-rel 5564 df-cnv 5565 df-co 5566 df-dm 5567 df-rn 5568 df-res 5569 df-ima 5570 df-iota 6316 df-fun 6359 df-fn 6360 df-f 6361 df-f1 6362 df-fo 6363 df-f1o 6364 df-fv 6365 df-ov 7161 df-oprab 7162 df-mpo 7163 df-er 8291 df-en 8512 df-dom 8513 df-sdom 8514 df-pnf 10679 df-mnf 10680 df-xr 10681 df-ltxr 10682 df-le 10683 df-icc 12748 |
This theorem is referenced by: ioounsn 12866 snunioo 12867 snunico 12868 snunioc 12869 prunioo 12870 icccmplem1 23432 ivthicc 24061 ioombl 24168 volivth 24210 mbfimasn 24235 itgspliticc 24439 dvivth 24609 cvmliftlem10 32543 mblfinlem2 34932 areacirc 34989 iocinico 39825 iocmbl 39826 snunioo1 41795 cncfiooicc 42184 vonsn 42980 |
Copyright terms: Public domain | W3C validator |