Proof of Theorem oneo
Step | Hyp | Ref
| Expression |
1 | | onnbtwn 6342 |
. . 3
⊢ (𝐴 ∈ On → ¬ (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ suc 𝐴)) |
2 | 1 | 3ad2ant1 1131 |
. 2
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝐶 = (2o
·o 𝐴))
→ ¬ (𝐴 ∈
𝐵 ∧ 𝐵 ∈ suc 𝐴)) |
3 | | suceq 6316 |
. . . . 5
⊢ (𝐶 = (2o
·o 𝐴)
→ suc 𝐶 = suc
(2o ·o 𝐴)) |
4 | 3 | eqeq1d 2740 |
. . . 4
⊢ (𝐶 = (2o
·o 𝐴)
→ (suc 𝐶 =
(2o ·o 𝐵) ↔ suc (2o
·o 𝐴) =
(2o ·o 𝐵))) |
5 | 4 | 3ad2ant3 1133 |
. . 3
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝐶 = (2o
·o 𝐴))
→ (suc 𝐶 =
(2o ·o 𝐵) ↔ suc (2o
·o 𝐴) =
(2o ·o 𝐵))) |
6 | | ovex 7288 |
. . . . . . . 8
⊢
(2o ·o 𝐴) ∈ V |
7 | 6 | sucid 6330 |
. . . . . . 7
⊢
(2o ·o 𝐴) ∈ suc (2o
·o 𝐴) |
8 | | eleq2 2827 |
. . . . . . 7
⊢ (suc
(2o ·o 𝐴) = (2o ·o
𝐵) → ((2o
·o 𝐴)
∈ suc (2o ·o 𝐴) ↔ (2o ·o
𝐴) ∈ (2o
·o 𝐵))) |
9 | 7, 8 | mpbii 232 |
. . . . . 6
⊢ (suc
(2o ·o 𝐴) = (2o ·o
𝐵) → (2o
·o 𝐴)
∈ (2o ·o 𝐵)) |
10 | | 2on 8275 |
. . . . . . . 8
⊢
2o ∈ On |
11 | | omord 8361 |
. . . . . . . 8
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 2o
∈ On) → ((𝐴
∈ 𝐵 ∧ ∅
∈ 2o) ↔ (2o ·o 𝐴) ∈ (2o
·o 𝐵))) |
12 | 10, 11 | mp3an3 1448 |
. . . . . . 7
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐴 ∈ 𝐵 ∧ ∅ ∈ 2o) ↔
(2o ·o 𝐴) ∈ (2o ·o
𝐵))) |
13 | | simpl 482 |
. . . . . . 7
⊢ ((𝐴 ∈ 𝐵 ∧ ∅ ∈ 2o) →
𝐴 ∈ 𝐵) |
14 | 12, 13 | syl6bir 253 |
. . . . . 6
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) →
((2o ·o 𝐴) ∈ (2o ·o
𝐵) → 𝐴 ∈ 𝐵)) |
15 | 9, 14 | syl5 34 |
. . . . 5
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (suc
(2o ·o 𝐴) = (2o ·o
𝐵) → 𝐴 ∈ 𝐵)) |
16 | | simpr 484 |
. . . . . . . . 9
⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ suc
(2o ·o 𝐴) = (2o ·o
𝐵)) → suc
(2o ·o 𝐴) = (2o ·o
𝐵)) |
17 | | omcl 8328 |
. . . . . . . . . . . . 13
⊢
((2o ∈ On ∧ 𝐴 ∈ On) → (2o
·o 𝐴)
∈ On) |
18 | 10, 17 | mpan 686 |
. . . . . . . . . . . 12
⊢ (𝐴 ∈ On → (2o
·o 𝐴)
∈ On) |
19 | | oa1suc 8323 |
. . . . . . . . . . . 12
⊢
((2o ·o 𝐴) ∈ On → ((2o
·o 𝐴)
+o 1o) = suc (2o ·o 𝐴)) |
20 | 18, 19 | syl 17 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ On →
((2o ·o 𝐴) +o 1o) = suc
(2o ·o 𝐴)) |
21 | | 1oex 8280 |
. . . . . . . . . . . . . . 15
⊢
1o ∈ V |
22 | 21 | sucid 6330 |
. . . . . . . . . . . . . 14
⊢
1o ∈ suc 1o |
23 | | df-2o 8268 |
. . . . . . . . . . . . . 14
⊢
2o = suc 1o |
24 | 22, 23 | eleqtrri 2838 |
. . . . . . . . . . . . 13
⊢
1o ∈ 2o |
25 | | 1on 8274 |
. . . . . . . . . . . . . 14
⊢
1o ∈ On |
26 | | oaord 8340 |
. . . . . . . . . . . . . 14
⊢
((1o ∈ On ∧ 2o ∈ On ∧
(2o ·o 𝐴) ∈ On) → (1o ∈
2o ↔ ((2o ·o 𝐴) +o 1o) ∈
((2o ·o 𝐴) +o
2o))) |
27 | 25, 10, 18, 26 | mp3an12i 1463 |
. . . . . . . . . . . . 13
⊢ (𝐴 ∈ On → (1o
∈ 2o ↔ ((2o ·o 𝐴) +o 1o)
∈ ((2o ·o 𝐴) +o
2o))) |
28 | 24, 27 | mpbii 232 |
. . . . . . . . . . . 12
⊢ (𝐴 ∈ On →
((2o ·o 𝐴) +o 1o) ∈
((2o ·o 𝐴) +o
2o)) |
29 | | omsuc 8318 |
. . . . . . . . . . . . 13
⊢
((2o ∈ On ∧ 𝐴 ∈ On) → (2o
·o suc 𝐴)
= ((2o ·o 𝐴) +o
2o)) |
30 | 10, 29 | mpan 686 |
. . . . . . . . . . . 12
⊢ (𝐴 ∈ On → (2o
·o suc 𝐴)
= ((2o ·o 𝐴) +o
2o)) |
31 | 28, 30 | eleqtrrd 2842 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ On →
((2o ·o 𝐴) +o 1o) ∈
(2o ·o suc 𝐴)) |
32 | 20, 31 | eqeltrrd 2840 |
. . . . . . . . . 10
⊢ (𝐴 ∈ On → suc
(2o ·o 𝐴) ∈ (2o ·o
suc 𝐴)) |
33 | 32 | ad2antrr 722 |
. . . . . . . . 9
⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ suc
(2o ·o 𝐴) = (2o ·o
𝐵)) → suc
(2o ·o 𝐴) ∈ (2o ·o
suc 𝐴)) |
34 | 16, 33 | eqeltrrd 2840 |
. . . . . . . 8
⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ suc
(2o ·o 𝐴) = (2o ·o
𝐵)) → (2o
·o 𝐵)
∈ (2o ·o suc 𝐴)) |
35 | | suceloni 7635 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ On → suc 𝐴 ∈ On) |
36 | | omord 8361 |
. . . . . . . . . . . 12
⊢ ((𝐵 ∈ On ∧ suc 𝐴 ∈ On ∧ 2o
∈ On) → ((𝐵
∈ suc 𝐴 ∧ ∅
∈ 2o) ↔ (2o ·o 𝐵) ∈ (2o
·o suc 𝐴))) |
37 | 10, 36 | mp3an3 1448 |
. . . . . . . . . . 11
⊢ ((𝐵 ∈ On ∧ suc 𝐴 ∈ On) → ((𝐵 ∈ suc 𝐴 ∧ ∅ ∈ 2o) ↔
(2o ·o 𝐵) ∈ (2o ·o
suc 𝐴))) |
38 | 35, 37 | sylan2 592 |
. . . . . . . . . 10
⊢ ((𝐵 ∈ On ∧ 𝐴 ∈ On) → ((𝐵 ∈ suc 𝐴 ∧ ∅ ∈ 2o) ↔
(2o ·o 𝐵) ∈ (2o ·o
suc 𝐴))) |
39 | 38 | ancoms 458 |
. . . . . . . . 9
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐵 ∈ suc 𝐴 ∧ ∅ ∈ 2o) ↔
(2o ·o 𝐵) ∈ (2o ·o
suc 𝐴))) |
40 | 39 | adantr 480 |
. . . . . . . 8
⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ suc
(2o ·o 𝐴) = (2o ·o
𝐵)) → ((𝐵 ∈ suc 𝐴 ∧ ∅ ∈ 2o) ↔
(2o ·o 𝐵) ∈ (2o ·o
suc 𝐴))) |
41 | 34, 40 | mpbird 256 |
. . . . . . 7
⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ suc
(2o ·o 𝐴) = (2o ·o
𝐵)) → (𝐵 ∈ suc 𝐴 ∧ ∅ ∈
2o)) |
42 | 41 | simpld 494 |
. . . . . 6
⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ suc
(2o ·o 𝐴) = (2o ·o
𝐵)) → 𝐵 ∈ suc 𝐴) |
43 | 42 | ex 412 |
. . . . 5
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (suc
(2o ·o 𝐴) = (2o ·o
𝐵) → 𝐵 ∈ suc 𝐴)) |
44 | 15, 43 | jcad 512 |
. . . 4
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (suc
(2o ·o 𝐴) = (2o ·o
𝐵) → (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ suc 𝐴))) |
45 | 44 | 3adant3 1130 |
. . 3
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝐶 = (2o
·o 𝐴))
→ (suc (2o ·o 𝐴) = (2o ·o
𝐵) → (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ suc 𝐴))) |
46 | 5, 45 | sylbid 239 |
. 2
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝐶 = (2o
·o 𝐴))
→ (suc 𝐶 =
(2o ·o 𝐵) → (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ suc 𝐴))) |
47 | 2, 46 | mtod 197 |
1
⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝐶 = (2o
·o 𝐴))
→ ¬ suc 𝐶 =
(2o ·o 𝐵)) |