Step |
Hyp |
Ref |
Expression |
1 |
|
oveq2 |
โข ( ๐ฅ = โ
โ ( โ
ยทo ๐ฅ ) = ( โ
ยทo โ
) ) |
2 |
1
|
eqeq1d |
โข ( ๐ฅ = โ
โ ( ( โ
ยทo ๐ฅ ) = โ
โ ( โ
ยทo โ
) = โ
) ) |
3 |
|
oveq2 |
โข ( ๐ฅ = ๐ฆ โ ( โ
ยทo ๐ฅ ) = ( โ
ยทo ๐ฆ ) ) |
4 |
3
|
eqeq1d |
โข ( ๐ฅ = ๐ฆ โ ( ( โ
ยทo ๐ฅ ) = โ
โ ( โ
ยทo ๐ฆ ) = โ
) ) |
5 |
|
oveq2 |
โข ( ๐ฅ = suc ๐ฆ โ ( โ
ยทo ๐ฅ ) = ( โ
ยทo suc ๐ฆ ) ) |
6 |
5
|
eqeq1d |
โข ( ๐ฅ = suc ๐ฆ โ ( ( โ
ยทo ๐ฅ ) = โ
โ ( โ
ยทo suc ๐ฆ ) = โ
) ) |
7 |
|
oveq2 |
โข ( ๐ฅ = ๐ด โ ( โ
ยทo ๐ฅ ) = ( โ
ยทo ๐ด ) ) |
8 |
7
|
eqeq1d |
โข ( ๐ฅ = ๐ด โ ( ( โ
ยทo ๐ฅ ) = โ
โ ( โ
ยทo ๐ด ) = โ
) ) |
9 |
|
0elon |
โข โ
โ On |
10 |
|
om0 |
โข ( โ
โ On โ ( โ
ยทo โ
) = โ
) |
11 |
9 10
|
ax-mp |
โข ( โ
ยทo โ
) = โ
|
12 |
|
oveq1 |
โข ( ( โ
ยทo ๐ฆ ) = โ
โ ( ( โ
ยทo ๐ฆ ) +o โ
) = ( โ
+o โ
) ) |
13 |
|
oa0 |
โข ( โ
โ On โ ( โ
+o โ
) = โ
) |
14 |
9 13
|
ax-mp |
โข ( โ
+o โ
) = โ
|
15 |
12 14
|
eqtrdi |
โข ( ( โ
ยทo ๐ฆ ) = โ
โ ( ( โ
ยทo ๐ฆ ) +o โ
) = โ
) |
16 |
|
peano1 |
โข โ
โ ฯ |
17 |
|
nnmsuc |
โข ( ( โ
โ ฯ โง ๐ฆ โ ฯ ) โ ( โ
ยทo suc ๐ฆ ) = ( ( โ
ยทo ๐ฆ ) +o โ
) ) |
18 |
16 17
|
mpan |
โข ( ๐ฆ โ ฯ โ ( โ
ยทo suc ๐ฆ ) = ( ( โ
ยทo ๐ฆ ) +o โ
) ) |
19 |
18
|
eqeq1d |
โข ( ๐ฆ โ ฯ โ ( ( โ
ยทo suc ๐ฆ ) = โ
โ ( ( โ
ยทo ๐ฆ ) +o โ
) = โ
) ) |
20 |
15 19
|
imbitrrid |
โข ( ๐ฆ โ ฯ โ ( ( โ
ยทo ๐ฆ ) = โ
โ ( โ
ยทo suc ๐ฆ ) = โ
) ) |
21 |
2 4 6 8 11 20
|
finds |
โข ( ๐ด โ ฯ โ ( โ
ยทo ๐ด ) = โ
) |