Proof of Theorem oacl
| Step | Hyp | Ref
| Expression |
| 1 | | opreq2 3976 |
. . . 4
⊢ (x = ∅ →
(A +o x) = (A
+o ∅)) |
| 2 | 1 | eleq1d 1543 |
. . 3
⊢ (x = ∅ →
((A +o x) ∈ On ↔
(A +o ∅) ∈
On)) |
| 3 | | opreq2 3976 |
. . . 4
⊢ (x = y →
(A +o x) = (A
+o y)) |
| 4 | 3 | eleq1d 1543 |
. . 3
⊢ (x = y →
((A +o x) ∈ On ↔
(A +o y) ∈
On)) |
| 5 | | opreq2 3976 |
. . . 4
⊢ (x = suc y →
(A +o x) = (A
+o suc y)) |
| 6 | 5 | eleq1d 1543 |
. . 3
⊢ (x = suc y →
((A +o x) ∈ On ↔
(A +o suc y) ∈
On)) |
| 7 | | opreq2 3976 |
. . . 4
⊢ (x = B →
(A +o x) = (A
+o B)) |
| 8 | 7 | eleq1d 1543 |
. . 3
⊢ (x = B →
((A +o x) ∈ On ↔
(A +o B) ∈
On)) |
| 9 | | oa0 4162 |
. . . . 5
⊢ (A ∈ On →
(A +o ∅) = A) |
| 10 | 9 | eleq1d 1543 |
. . . 4
⊢ (A ∈ On →
((A +o ∅) ∈ On ↔
A ∈
On)) |
| 11 | 10 | ibir 595 |
. . 3
⊢ (A ∈ On →
(A +o ∅) ∈
On) |
| 12 | | oasuc 4170 |
. . . . . 6
⊢ ((A ∈ On ⋀ y ∈ On) → (A
+o suc y) = suc (A +o y)) |
| 13 | 12 | eleq1d 1543 |
. . . . 5
⊢ ((A ∈ On ⋀ y ∈ On) → ((A +o suc y) ∈ On ↔ suc
(A +o y) ∈
On)) |
| 14 | | suceloni 3069 |
. . . . 5
⊢ ((A +o y) ∈ On → suc
(A +o y) ∈ On) |
| 15 | 13, 14 | syl5bir 210 |
. . . 4
⊢ ((A ∈ On ⋀ y ∈ On) → ((A +o y) ∈ On →
(A +o suc y) ∈
On)) |
| 16 | 15 | expcom 374 |
. . 3
⊢ (y ∈ On →
(A ∈ On
→ ((A +o y) ∈ On →
(A +o suc y) ∈
On))) |
| 17 | | visset 1816 |
. . . . . . 7
⊢ x ∈
V |
| 18 | | oalim 4174 |
. . . . . . 7
⊢ ((A ∈ On ⋀ (x ∈ V ⋀ Lim
x)) → (A +o x) = ∪y ∈ x (A
+o y)) |
| 19 | 17, 18 | mpanr1 711 |
. . . . . 6
⊢ ((A ∈ On ⋀ Lim x)
→ (A +o x) = ∪y ∈ x (A
+o y)) |
| 20 | 19 | eleq1d 1543 |
. . . . 5
⊢ ((A ∈ On ⋀ Lim x)
→ ((A +o x) ∈ On ↔
∪y ∈ x (A +o y) ∈
On)) |
| 21 | | oprex 3990 |
. . . . . 6
⊢ (A +o y) ∈
V |
| 22 | 17, 21 | iunon 3916 |
. . . . 5
⊢ (∀y ∈ x (A +o y) ∈ On →
∪y ∈ x (A +o y) ∈ On) |
| 23 | 20, 22 | syl5bir 210 |
. . . 4
⊢ ((A ∈ On ⋀ Lim x)
→ (∀y ∈ x (A
+o y) ∈ On → (A
+o x) ∈ On)) |
| 24 | 23 | expcom 374 |
. . 3
⊢ (Lim x → (A
∈ On → (∀y ∈ x (A +o y) ∈ On →
(A +o x) ∈
On))) |
| 25 | 2, 4, 6, 8, 11, 16, 24 | tfinds3 3173 |
. 2
⊢ (B ∈ On →
(A ∈ On
→ (A +o B) ∈
On)) |
| 26 | 25 | impcom 351 |
1
⊢ ((A ∈ On ⋀ B ∈ On) → (A
+o B) ∈ On) |