Proof of Theorem ordzsl
| Step | Hyp | Ref
| Expression |
| 1 | | orduninsuc 2365 |
. . . . . 6
⊢ (Ord A
→ (A = ∪A ↔ ¬
∃x ∈ On A = suc x)) |
| 2 | 1 | biimprd 136 |
. . . . 5
⊢ (Ord A
→ (¬ ∃x ∈ On A = suc x →
A = ∪A)) |
| 3 | | unizlim 2364 |
. . . . 5
⊢ (Ord A
→ (A = ∪A ↔ (A = ∅ ∨ Lim A))) |
| 4 | 2, 3 | sylibd 177 |
. . . 4
⊢ (Ord A
→ (¬ ∃x ∈ On A = suc x →
(A = ∅ ∨ Lim A))) |
| 5 | 4 | orrd 203 |
. . 3
⊢ (Ord A
→ (∃x ∈ On A = suc x ∨
(A = ∅ ∨ Lim A))) |
| 6 | | 3orass 584 |
. . . 4
⊢ ((A =
∅ ∨ ∃x ∈ On A = suc x ∨
Lim A) ↔ (A = ∅ ∨ (∃x ∈ On A =
suc x ∨ Lim A))) |
| 7 | | or12 217 |
. . . 4
⊢ ((A =
∅ ∨ (∃x ∈ On A = suc x ∨
Lim A)) ↔ (∃x ∈ On A =
suc x ∨ (A = ∅ ∨ Lim A))) |
| 8 | 6, 7 | bitr 151 |
. . 3
⊢ ((A =
∅ ∨ ∃x ∈ On A = suc x ∨
Lim A) ↔ (∃x ∈ On A =
suc x ∨ (A = ∅ ∨ Lim A))) |
| 9 | 5, 8 | sylibr 175 |
. 2
⊢ (Ord A
→ (A = ∅ ∨ ∃x ∈ On A =
suc x ∨ Lim A)) |
| 10 | | ord0 2276 |
. . . 4
⊢ Ord ∅ |
| 11 | | ordeq 2206 |
. . . 4
⊢ (A =
∅ → (Ord A ↔ Ord
∅)) |
| 12 | 10, 11 | mpbiri 169 |
. . 3
⊢ (A =
∅ → Ord A) |
| 13 | | eleq1 1149 |
. . . . . . 7
⊢ (A =
suc x → (A ∈ On ↔ suc x ∈ On)) |
| 14 | | suceloni 2314 |
. . . . . . 7
⊢ (x
∈ On → suc x ∈ On) |
| 15 | 13, 14 | syl5bir 184 |
. . . . . 6
⊢ (A =
suc x → (x ∈ On → A ∈ On)) |
| 16 | 15 | com12 13 |
. . . . 5
⊢ (x
∈ On → (A = suc x → A
∈ On)) |
| 17 | | eloni 2209 |
. . . . 5
⊢ (A
∈ On → Ord A) |
| 18 | 16, 17 | syl6 23 |
. . . 4
⊢ (x
∈ On → (A = suc x → Ord A)) |
| 19 | 18 | r19.23aiv 1284 |
. . 3
⊢ (∃x ∈ On A =
suc x → Ord A) |
| 20 | | limord 2283 |
. . 3
⊢ (Lim A
→ Ord A) |
| 21 | 12, 19, 20 | 3jaoi 633 |
. 2
⊢ ((A =
∅ ∨ ∃x ∈ On A = suc x ∨
Lim A) → Ord A) |
| 22 | 9, 21 | impbi 139 |
1
⊢ (Ord A
↔ (A = ∅ ∨ ∃x ∈ On A =
suc x ∨ Lim A)) |