| 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 4439 | . . . . 5 ⊢ ((({∅} × 𝐴) ∪ ({1o} × 1o)) ∖ ({1o} × 1o)) = (({∅} × 𝐴) ∖ ({1o} × 1o)) | |
| 2 | df-dju 9992 | . . . . . 6 ⊢ (𝐴 ⊔ 1o) = (({∅} × 𝐴) ∪ ({1o} × 1o)) | |
| 3 | df1o2 8494 | . . . . . . . 8 ⊢ 1o = {∅} | |
| 4 | 3 | xpeq2i 5681 | . . . . . . 7 ⊢ ({1o} × 1o) = ({1o} × {∅}) |
| 5 | 1oex 8497 | . . . . . . . 8 ⊢ 1o ∈ V | |
| 6 | 0ex 5263 | . . . . . . . 8 ⊢ ∅ ∈ V | |
| 7 | 5, 6 | xpsn 7149 | . . . . . . 7 ⊢ ({1o} × {∅}) = {〈1o, ∅〉} |
| 8 | 4, 7 | eqtr2i 2787 | . . . . . 6 ⊢ {〈1o, ∅〉} = ({1o} × 1o) |
| 9 | 2, 8 | difeq12i 4063 | . . . . 5 ⊢ ((𝐴 ⊔ 1o) ∖ {〈1o, ∅〉}) = ((({∅} × 𝐴) ∪ ({1o} × 1o)) ∖ ({1o} × 1o)) |
| 10 | xp01disjl 8511 | . . . . . 6 ⊢ (({∅} × 𝐴) ∩ ({1o} × 1o)) = ∅ | |
| 11 | disj3 4409 | . . . . . 6 ⊢ ((({∅} × 𝐴) ∩ ({1o} × 1o)) = ∅ ↔ ({∅} × 𝐴) = (({∅} × 𝐴) ∖ ({1o} × 1o))) | |
| 12 | 10, 11 | mpbi 233 | . . . . 5 ⊢ ({∅} × 𝐴) = (({∅} × 𝐴) ∖ ({1o} × 1o)) |
| 13 | 1, 9, 12 | 3eqtr4i 2796 | . . . 4 ⊢ ((𝐴 ⊔ 1o) ∖ {〈1o, ∅〉}) = ({∅} × 𝐴) |
| 14 | reldom 8990 | . . . . . . . 8 ⊢ Rel ≼ | |
| 15 | 14 | brrelex2i 5711 | . . . . . . 7 ⊢ (ω ≼ 𝐴 → 𝐴 ∈ V) |
| 16 | 1on 8500 | . . . . . . 7 ⊢ 1o ∈ On | |
| 17 | djudoml 10273 | . . . . . . 7 ⊢ ((𝐴 ∈ V ∧ 1o ∈ On) → 𝐴 ≼ (𝐴 ⊔ 1o)) | |
| 18 | 15, 16, 17 | sylancl 598 | . . . . . 6 ⊢ (ω ≼ 𝐴 → 𝐴 ≼ (𝐴 ⊔ 1o)) |
| 19 | domtr 9045 | . . . . . 6 ⊢ ((ω ≼ 𝐴 ∧ 𝐴 ≼ (𝐴 ⊔ 1o)) → ω ≼ (𝐴 ⊔ 1o)) | |
| 20 | 18, 19 | mpdan 700 | . . . . 5 ⊢ (ω ≼ 𝐴 → ω ≼ (𝐴 ⊔ 1o)) |
| 21 | infdifsn 9668 | . . . . 5 ⊢ (ω ≼ (𝐴 ⊔ 1o) → ((𝐴 ⊔ 1o) ∖ {〈1o, ∅〉}) ≈ (𝐴 ⊔ 1o)) | |
| 22 | 20, 21 | syl 18 | . . . 4 ⊢ (ω ≼ 𝐴 → ((𝐴 ⊔ 1o) ∖ {〈1o, ∅〉}) ≈ (𝐴 ⊔ 1o)) |
| 23 | 13, 22 | eqbrtrrid 5143 | . . 3 ⊢ (ω ≼ 𝐴 → ({∅} × 𝐴) ≈ (𝐴 ⊔ 1o)) |
| 24 | 23 | ensymd 9043 | . 2 ⊢ (ω ≼ 𝐴 → (𝐴 ⊔ 1o) ≈ ({∅} × 𝐴)) |
| 25 | xpsnen2g 9100 | . . 3 ⊢ ((∅ ∈ V ∧ 𝐴 ∈ V) → ({∅} × 𝐴) ≈ 𝐴) | |
| 26 | 6, 15, 25 | sylancr 599 | . 2 ⊢ (ω ≼ 𝐴 → ({∅} × 𝐴) ≈ 𝐴) |
| 27 | entr 9044 | . 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 1569 ∈ wcel 2146 Vcvv 3453 ∖ cdif 4047 ∩ cin 4091 ∪ cun 4151 ∅c0 4280 {csn 4587 〈cop 4837 class class class wbr 5105 × cxp 5652 Oncon0 6368 ωcom 7884 1oc1o 8480 ≈ cen 8981 ≼ cdom 8982 ⊔ cdju 9989 |
| This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1827 ax-4 1841 ax-5 1944 ax-6 2001 ax-7 2042 ax-8 2148 ax-9 2156 ax-10 2179 ax-11 2196 ax-12 2215 ax-ext 2735 ax-sep 5251 ax-nul 5262 ax-pow 5330 ax-pr 5394 ax-un 7758 |
| This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1572 df-fal 1582 df-ex 1812 df-nf 1816 df-sb 2101 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2838 df-nfc 2912 df-ne 2959 df-ral 3080 df-rex 3090 df-reu 3369 df-rab 3416 df-v 3455 df-sbc 3742 df-csb 3851 df-ss 3900 df-pss 4016 df-dif 4049 df-in 4093 df-un 4153 df-nul 4281 df-if 4485 df-pw 4561 df-sn 4588 df-pr 4590 df-op 4838 df-uni 4870 df-int 4910 df-br 5106 df-opab 5170 df-mpt 5189 df-tr 5215 df-id 5549 df-eprel 5554 df-po 5562 df-so 5563 df-fr 5607 df-we 5609 df-xp 5660 df-rel 5661 df-cnv 5662 df-co 5663 df-dm 5664 df-rn 5665 df-res 5666 df-ima 5667 df-ord 6371 df-on 6372 df-lim 6373 df-suc 6374 df-iota 6500 df-fun 6548 df-fn 6549 df-f 6550 df-f1 6551 df-fo 6552 df-f1o 6553 df-fv 6554 df-om 7885 df-1st 8008 df-2nd 8009 df-1o 8487 df-er 8728 df-en 8985 df-dom 8986 df-dju 9992 |
| This theorem is used by: pwdjuidm 10280 isfin4p1 10403 canthp1lem2 10748 |
| Copyright terms: Public domain | W3C validator |