| Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > MPE Home > Th. List > infdju1 | Structured version Visualization version GIF version | ||
| Description: An infinite set is equinumerous to itself added with one. (Contributed by Mario Carneiro, 15-May-2015.) |
| Ref | Expression |
|---|---|
| infdju1 | ⊢ (ω ≼ 𝐴 → (𝐴 ⊔ 1o) ≈ 𝐴) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | difun2 4440 | . . . . 5 ⊢ ((({∅} × 𝐴) ∪ ({1o} × 1o)) ∖ ({1o} × 1o)) = (({∅} × 𝐴) ∖ ({1o} × 1o)) | |
| 2 | df-dju 10019 | . . . . . 6 ⊢ (𝐴 ⊔ 1o) = (({∅} × 𝐴) ∪ ({1o} × 1o)) | |
| 3 | df1o2 8521 | . . . . . . . 8 ⊢ 1o = {∅} | |
| 4 | 3 | xpeq2i 5685 | . . . . . . 7 ⊢ ({1o} × 1o) = ({1o} × {∅}) |
| 5 | 1oex 8524 | . . . . . . . 8 ⊢ 1o ∈ V | |
| 6 | 0ex 5267 | . . . . . . . 8 ⊢ ∅ ∈ V | |
| 7 | 5, 6 | xpsn 7173 | . . . . . . 7 ⊢ ({1o} × {∅}) = {〈1o, ∅〉} |
| 8 | 4, 7 | eqtr2i 2787 | . . . . . 6 ⊢ {〈1o, ∅〉} = ({1o} × 1o) |
| 9 | 2, 8 | difeq12i 4064 | . . . . 5 ⊢ ((𝐴 ⊔ 1o) ∖ {〈1o, ∅〉}) = ((({∅} × 𝐴) ∪ ({1o} × 1o)) ∖ ({1o} × 1o)) |
| 10 | xp01disjl 8538 | . . . . . 6 ⊢ (({∅} × 𝐴) ∩ ({1o} × 1o)) = ∅ | |
| 11 | disj3 4410 | . . . . . 6 ⊢ ((({∅} × 𝐴) ∩ ({1o} × 1o)) = ∅ ↔ ({∅} × 𝐴) = (({∅} × 𝐴) ∖ ({1o} × 1o))) | |
| 12 | 10, 11 | mpbi 233 | . . . . 5 ⊢ ({∅} × 𝐴) = (({∅} × 𝐴) ∖ ({1o} × 1o)) |
| 13 | 1, 9, 12 | 3eqtr4i 2796 | . . . 4 ⊢ ((𝐴 ⊔ 1o) ∖ {〈1o, ∅〉}) = ({∅} × 𝐴) |
| 14 | reldom 9017 | . . . . . . . 8 ⊢ Rel ≼ | |
| 15 | 14 | brrelex2i 5715 | . . . . . . 7 ⊢ (ω ≼ 𝐴 → 𝐴 ∈ V) |
| 16 | 1on 8527 | . . . . . . 7 ⊢ 1o ∈ On | |
| 17 | djudoml 10302 | . . . . . . 7 ⊢ ((𝐴 ∈ V ∧ 1o ∈ On) → 𝐴 ≼ (𝐴 ⊔ 1o)) | |
| 18 | 15, 16, 17 | sylancl 598 | . . . . . 6 ⊢ (ω ≼ 𝐴 → 𝐴 ≼ (𝐴 ⊔ 1o)) |
| 19 | domtr 9072 | . . . . . 6 ⊢ ((ω ≼ 𝐴 ∧ 𝐴 ≼ (𝐴 ⊔ 1o)) → ω ≼ (𝐴 ⊔ 1o)) | |
| 20 | 18, 19 | mpdan 700 | . . . . 5 ⊢ (ω ≼ 𝐴 → ω ≼ (𝐴 ⊔ 1o)) |
| 21 | infdifsn 9695 | . . . . 5 ⊢ (ω ≼ (𝐴 ⊔ 1o) → ((𝐴 ⊔ 1o) ∖ {〈1o, ∅〉}) ≈ (𝐴 ⊔ 1o)) | |
| 22 | 20, 21 | syl 18 | . . . 4 ⊢ (ω ≼ 𝐴 → ((𝐴 ⊔ 1o) ∖ {〈1o, ∅〉}) ≈ (𝐴 ⊔ 1o)) |
| 23 | 13, 22 | eqbrtrrid 5147 | . . 3 ⊢ (ω ≼ 𝐴 → ({∅} × 𝐴) ≈ (𝐴 ⊔ 1o)) |
| 24 | 23 | ensymd 9070 | . 2 ⊢ (ω ≼ 𝐴 → (𝐴 ⊔ 1o) ≈ ({∅} × 𝐴)) |
| 25 | xpsnen2g 9127 | . . 3 ⊢ ((∅ ∈ V ∧ 𝐴 ∈ V) → ({∅} × 𝐴) ≈ 𝐴) | |
| 26 | 6, 15, 25 | sylancr 599 | . 2 ⊢ (ω ≼ 𝐴 → ({∅} × 𝐴) ≈ 𝐴) |
| 27 | entr 9071 | . 2 ⊢ (((𝐴 ⊔ 1o) ≈ ({∅} × 𝐴) ∧ ({∅} × 𝐴) ≈ 𝐴) → (𝐴 ⊔ 1o) ≈ 𝐴) | |
| 28 | 24, 26, 27 | syl2anc 596 | 1 ⊢ (ω ≼ 𝐴 → (𝐴 ⊔ 1o) ≈ 𝐴) |
| Colors of variables: wff setvar class |
| This proof depends on syntax axioms: → wi 4 = wceq 1570 ∈ wcel 2147 Vcvv 3454 ∖ cdif 4048 ∩ cin 4092 ∪ cun 4152 ∅c0 4281 {csn 4588 〈cop 4840 class class class wbr 5108 × cxp 5656 Oncon0 6388 ωcom 7911 1oc1o 8507 ≈ cen 9008 ≼ cdom 9009 ⊔ cdju 10016 |
| 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-sep 5255 ax-nul 5266 ax-pow 5334 ax-pr 5398 ax-un 7783 |
| 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-ral 3081 df-rex 3091 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-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-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-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-om 7912 df-1st 8035 df-2nd 8036 df-1o 8514 df-er 8755 df-en 9012 df-dom 9013 df-dju 10019 |
| This theorem is used by: pwdjuidm 10309 isfin4p1 10432 canthp1lem2 10777 |
| Copyright terms: Public domain | W3C validator |