Proof of Theorem rankxplim
| Step | Hyp | Ref
| Expression |
| 1 | | visset 1860 |
. . . . . . . . . . . 12
⊢ x ∈
V |
| 2 | | visset 1860 |
. . . . . . . . . . . 12
⊢ y ∈
V |
| 3 | | rankxplim.1 |
. . . . . . . . . . . 12
⊢ A ∈
V |
| 4 | | rankxplim.2 |
. . . . . . . . . . . 12
⊢ B ∈
V |
| 5 | 1, 2, 3, 4 | rankelun 4769 |
. . . . . . . . . . 11
⊢ (((rank ‘x) ∈ (rank
‘A) ⋀ (rank ‘y) ∈ (rank
‘B)) → (rank ‘(x ∪ y))
∈ (rank ‘(A ∪ B))) |
| 6 | 3 | rankel 4742 |
. . . . . . . . . . 11
⊢ (x ∈ A → (rank ‘x) ∈ (rank
‘A)) |
| 7 | 4 | rankel 4742 |
. . . . . . . . . . 11
⊢ (y ∈ B → (rank ‘y) ∈ (rank
‘B)) |
| 8 | 5, 6, 7 | syl2an 465 |
. . . . . . . . . 10
⊢ ((x ∈ A ⋀ y ∈ B) → (rank ‘(x ∪ y))
∈ (rank ‘(A ∪ B))) |
| 9 | 8 | adantl 397 |
. . . . . . . . 9
⊢ ((Lim (rank
‘(A ∪ B)) ⋀ (x ∈ A ⋀ y ∈ B)) → (rank ‘(x ∪ y))
∈ (rank ‘(A ∪ B))) |
| 10 | | ranklim 4747 |
. . . . . . . . . . 11
⊢ (Lim (rank
‘(A ∪ B)) → ((rank ‘(x ∪ y))
∈ (rank ‘(A ∪ B))
↔ (rank ‘℘(x ∪ y))
∈ (rank ‘(A ∪ B)))) |
| 11 | | ranklim 4747 |
. . . . . . . . . . 11
⊢ (Lim (rank
‘(A ∪ B)) → ((rank ‘℘(x ∪
y)) ∈
(rank ‘(A ∪ B)) ↔ (rank ‘℘℘(x ∪ y))
∈ (rank ‘(A ∪ B)))) |
| 12 | 10, 11 | bitrd 539 |
. . . . . . . . . 10
⊢ (Lim (rank
‘(A ∪ B)) → ((rank ‘(x ∪ y))
∈ (rank ‘(A ∪ B))
↔ (rank ‘℘℘(x ∪
y)) ∈
(rank ‘(A ∪ B)))) |
| 13 | 12 | adantr 398 |
. . . . . . . . 9
⊢ ((Lim (rank
‘(A ∪ B)) ⋀ (x ∈ A ⋀ y ∈ B)) → ((rank ‘(x ∪ y))
∈ (rank ‘(A ∪ B))
↔ (rank ‘℘℘(x ∪
y)) ∈
(rank ‘(A ∪ B)))) |
| 14 | 9, 13 | mpbid 202 |
. . . . . . . 8
⊢ ((Lim (rank
‘(A ∪ B)) ⋀ (x ∈ A ⋀ y ∈ B)) → (rank ‘℘℘(x ∪ y))
∈ (rank ‘(A ∪ B))) |
| 15 | | pwuni 2813 |
. . . . . . . . . . . 12
⊢ 〈x, y〉 ⊆ ℘∪〈x, y〉 |
| 16 | | uniop 2864 |
. . . . . . . . . . . . 13
⊢ ∪〈x, y〉 = {x,
y} |
| 17 | | pweq 2455 |
. . . . . . . . . . . . 13
⊢ (∪〈x, y〉 = {x,
y} → ℘∪〈x, y〉 = ℘{x, y}) |
| 18 | 16, 17 | ax-mp 7 |
. . . . . . . . . . . 12
⊢ ℘∪〈x, y〉 = ℘{x, y} |
| 19 | 15, 18 | sseqtri 2144 |
. . . . . . . . . . 11
⊢ 〈x, y〉 ⊆ ℘{x, y} |
| 20 | | pwuni 2813 |
. . . . . . . . . . . . 13
⊢ {x, y} ⊆ ℘∪{x, y} |
| 21 | 1, 2 | unipr 2569 |
. . . . . . . . . . . . . 14
⊢ ∪{x, y} = (x ∪
y) |
| 22 | | pweq 2455 |
. . . . . . . . . . . . . 14
⊢ (∪{x, y} = (x ∪
y) → ℘∪{x, y} = ℘(x ∪
y)) |
| 23 | 21, 22 | ax-mp 7 |
. . . . . . . . . . . . 13
⊢ ℘∪{x, y} = ℘(x ∪
y) |
| 24 | 20, 23 | sseqtri 2144 |
. . . . . . . . . . . 12
⊢ {x, y} ⊆ ℘(x ∪ y) |
| 25 | | sspwb 2811 |
. . . . . . . . . . . 12
⊢ ({x, y} ⊆ ℘(x ∪ y)
↔ ℘{x, y} ⊆ ℘℘(x ∪
y)) |
| 26 | 24, 25 | mpbi 196 |
. . . . . . . . . . 11
⊢ ℘{x, y} ⊆ ℘℘(x ∪ y) |
| 27 | 19, 26 | sstri 2124 |
. . . . . . . . . 10
⊢ 〈x, y〉 ⊆ ℘℘(x ∪
y) |
| 28 | 1, 2 | unex 2928 |
. . . . . . . . . . . . 13
⊢ (x ∪ y) ∈ V |
| 29 | 28 | pwex 2801 |
. . . . . . . . . . . 12
⊢ ℘(x ∪
y) ∈
V |
| 30 | 29 | pwex 2801 |
. . . . . . . . . . 11
⊢ ℘℘(x ∪ y) ∈ V |
| 31 | 30 | rankss 4750 |
. . . . . . . . . 10
⊢ (〈x, y〉 ⊆ ℘℘(x ∪
y) → (rank ‘〈x, y〉) ⊆ (rank ‘℘℘(x ∪ y))) |
| 32 | 27, 31 | ax-mp 7 |
. . . . . . . . 9
⊢ (rank ‘〈x, y〉) ⊆ (rank ‘℘℘(x ∪ y)) |
| 33 | | rankon 4733 |
. . . . . . . . . 10
⊢ (rank ‘〈x, y〉) ∈ On |
| 34 | | rankon 4733 |
. . . . . . . . . 10
⊢ (rank ‘(A ∪ B))
∈ On |
| 35 | | ontr2 3061 |
. . . . . . . . . 10
⊢ (((rank ‘〈x, y〉) ∈ On ⋀ (rank
‘(A ∪ B)) ∈ On) →
(((rank ‘〈x, y〉) ⊆ (rank
‘℘℘(x ∪
y)) ⋀
(rank ‘℘℘(x ∪
y)) ∈
(rank ‘(A ∪ B))) → (rank ‘〈x, y〉) ∈ (rank ‘(A ∪ B)))) |
| 36 | 33, 34, 35 | mp2an 709 |
. . . . . . . . 9
⊢ (((rank ‘〈x, y〉) ⊆ (rank ‘℘℘(x ∪ y))
⋀ (rank ‘℘℘(x ∪ y))
∈ (rank ‘(A ∪ B)))
→ (rank ‘〈x, y〉) ∈ (rank
‘(A ∪ B))) |
| 37 | 32, 36 | mpan 707 |
. . . . . . . 8
⊢ ((rank ‘℘℘(x ∪ y))
∈ (rank ‘(A ∪ B))
→ (rank ‘〈x, y〉) ∈ (rank
‘(A ∪ B))) |
| 38 | 14, 37 | syl 10 |
. . . . . . 7
⊢ ((Lim (rank
‘(A ∪ B)) ⋀ (x ∈ A ⋀ y ∈ B)) → (rank ‘〈x, y〉) ∈ (rank ‘(A ∪ B))) |
| 39 | 33, 34 | onsucssi 3168 |
. . . . . . 7
⊢ ((rank ‘〈x, y〉) ∈ (rank ‘(A ∪ B))
↔ suc (rank ‘〈x, y〉) ⊆ (rank
‘(A ∪ B))) |
| 40 | 38, 39 | sylib 205 |
. . . . . 6
⊢ ((Lim (rank
‘(A ∪ B)) ⋀ (x ∈ A ⋀ y ∈ B)) → suc (rank ‘〈x, y〉) ⊆ (rank ‘(A ∪ B))) |
| 41 | 40 | ex 380 |
. . . . 5
⊢ (Lim (rank
‘(A ∪ B)) → ((x
∈ A ⋀ y ∈ B) → suc
(rank ‘〈x, y〉) ⊆ (rank
‘(A ∪ B)))) |
| 42 | 41 | r19.21aivv 1767 |
. . . 4
⊢ (Lim (rank
‘(A ∪ B)) → ∀x ∈ A ∀y ∈ B suc (rank
‘〈x, y〉) ⊆ (rank
‘(A ∪ B))) |
| 43 | | fveq2 3781 |
. . . . . . . 8
⊢ (z = 〈x, y〉 → (rank ‘z) = (rank ‘〈x, y〉)) |
| 44 | | suceq 3091 |
. . . . . . . 8
⊢ ((rank ‘z) = (rank ‘〈x, y〉) → suc
(rank ‘z) = suc (rank ‘〈x, y〉)) |
| 45 | 43, 44 | syl 10 |
. . . . . . 7
⊢ (z = 〈x, y〉 → suc (rank ‘z) = suc (rank ‘〈x, y〉)) |
| 46 | 45 | sseq1d 2139 |
. . . . . 6
⊢ (z = 〈x, y〉 → (suc (rank ‘z) ⊆ (rank
‘(A ∪ B)) ↔ suc (rank ‘〈x, y〉) ⊆ (rank ‘(A ∪ B)))) |
| 47 | 46 | ralxp 3275 |
. . . . 5
⊢ (∀z ∈ (A ×
B)suc (rank ‘z) ⊆ (rank
‘(A ∪ B)) ↔ ∀x ∈ A ∀y ∈ B suc (rank
‘〈x, y〉) ⊆ (rank
‘(A ∪ B))) |
| 48 | 3, 4 | xpex 3317 |
. . . . . 6
⊢ (A × B)
∈ V |
| 49 | 48 | rankbnd 4765 |
. . . . 5
⊢ (∀z ∈ (A ×
B)suc (rank ‘z) ⊆ (rank
‘(A ∪ B)) ↔ (rank ‘(A × B))
⊆ (rank ‘(A ∪ B))) |
| 50 | 47, 49 | bitr3i 182 |
. . . 4
⊢ (∀x ∈ A ∀y ∈ B suc (rank
‘〈x, y〉) ⊆ (rank
‘(A ∪ B)) ↔ (rank ‘(A × B))
⊆ (rank ‘(A ∪ B))) |
| 51 | 42, 50 | sylib 205 |
. . 3
⊢ (Lim (rank
‘(A ∪ B)) → (rank ‘(A × B))
⊆ (rank ‘(A ∪ B))) |
| 52 | 51 | adantr 398 |
. 2
⊢ ((Lim (rank
‘(A ∪ B)) ⋀ (A × B)
≠ ∅) → (rank ‘(A × B))
⊆ (rank ‘(A ∪ B))) |
| 53 | 3, 4 | rankxpl 4772 |
. . 3
⊢ ((A × B)
≠ ∅ → (rank ‘(A ∪ B))
⊆ (rank ‘(A × B))) |
| 54 | 53 | adantl 397 |
. 2
⊢ ((Lim (rank
‘(A ∪ B)) ⋀ (A × B)
≠ ∅) → (rank ‘(A ∪ B))
⊆ (rank ‘(A × B))) |
| 55 | 52, 54 | eqssd 2130 |
1
⊢ ((Lim (rank
‘(A ∪ B)) ⋀ (A × B)
≠ ∅) → (rank ‘(A × B)) =
(rank ‘(A ∪ B))) |