Proof of Theorem oncard
| Step | Hyp | Ref
| Expression |
| 1 | | cardid 3635 |
. . . . . . 7
⊢ (card ‘x) ≈ x |
| 2 | | breq1 2065 |
. . . . . . 7
⊢ (A =
(card ‘x) → (A ≈ x
↔ (card ‘x) ≈ x)) |
| 3 | 1, 2 | mpbiri 169 |
. . . . . 6
⊢ (A =
(card ‘x) → A ≈ x) |
| 4 | | cardid 3635 |
. . . . . . 7
⊢ (card ‘A) ≈ A |
| 5 | | entrt 3319 |
. . . . . . 7
⊢ (((card ‘A) ≈ A
∧ A ≈ x) → (card ‘A) ≈ x) |
| 6 | 4, 5 | mpan 518 |
. . . . . 6
⊢ (A
≈ x → (card ‘A) ≈ x) |
| 7 | | cardon 3634 |
. . . . . . . 8
⊢ (card ‘A) ∈ On |
| 8 | | breq1 2065 |
. . . . . . . . 9
⊢ (y =
(card ‘A) → (y ≈ x
↔ (card ‘A) ≈ x)) |
| 9 | 8 | onintss 2266 |
. . . . . . . 8
⊢ ((card ‘A) ∈ On → ((card ‘A) ≈ x
→ ∩{y
∈ On∣y ≈ x} ⊆ (card ‘A))) |
| 10 | 7, 9 | ax-mp 6 |
. . . . . . 7
⊢ ((card ‘A) ≈ x
→ ∩{y
∈ On∣y ≈ x} ⊆ (card ‘A)) |
| 11 | | cardval 3633 |
. . . . . . 7
⊢ (card ‘x) = ∩{y ∈ On∣y ≈ x} |
| 12 | 10, 11 | syl5ss 1544 |
. . . . . 6
⊢ ((card ‘A) ≈ x
→ (card ‘x) ⊆ (card
‘A)) |
| 13 | 3, 6, 12 | 3syl 21 |
. . . . 5
⊢ (A =
(card ‘x) → (card
‘x) ⊆ (card ‘A)) |
| 14 | | sseq1 1521 |
. . . . 5
⊢ (A =
(card ‘x) → (A ⊆ (card ‘A) ↔ (card ‘x) ⊆ (card ‘A))) |
| 15 | 13, 14 | mpbird 171 |
. . . 4
⊢ (A =
(card ‘x) → A ⊆ (card ‘A)) |
| 16 | | cardon 3634 |
. . . . . 6
⊢ (card ‘x) ∈ On |
| 17 | | eleq1 1149 |
. . . . . 6
⊢ (A =
(card ‘x) → (A ∈ On ↔ (card ‘x) ∈ On)) |
| 18 | 16, 17 | mpbiri 169 |
. . . . 5
⊢ (A =
(card ‘x) → A ∈ On) |
| 19 | | cardonle 3629 |
. . . . 5
⊢ (A
∈ On → (card ‘A) ⊆
A) |
| 20 | 18, 19 | syl 12 |
. . . 4
⊢ (A =
(card ‘x) → (card
‘A) ⊆ A) |
| 21 | 15, 20 | eqssd 1518 |
. . 3
⊢ (A =
(card ‘x) → A = (card ‘A)) |
| 22 | 21 | 19.23aiv 952 |
. 2
⊢ (∃x A = (card
‘x) → A = (card ‘A)) |
| 23 | | fvex 2838 |
. . . 4
⊢ (card ‘A) ∈ V |
| 24 | | eleq1 1149 |
. . . 4
⊢ (A =
(card ‘A) → (A ∈ V ↔ (card ‘A) ∈ V)) |
| 25 | 23, 24 | mpbiri 169 |
. . 3
⊢ (A =
(card ‘A) → A ∈ V) |
| 26 | | fveq2 2832 |
. . . . 5
⊢ (x =
A → (card ‘x) = (card ‘A)) |
| 27 | 26 | cleq2d 1112 |
. . . 4
⊢ (x =
A → (A = (card ‘x) ↔ A =
(card ‘A))) |
| 28 | 27 | cla4egv 1397 |
. . 3
⊢ (A
∈ V → (A = (card
‘A) → ∃x A = (card
‘x))) |
| 29 | 25, 28 | mpcom 49 |
. 2
⊢ (A =
(card ‘A) → ∃x A = (card
‘x)) |
| 30 | 22, 29 | impbi 139 |
1
⊢ (∃x A = (card
‘x) ↔ A = (card ‘A)) |