Step |
Hyp |
Ref |
Expression |
1 |
|
0r |
|
2 |
|
1sr |
|
3 |
|
mulcnsr |
|
4 |
1 2 1 2 3
|
mp4an |
|
5 |
|
00sr |
|
6 |
1 5
|
ax-mp |
|
7 |
|
1idsr |
|
8 |
2 7
|
ax-mp |
|
9 |
8
|
oveq2i |
|
10 |
|
m1r |
|
11 |
|
1idsr |
|
12 |
10 11
|
ax-mp |
|
13 |
9 12
|
eqtri |
|
14 |
6 13
|
oveq12i |
|
15 |
|
addcomsr |
|
16 |
|
0idsr |
|
17 |
10 16
|
ax-mp |
|
18 |
14 15 17
|
3eqtri |
|
19 |
|
00sr |
|
20 |
2 19
|
ax-mp |
|
21 |
|
1idsr |
|
22 |
1 21
|
ax-mp |
|
23 |
20 22
|
oveq12i |
|
24 |
|
0idsr |
|
25 |
1 24
|
ax-mp |
|
26 |
23 25
|
eqtri |
|
27 |
18 26
|
opeq12i |
|
28 |
4 27
|
eqtri |
|
29 |
28
|
oveq1i |
|
30 |
|
addresr |
|
31 |
10 2 30
|
mp2an |
|
32 |
|
m1p1sr |
|
33 |
32
|
opeq1i |
|
34 |
29 31 33
|
3eqtri |
|
35 |
|
df-i |
|
36 |
35 35
|
oveq12i |
|
37 |
|
df-1 |
|
38 |
36 37
|
oveq12i |
|
39 |
|
df-0 |
|
40 |
34 38 39
|
3eqtr4i |
|