Step |
Hyp |
Ref |
Expression |
1 |
|
1rp |
โข 1 โ โ+ |
2 |
|
modval |
โข ( ( ๐ด โ โ โง 1 โ โ+ ) โ ( ๐ด mod 1 ) = ( ๐ด โ ( 1 ยท ( โ โ ( ๐ด / 1 ) ) ) ) ) |
3 |
1 2
|
mpan2 |
โข ( ๐ด โ โ โ ( ๐ด mod 1 ) = ( ๐ด โ ( 1 ยท ( โ โ ( ๐ด / 1 ) ) ) ) ) |
4 |
|
recn |
โข ( ๐ด โ โ โ ๐ด โ โ ) |
5 |
4
|
div1d |
โข ( ๐ด โ โ โ ( ๐ด / 1 ) = ๐ด ) |
6 |
5
|
fveq2d |
โข ( ๐ด โ โ โ ( โ โ ( ๐ด / 1 ) ) = ( โ โ ๐ด ) ) |
7 |
6
|
oveq2d |
โข ( ๐ด โ โ โ ( 1 ยท ( โ โ ( ๐ด / 1 ) ) ) = ( 1 ยท ( โ โ ๐ด ) ) ) |
8 |
|
reflcl |
โข ( ๐ด โ โ โ ( โ โ ๐ด ) โ โ ) |
9 |
8
|
recnd |
โข ( ๐ด โ โ โ ( โ โ ๐ด ) โ โ ) |
10 |
9
|
mullidd |
โข ( ๐ด โ โ โ ( 1 ยท ( โ โ ๐ด ) ) = ( โ โ ๐ด ) ) |
11 |
7 10
|
eqtrd |
โข ( ๐ด โ โ โ ( 1 ยท ( โ โ ( ๐ด / 1 ) ) ) = ( โ โ ๐ด ) ) |
12 |
11
|
oveq2d |
โข ( ๐ด โ โ โ ( ๐ด โ ( 1 ยท ( โ โ ( ๐ด / 1 ) ) ) ) = ( ๐ด โ ( โ โ ๐ด ) ) ) |
13 |
3 12
|
eqtrd |
โข ( ๐ด โ โ โ ( ๐ด mod 1 ) = ( ๐ด โ ( โ โ ๐ด ) ) ) |