Proof of Theorem ordunisuc
| Step | Hyp | Ref
| Expression |
| 1 | | ordeleqon 2241 |
. 2
⊢ (Ord A
↔ (A ∈ On ∨ A = On)) |
| 2 | | suceq 2288 |
. . . . . 6
⊢ (x =
A → suc x = suc A) |
| 3 | 2 | unieqd 1929 |
. . . . 5
⊢ (x =
A → ∪suc
x = ∪suc
A) |
| 4 | | id 9 |
. . . . 5
⊢ (x =
A → x = A) |
| 5 | 3, 4 | cleq12d 1115 |
. . . 4
⊢ (x =
A → (∪suc
x = x
↔ ∪suc A =
A)) |
| 6 | | eloni 2209 |
. . . . . 6
⊢ (x
∈ On → Ord x) |
| 7 | | ordtr 2213 |
. . . . . 6
⊢ (Ord x
→ Tr x) |
| 8 | 6, 7 | syl 12 |
. . . . 5
⊢ (x
∈ On → Tr x) |
| 9 | | visset 1350 |
. . . . . 6
⊢ x
∈ V |
| 10 | 9 | unisuc 2299 |
. . . . 5
⊢ (Tr x
↔ ∪suc x =
x) |
| 11 | 8, 10 | sylib 173 |
. . . 4
⊢ (x
∈ On → ∪suc x = x) |
| 12 | 5, 11 | vtoclga 1387 |
. . 3
⊢ (A
∈ On → ∪suc A = A) |
| 13 | | onprc 2240 |
. . . . . . 7
⊢ ¬ On ∈ V |
| 14 | | eleq1 1149 |
. . . . . . 7
⊢ (A =
On → (A ∈ V ↔ On
∈ V)) |
| 15 | 13, 14 | mtbiri 539 |
. . . . . 6
⊢ (A =
On → ¬ A ∈
V) |
| 16 | | sucprc 2297 |
. . . . . 6
⊢ (¬ A ∈ V → suc A = A) |
| 17 | 15, 16 | syl 12 |
. . . . 5
⊢ (A =
On → suc A = A) |
| 18 | 17 | unieqd 1929 |
. . . 4
⊢ (A =
On → ∪suc A
= ∪A) |
| 19 | | unon 2338 |
. . . . 5
⊢ ∪On =
On |
| 20 | | unieq 1927 |
. . . . . 6
⊢ (A =
On → ∪A =
∪On) |
| 21 | | id 9 |
. . . . . 6
⊢ (A =
On → A = On) |
| 22 | 20, 21 | cleq12d 1115 |
. . . . 5
⊢ (A =
On → (∪A =
A ↔ ∪On =
On)) |
| 23 | 19, 22 | mpbiri 169 |
. . . 4
⊢ (A =
On → ∪A =
A) |
| 24 | 18, 23 | eqtrd 1128 |
. . 3
⊢ (A =
On → ∪suc A
= A) |
| 25 | 12, 24 | jaoi 275 |
. 2
⊢ ((A
∈ On ∨ A = On) → ∪suc A = A) |
| 26 | 1, 25 | sylbi 174 |
1
⊢ (Ord A
→ ∪suc A =
A) |