| Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > MPE Home > Th. List > infxpidm2 | Structured version Visualization version GIF version | ||
| Description: Every infinite well-orderable set is equinumerous to its Cartesian square. This theorem provides the basis for infinite cardinal arithmetic. Proposition 10.40 of [TakeutiZaring] p. 95. See also infxpidm 10570. (Contributed by Mario Carneiro, 9-Mar-2013.) (Revised by Mario Carneiro, 29-Apr-2015.) |
| Ref | Expression |
|---|---|
| infxpidm2 | ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝐴 × 𝐴) ≈ 𝐴) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | cardid2 9958 | . . . . . 6 ⊢ (𝐴 ∈ dom card → (card‘𝐴) ≈ 𝐴) | |
| 2 | 1 | ensymd 9011 | . . . . 5 ⊢ (𝐴 ∈ dom card → 𝐴 ≈ (card‘𝐴)) |
| 3 | xpen 9138 | . . . . 5 ⊢ ((𝐴 ≈ (card‘𝐴) ∧ 𝐴 ≈ (card‘𝐴)) → (𝐴 × 𝐴) ≈ ((card‘𝐴) × (card‘𝐴))) | |
| 4 | 2, 2, 3 | syl2anc 596 | . . . 4 ⊢ (𝐴 ∈ dom card → (𝐴 × 𝐴) ≈ ((card‘𝐴) × (card‘𝐴))) |
| 5 | 4 | adantr 486 | . . 3 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝐴 × 𝐴) ≈ ((card‘𝐴) × (card‘𝐴))) |
| 6 | cardon 9949 | . . . 4 ⊢ (card‘𝐴) ∈ On | |
| 7 | cardom 9991 | . . . . 5 ⊢ (card‘ω) = ω | |
| 8 | omelon 9625 | . . . . . . . 8 ⊢ ω ∈ On | |
| 9 | onenon 9954 | . . . . . . . 8 ⊢ (ω ∈ On → ω ∈ dom card) | |
| 10 | 8, 9 | ax-mp 5 | . . . . . . 7 ⊢ ω ∈ dom card |
| 11 | carddom2 9982 | . . . . . . 7 ⊢ ((ω ∈ dom card ∧ 𝐴 ∈ dom card) → ((card‘ω) ⊆ (card‘𝐴) ↔ ω ≼ 𝐴)) | |
| 12 | 10, 11 | mpan 703 | . . . . . 6 ⊢ (𝐴 ∈ dom card → ((card‘ω) ⊆ (card‘𝐴) ↔ ω ≼ 𝐴)) |
| 13 | 12 | biimpar 483 | . . . . 5 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (card‘ω) ⊆ (card‘𝐴)) |
| 14 | 7, 13 | eqsstrrid 3970 | . . . 4 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → ω ⊆ (card‘𝐴)) |
| 15 | infxpen 10017 | . . . 4 ⊢ (((card‘𝐴) ∈ On ∧ ω ⊆ (card‘𝐴)) → ((card‘𝐴) × (card‘𝐴)) ≈ (card‘𝐴)) | |
| 16 | 6, 14, 15 | sylancr 599 | . . 3 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → ((card‘𝐴) × (card‘𝐴)) ≈ (card‘𝐴)) |
| 17 | entr 9012 | . . 3 ⊢ (((𝐴 × 𝐴) ≈ ((card‘𝐴) × (card‘𝐴)) ∧ ((card‘𝐴) × (card‘𝐴)) ≈ (card‘𝐴)) → (𝐴 × 𝐴) ≈ (card‘𝐴)) | |
| 18 | 5, 16, 17 | syl2anc 596 | . 2 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝐴 × 𝐴) ≈ (card‘𝐴)) |
| 19 | 1 | adantr 486 | . 2 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (card‘𝐴) ≈ 𝐴) |
| 20 | entr 9012 | . 2 ⊢ (((𝐴 × 𝐴) ≈ (card‘𝐴) ∧ (card‘𝐴) ≈ 𝐴) → (𝐴 × 𝐴) ≈ 𝐴) | |
| 21 | 18, 19, 20 | syl2anc 596 | 1 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝐴 × 𝐴) ≈ 𝐴) |
| Colors of variables: wff setvar class |
| This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∈ wcel 2145 ⊆ wss 3899 class class class wbr 5103 × cxp 5653 dom cdm 5655 Oncon0 6357 ‘cfv 6533 ωcom 7862 ≈ cen 8949 ≼ cdom 8950 cardccrd 9940 |
| 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 7736 ax-inf2 9620 |
| 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-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 7370 df-ov 7416 df-om 7863 df-1st 7986 df-2nd 7987 df-frecs 8280 df-wrecs 8311 df-recs 8360 df-rdg 8399 df-1o 8455 df-er 8696 df-en 8953 df-dom 8954 df-sdom 8955 df-fin 8956 df-oi 9482 df-card 9944 |
| This theorem is used by: infpwfien 10065 mappwen 10115 infdjuabs 10207 infxpdom 10212 fin67 10397 infxpidm 10570 ttac 43877 |
| Copyright terms: Public domain | W3C validator |