Proof of Theorem suceloni
| Step | Hyp | Ref
| Expression |
| 1 | | ordon 2238 |
. . . 4
⊢ Ord On |
| 2 | | trssord 2216 |
. . . . 5
⊢ ((Tr suc A ∧ suc A
⊆ On ∧ Ord On) → Ord suc A) |
| 3 | 2 | 3exp 611 |
. . . 4
⊢ (Tr suc A → (suc A
⊆ On → (Ord On → Ord suc A))) |
| 4 | 1, 3 | mpii 45 |
. . 3
⊢ (Tr suc A → (suc A
⊆ On → Ord suc A)) |
| 5 | | onelsst 2255 |
. . . . . . . 8
⊢ (A
∈ On → (x ∈ A → x
⊆ A)) |
| 6 | | elsn 1820 |
. . . . . . . . . 10
⊢ (x
∈ {A} ↔ x = A) |
| 7 | | eqimss 1548 |
. . . . . . . . . 10
⊢ (x =
A → x ⊆ A) |
| 8 | 6, 7 | sylbi 174 |
. . . . . . . . 9
⊢ (x
∈ {A} → x ⊆ A) |
| 9 | 8 | a1i 7 |
. . . . . . . 8
⊢ (A
∈ On → (x ∈ {A} → x
⊆ A)) |
| 10 | 5, 9 | orim12d 436 |
. . . . . . 7
⊢ (A
∈ On → ((x ∈ A ∨ x ∈
{A}) → (x ⊆ A ∨
x ⊆ A))) |
| 11 | | df-suc 2205 |
. . . . . . . . 9
⊢ suc A
= (A ∪ {A}) |
| 12 | 11 | eleq2i 1153 |
. . . . . . . 8
⊢ (x
∈ suc A ↔ x ∈ (A
∪ {A})) |
| 13 | | elun 1601 |
. . . . . . . 8
⊢ (x
∈ (A ∪ {A}) ↔ (x
∈ A ∨ x ∈ {A})) |
| 14 | 12, 13 | bitr2 152 |
. . . . . . 7
⊢ ((x
∈ A ∨ x ∈ {A})
↔ x ∈ suc A) |
| 15 | | oridm 208 |
. . . . . . 7
⊢ ((x
⊆ A ∨ x ⊆ A)
↔ x ⊆ A) |
| 16 | 10, 14, 15 | 3imtr3g 425 |
. . . . . 6
⊢ (A
∈ On → (x ∈ suc A → x
⊆ A)) |
| 17 | | sssucid 2300 |
. . . . . . 7
⊢ A
⊆ suc A |
| 18 | | sstr2 1510 |
. . . . . . 7
⊢ (x
⊆ A → (A ⊆ suc A
→ x ⊆ suc A)) |
| 19 | 17, 18 | mpi 44 |
. . . . . 6
⊢ (x
⊆ A → x ⊆ suc A) |
| 20 | 16, 19 | syl6 23 |
. . . . 5
⊢ (A
∈ On → (x ∈ suc A → x
⊆ suc A)) |
| 21 | 20 | r19.21aiv 1259 |
. . . 4
⊢ (A
∈ On → ∀x ∈ suc
Ax
⊆ suc A) |
| 22 | | dftr3 2045 |
. . . 4
⊢ (Tr suc A ↔ ∀x ∈ suc Ax ⊆ suc
A) |
| 23 | 21, 22 | sylibr 175 |
. . 3
⊢ (A
∈ On → Tr suc A) |
| 24 | | onsst 2243 |
. . . . . 6
⊢ (A
∈ On → A ⊆ On) |
| 25 | | snssi 1851 |
. . . . . 6
⊢ (A
∈ On → {A} ⊆ On) |
| 26 | 24, 25 | jca 236 |
. . . . 5
⊢ (A
∈ On → (A ⊆ On ∧
{A} ⊆ On)) |
| 27 | | unss 1632 |
. . . . 5
⊢ ((A
⊆ On ∧ {A} ⊆ On) ↔
(A ∪ {A}) ⊆ On) |
| 28 | 26, 27 | sylib 173 |
. . . 4
⊢ (A
∈ On → (A ∪ {A}) ⊆ On) |
| 29 | 28, 11 | syl5ss 1544 |
. . 3
⊢ (A
∈ On → suc A ⊆
On) |
| 30 | 4, 23, 29 | sylc 62 |
. 2
⊢ (A
∈ On → Ord suc A) |
| 31 | | sucexg 2302 |
. . 3
⊢ (A
∈ On → suc A ∈
V) |
| 32 | | elong 2207 |
. . 3
⊢ (suc A
∈ V → (suc A ∈ On
↔ Ord suc A)) |
| 33 | 31, 32 | syl 12 |
. 2
⊢ (A
∈ On → (suc A ∈ On ↔
Ord suc A)) |
| 34 | 30, 33 | mpbird 171 |
1
⊢ (A
∈ On → suc A ∈ On) |