Proof of Theorem om1r
| Step | Hyp | Ref
| Expression |
| 1 | | opreq2 3007 |
. . 3
⊢ (x =
∅ → (1o ·o x) = (1o
·o ∅)) |
| 2 | | id 9 |
. . 3
⊢ (x =
∅ → x = ∅) |
| 3 | 1, 2 | cleq12d 1115 |
. 2
⊢ (x =
∅ → ((1o ·o x) = x ↔
(1o ·o ∅) =
∅)) |
| 4 | | opreq2 3007 |
. . 3
⊢ (x =
y → (1o
·o x) =
(1o ·o y)) |
| 5 | | id 9 |
. . 3
⊢ (x =
y → x = y) |
| 6 | 4, 5 | cleq12d 1115 |
. 2
⊢ (x =
y → ((1o
·o x) = x ↔ (1o
·o y) = y)) |
| 7 | | opreq2 3007 |
. . 3
⊢ (x =
suc y → (1o
·o x) =
(1o ·o suc y)) |
| 8 | | id 9 |
. . 3
⊢ (x =
suc y → x = suc y) |
| 9 | 7, 8 | cleq12d 1115 |
. 2
⊢ (x =
suc y → ((1o
·o x) = x ↔ (1o
·o suc y) = suc
y)) |
| 10 | | opreq2 3007 |
. . 3
⊢ (x =
A → (1o
·o x) =
(1o ·o A)) |
| 11 | | id 9 |
. . 3
⊢ (x =
A → x = A) |
| 12 | 10, 11 | cleq12d 1115 |
. 2
⊢ (x =
A → ((1o
·o x) = x ↔ (1o
·o A) = A)) |
| 13 | | om0x 3126 |
. 2
⊢ (1o
·o ∅) = ∅ |
| 14 | | 1o 3109 |
. . . . . 6
⊢ 1o ∈ On |
| 15 | | omsuc 3133 |
. . . . . 6
⊢ ((1o ∈ On ∧
y ∈ On) → (1o
·o suc y) =
((1o ·o y) +o
1o)) |
| 16 | 14, 15 | mpan 518 |
. . . . 5
⊢ (y
∈ On → (1o ·o suc y) = ((1o
·o y)
+o 1o)) |
| 17 | | opreq1 3006 |
. . . . 5
⊢ ((1o
·o y) = y → ((1o
·o y)
+o 1o) = (y +o
1o)) |
| 18 | 16, 17 | sylan9eq 1144 |
. . . 4
⊢ ((y
∈ On ∧ (1o ·o y) = y) →
(1o ·o suc y) = (y
+o 1o)) |
| 19 | | oa1suc 3132 |
. . . . 5
⊢ (y
∈ On → (y +o
1o) = suc y) |
| 20 | 19 | adantr 306 |
. . . 4
⊢ ((y
∈ On ∧ (1o ·o y) = y) →
(y +o
1o) = suc y) |
| 21 | 18, 20 | eqtrd 1128 |
. . 3
⊢ ((y
∈ On ∧ (1o ·o y) = y) →
(1o ·o suc y) = suc y) |
| 22 | 21 | exp 291 |
. 2
⊢ (y
∈ On → ((1o ·o y) = y →
(1o ·o suc y) = suc y)) |
| 23 | | visset 1350 |
. . . . 5
⊢ x
∈ V |
| 24 | | omlim 3136 |
. . . . . 6
⊢ ((1o ∈ On ∧
(x ∈ V ∧ Lim x)) → (1o
·o x) = ∪y ∈ x (1o ·o
y)) |
| 25 | 14, 24 | mpan 518 |
. . . . 5
⊢ ((x
∈ V ∧ Lim x) →
(1o ·o x) = ∪y ∈ x
(1o ·o y)) |
| 26 | 23, 25 | mpan 518 |
. . . 4
⊢ (Lim x
→ (1o ·o x) = ∪y ∈ x
(1o ·o y)) |
| 27 | | limuni 2284 |
. . . 4
⊢ (Lim x
→ x = ∪x) |
| 28 | 26, 27 | cleq12d 1115 |
. . 3
⊢ (Lim x
→ ((1o ·o x) = x ↔
∪y ∈
x (1o
·o y) = ∪x)) |
| 29 | | iuneq2 2006 |
. . . 4
⊢ (∀y ∈ x
(1o ·o y) = y →
∪y ∈
x (1o
·o y) = ∪y ∈ x y) |
| 30 | | uniiun 2026 |
. . . 4
⊢ ∪x = ∪y ∈ x
y |
| 31 | 29, 30 | syl6eqr 1142 |
. . 3
⊢ (∀y ∈ x
(1o ·o y) = y →
∪y ∈
x (1o
·o y) = ∪x) |
| 32 | 28, 31 | syl5bir 184 |
. 2
⊢ (Lim x
→ (∀y ∈ x (1o ·o
y) = y
→ (1o ·o x) = x)) |
| 33 | 3, 6, 9, 12, 13, 22, 32 | tfinds 2401 |
1
⊢ (A
∈ On → (1o ·o A) = A) |