Metamath Proof Explorer


Theorem oaomoencom

Description: Ordinal addition, multiplication, and exponentiation do not generally commute. Theorem 4.1 of Schloeder p. 11. (Contributed by RP, 30-Jan-2025)

Ref Expression
Assertion oaomoencom ⊢ ∃ a ∈ On ∃ b ∈ On ¬ a + 𝑜 b = b + 𝑜 a ∧ ∃ a ∈ On ∃ b ∈ On ¬ a ⋅ 𝑜 b = b ⋅ 𝑜 a ∧ ∃ a ∈ On ∃ b ∈ On ¬ a ↑ 𝑜 b = b ↑ 𝑜 a

Proof

Step Hyp Ref Expression
1 oancom ⊢ 1 𝑜 + 𝑜 ω ≠ ω + 𝑜 1 𝑜
2 1 neii ⊢ ¬ 1 𝑜 + 𝑜 ω = ω + 𝑜 1 𝑜
3 1on ⊢ 1 𝑜 ∈ On
4 omelon ⊢ ω ∈ On
5 oveq2 ⊢ b = ω → 1 𝑜 + 𝑜 b = 1 𝑜 + 𝑜 ω
6 oveq1 ⊢ b = ω → b + 𝑜 1 𝑜 = ω + 𝑜 1 𝑜
7 5 6 eqeq12d ⊢ b = ω → 1 𝑜 + 𝑜 b = b + 𝑜 1 𝑜 ↔ 1 𝑜 + 𝑜 ω = ω + 𝑜 1 𝑜
8 7 notbid ⊢ b = ω → ¬ 1 𝑜 + 𝑜 b = b + 𝑜 1 𝑜 ↔ ¬ 1 𝑜 + 𝑜 ω = ω + 𝑜 1 𝑜
9 8 rspcev ⊢ ω ∈ On ∧ ¬ 1 𝑜 + 𝑜 ω = ω + 𝑜 1 𝑜 → ∃ b ∈ On ¬ 1 𝑜 + 𝑜 b = b + 𝑜 1 𝑜
10 4 9 mpan ⊢ ¬ 1 𝑜 + 𝑜 ω = ω + 𝑜 1 𝑜 → ∃ b ∈ On ¬ 1 𝑜 + 𝑜 b = b + 𝑜 1 𝑜
11 oveq1 ⊢ a = 1 𝑜 → a + 𝑜 b = 1 𝑜 + 𝑜 b
12 oveq2 ⊢ a = 1 𝑜 → b + 𝑜 a = b + 𝑜 1 𝑜
13 11 12 eqeq12d ⊢ a = 1 𝑜 → a + 𝑜 b = b + 𝑜 a ↔ 1 𝑜 + 𝑜 b = b + 𝑜 1 𝑜
14 13 notbid ⊢ a = 1 𝑜 → ¬ a + 𝑜 b = b + 𝑜 a ↔ ¬ 1 𝑜 + 𝑜 b = b + 𝑜 1 𝑜
15 14 rexbidv ⊢ a = 1 𝑜 → ∃ b ∈ On ¬ a + 𝑜 b = b + 𝑜 a ↔ ∃ b ∈ On ¬ 1 𝑜 + 𝑜 b = b + 𝑜 1 𝑜
16 15 rspcev ⊢ 1 𝑜 ∈ On ∧ ∃ b ∈ On ¬ 1 𝑜 + 𝑜 b = b + 𝑜 1 𝑜 → ∃ a ∈ On ∃ b ∈ On ¬ a + 𝑜 b = b + 𝑜 a
17 3 10 16 sylancr ⊢ ¬ 1 𝑜 + 𝑜 ω = ω + 𝑜 1 𝑜 → ∃ a ∈ On ∃ b ∈ On ¬ a + 𝑜 b = b + 𝑜 a
18 2 17 ax-mp ⊢ ∃ a ∈ On ∃ b ∈ On ¬ a + 𝑜 b = b + 𝑜 a
19 4 4 pm3.2i ⊢ ω ∈ On ∧ ω ∈ On
20 peano1 ⊢ ∅ ∈ ω
21 19 20 pm3.2i ⊢ ω ∈ On ∧ ω ∈ On ∧ ∅ ∈ ω
22 oaord1 ⊢ ω ∈ On ∧ ω ∈ On → ∅ ∈ ω ↔ ω ∈ ω + 𝑜 ω
23 22 biimpa ⊢ ω ∈ On ∧ ω ∈ On ∧ ∅ ∈ ω → ω ∈ ω + 𝑜 ω
24 elneq ⊢ ω ∈ ω + 𝑜 ω → ω ≠ ω + 𝑜 ω
25 21 23 24 mp2b ⊢ ω ≠ ω + 𝑜 ω
26 2omomeqom ⊢ 2 𝑜 ⋅ 𝑜 ω = ω
27 df-2o ⊢ 2 𝑜 = suc ⁡ 1 𝑜
28 27 oveq2i ⊢ ω ⋅ 𝑜 2 𝑜 = ω ⋅ 𝑜 suc ⁡ 1 𝑜
29 omsuc ⊢ ω ∈ On ∧ 1 𝑜 ∈ On → ω ⋅ 𝑜 suc ⁡ 1 𝑜 = ω ⋅ 𝑜 1 𝑜 + 𝑜 ω
30 4 3 29 mp2an ⊢ ω ⋅ 𝑜 suc ⁡ 1 𝑜 = ω ⋅ 𝑜 1 𝑜 + 𝑜 ω
31 om1 ⊢ ω ∈ On → ω ⋅ 𝑜 1 𝑜 = ω
32 4 31 ax-mp ⊢ ω ⋅ 𝑜 1 𝑜 = ω
33 32 oveq1i ⊢ ω ⋅ 𝑜 1 𝑜 + 𝑜 ω = ω + 𝑜 ω
34 28 30 33 3eqtri ⊢ ω ⋅ 𝑜 2 𝑜 = ω + 𝑜 ω
35 26 34 neeq12i ⊢ 2 𝑜 ⋅ 𝑜 ω ≠ ω ⋅ 𝑜 2 𝑜 ↔ ω ≠ ω + 𝑜 ω
36 25 35 mpbir ⊢ 2 𝑜 ⋅ 𝑜 ω ≠ ω ⋅ 𝑜 2 𝑜
37 36 neii ⊢ ¬ 2 𝑜 ⋅ 𝑜 ω = ω ⋅ 𝑜 2 𝑜
38 2on ⊢ 2 𝑜 ∈ On
39 oveq2 ⊢ b = ω → 2 𝑜 ⋅ 𝑜 b = 2 𝑜 ⋅ 𝑜 ω
40 oveq1 ⊢ b = ω → b ⋅ 𝑜 2 𝑜 = ω ⋅ 𝑜 2 𝑜
41 39 40 eqeq12d ⊢ b = ω → 2 𝑜 ⋅ 𝑜 b = b ⋅ 𝑜 2 𝑜 ↔ 2 𝑜 ⋅ 𝑜 ω = ω ⋅ 𝑜 2 𝑜
42 41 notbid ⊢ b = ω → ¬ 2 𝑜 ⋅ 𝑜 b = b ⋅ 𝑜 2 𝑜 ↔ ¬ 2 𝑜 ⋅ 𝑜 ω = ω ⋅ 𝑜 2 𝑜
43 42 rspcev ⊢ ω ∈ On ∧ ¬ 2 𝑜 ⋅ 𝑜 ω = ω ⋅ 𝑜 2 𝑜 → ∃ b ∈ On ¬ 2 𝑜 ⋅ 𝑜 b = b ⋅ 𝑜 2 𝑜
44 4 43 mpan ⊢ ¬ 2 𝑜 ⋅ 𝑜 ω = ω ⋅ 𝑜 2 𝑜 → ∃ b ∈ On ¬ 2 𝑜 ⋅ 𝑜 b = b ⋅ 𝑜 2 𝑜
45 oveq1 ⊢ a = 2 𝑜 → a ⋅ 𝑜 b = 2 𝑜 ⋅ 𝑜 b
46 oveq2 ⊢ a = 2 𝑜 → b ⋅ 𝑜 a = b ⋅ 𝑜 2 𝑜
47 45 46 eqeq12d ⊢ a = 2 𝑜 → a ⋅ 𝑜 b = b ⋅ 𝑜 a ↔ 2 𝑜 ⋅ 𝑜 b = b ⋅ 𝑜 2 𝑜
48 47 notbid ⊢ a = 2 𝑜 → ¬ a ⋅ 𝑜 b = b ⋅ 𝑜 a ↔ ¬ 2 𝑜 ⋅ 𝑜 b = b ⋅ 𝑜 2 𝑜
49 48 rexbidv ⊢ a = 2 𝑜 → ∃ b ∈ On ¬ a ⋅ 𝑜 b = b ⋅ 𝑜 a ↔ ∃ b ∈ On ¬ 2 𝑜 ⋅ 𝑜 b = b ⋅ 𝑜 2 𝑜
50 49 rspcev ⊢ 2 𝑜 ∈ On ∧ ∃ b ∈ On ¬ 2 𝑜 ⋅ 𝑜 b = b ⋅ 𝑜 2 𝑜 → ∃ a ∈ On ∃ b ∈ On ¬ a ⋅ 𝑜 b = b ⋅ 𝑜 a
51 38 44 50 sylancr ⊢ ¬ 2 𝑜 ⋅ 𝑜 ω = ω ⋅ 𝑜 2 𝑜 → ∃ a ∈ On ∃ b ∈ On ¬ a ⋅ 𝑜 b = b ⋅ 𝑜 a
52 37 51 ax-mp ⊢ ∃ a ∈ On ∃ b ∈ On ¬ a ⋅ 𝑜 b = b ⋅ 𝑜 a
53 1onn ⊢ 1 𝑜 ∈ ω
54 21 53 pm3.2i ⊢ ω ∈ On ∧ ω ∈ On ∧ ∅ ∈ ω ∧ 1 𝑜 ∈ ω
55 4 31 mp1i ⊢ ω ∈ On ∧ ω ∈ On ∧ ∅ ∈ ω ∧ 1 𝑜 ∈ ω → ω ⋅ 𝑜 1 𝑜 = ω
56 omordi ⊢ ω ∈ On ∧ ω ∈ On ∧ ∅ ∈ ω → 1 𝑜 ∈ ω → ω ⋅ 𝑜 1 𝑜 ∈ ω ⋅ 𝑜 ω
57 56 imp ⊢ ω ∈ On ∧ ω ∈ On ∧ ∅ ∈ ω ∧ 1 𝑜 ∈ ω → ω ⋅ 𝑜 1 𝑜 ∈ ω ⋅ 𝑜 ω
58 55 57 eqeltrrd ⊢ ω ∈ On ∧ ω ∈ On ∧ ∅ ∈ ω ∧ 1 𝑜 ∈ ω → ω ∈ ω ⋅ 𝑜 ω
59 elneq ⊢ ω ∈ ω ⋅ 𝑜 ω → ω ≠ ω ⋅ 𝑜 ω
60 54 58 59 mp2b ⊢ ω ≠ ω ⋅ 𝑜 ω
61 2onn ⊢ 2 𝑜 ∈ ω
62 1oelpr ⊢ 1 𝑜 ∈ ∅ 1 𝑜
63 df2o3 ⊢ 2 𝑜 = ∅ 1 𝑜
64 62 63 eleqtrri ⊢ 1 𝑜 ∈ 2 𝑜
65 nnoeomeqom ⊢ 2 𝑜 ∈ ω ∧ 1 𝑜 ∈ 2 𝑜 → 2 𝑜 ↑ 𝑜 ω = ω
66 61 64 65 mp2an ⊢ 2 𝑜 ↑ 𝑜 ω = ω
67 27 oveq2i ⊢ ω ↑ 𝑜 2 𝑜 = ω ↑ 𝑜 suc ⁡ 1 𝑜
68 oesuc ⊢ ω ∈ On ∧ 1 𝑜 ∈ On → ω ↑ 𝑜 suc ⁡ 1 𝑜 = ω ↑ 𝑜 1 𝑜 ⋅ 𝑜 ω
69 4 3 68 mp2an ⊢ ω ↑ 𝑜 suc ⁡ 1 𝑜 = ω ↑ 𝑜 1 𝑜 ⋅ 𝑜 ω
70 oe1 ⊢ ω ∈ On → ω ↑ 𝑜 1 𝑜 = ω
71 4 70 ax-mp ⊢ ω ↑ 𝑜 1 𝑜 = ω
72 71 oveq1i ⊢ ω ↑ 𝑜 1 𝑜 ⋅ 𝑜 ω = ω ⋅ 𝑜 ω
73 67 69 72 3eqtri ⊢ ω ↑ 𝑜 2 𝑜 = ω ⋅ 𝑜 ω
74 66 73 neeq12i ⊢ 2 𝑜 ↑ 𝑜 ω ≠ ω ↑ 𝑜 2 𝑜 ↔ ω ≠ ω ⋅ 𝑜 ω
75 60 74 mpbir ⊢ 2 𝑜 ↑ 𝑜 ω ≠ ω ↑ 𝑜 2 𝑜
76 75 neii ⊢ ¬ 2 𝑜 ↑ 𝑜 ω = ω ↑ 𝑜 2 𝑜
77 oveq2 ⊢ b = ω → 2 𝑜 ↑ 𝑜 b = 2 𝑜 ↑ 𝑜 ω
78 oveq1 ⊢ b = ω → b ↑ 𝑜 2 𝑜 = ω ↑ 𝑜 2 𝑜
79 77 78 eqeq12d ⊢ b = ω → 2 𝑜 ↑ 𝑜 b = b ↑ 𝑜 2 𝑜 ↔ 2 𝑜 ↑ 𝑜 ω = ω ↑ 𝑜 2 𝑜
80 79 notbid ⊢ b = ω → ¬ 2 𝑜 ↑ 𝑜 b = b ↑ 𝑜 2 𝑜 ↔ ¬ 2 𝑜 ↑ 𝑜 ω = ω ↑ 𝑜 2 𝑜
81 80 rspcev ⊢ ω ∈ On ∧ ¬ 2 𝑜 ↑ 𝑜 ω = ω ↑ 𝑜 2 𝑜 → ∃ b ∈ On ¬ 2 𝑜 ↑ 𝑜 b = b ↑ 𝑜 2 𝑜
82 4 81 mpan ⊢ ¬ 2 𝑜 ↑ 𝑜 ω = ω ↑ 𝑜 2 𝑜 → ∃ b ∈ On ¬ 2 𝑜 ↑ 𝑜 b = b ↑ 𝑜 2 𝑜
83 oveq1 ⊢ a = 2 𝑜 → a ↑ 𝑜 b = 2 𝑜 ↑ 𝑜 b
84 oveq2 ⊢ a = 2 𝑜 → b ↑ 𝑜 a = b ↑ 𝑜 2 𝑜
85 83 84 eqeq12d ⊢ a = 2 𝑜 → a ↑ 𝑜 b = b ↑ 𝑜 a ↔ 2 𝑜 ↑ 𝑜 b = b ↑ 𝑜 2 𝑜
86 85 notbid ⊢ a = 2 𝑜 → ¬ a ↑ 𝑜 b = b ↑ 𝑜 a ↔ ¬ 2 𝑜 ↑ 𝑜 b = b ↑ 𝑜 2 𝑜
87 86 rexbidv ⊢ a = 2 𝑜 → ∃ b ∈ On ¬ a ↑ 𝑜 b = b ↑ 𝑜 a ↔ ∃ b ∈ On ¬ 2 𝑜 ↑ 𝑜 b = b ↑ 𝑜 2 𝑜
88 87 rspcev ⊢ 2 𝑜 ∈ On ∧ ∃ b ∈ On ¬ 2 𝑜 ↑ 𝑜 b = b ↑ 𝑜 2 𝑜 → ∃ a ∈ On ∃ b ∈ On ¬ a ↑ 𝑜 b = b ↑ 𝑜 a
89 38 82 88 sylancr ⊢ ¬ 2 𝑜 ↑ 𝑜 ω = ω ↑ 𝑜 2 𝑜 → ∃ a ∈ On ∃ b ∈ On ¬ a ↑ 𝑜 b = b ↑ 𝑜 a
90 76 89 ax-mp ⊢ ∃ a ∈ On ∃ b ∈ On ¬ a ↑ 𝑜 b = b ↑ 𝑜 a
91 18 52 90 3pm3.2i ⊢ ∃ a ∈ On ∃ b ∈ On ¬ a + 𝑜 b = b + 𝑜 a ∧ ∃ a ∈ On ∃ b ∈ On ¬ a ⋅ 𝑜 b = b ⋅ 𝑜 a ∧ ∃ a ∈ On ∃ b ∈ On ¬ a ↑ 𝑜 b = b ↑ 𝑜 a