Metamath Proof Explorer


Theorem modvalr

Description: The value of the modulo operation (multiplication in reversed order). (Contributed by Alexander van der Vekens, 14-Apr-2018)

Ref Expression
Assertion modvalr ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„+ ) โ†’ ( ๐ด mod ๐ต ) = ( ๐ด โˆ’ ( ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ยท ๐ต ) ) )

Proof

Step Hyp Ref Expression
1 modval โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„+ ) โ†’ ( ๐ด mod ๐ต ) = ( ๐ด โˆ’ ( ๐ต ยท ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ) ) )
2 rpcn โŠข ( ๐ต โˆˆ โ„+ โ†’ ๐ต โˆˆ โ„‚ )
3 2 adantl โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„+ ) โ†’ ๐ต โˆˆ โ„‚ )
4 rerpdivcl โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„+ ) โ†’ ( ๐ด / ๐ต ) โˆˆ โ„ )
5 reflcl โŠข ( ( ๐ด / ๐ต ) โˆˆ โ„ โ†’ ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) โˆˆ โ„ )
6 5 recnd โŠข ( ( ๐ด / ๐ต ) โˆˆ โ„ โ†’ ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) โˆˆ โ„‚ )
7 4 6 syl โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„+ ) โ†’ ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) โˆˆ โ„‚ )
8 3 7 mulcomd โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„+ ) โ†’ ( ๐ต ยท ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ) = ( ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ยท ๐ต ) )
9 8 oveq2d โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„+ ) โ†’ ( ๐ด โˆ’ ( ๐ต ยท ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ) ) = ( ๐ด โˆ’ ( ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ยท ๐ต ) ) )
10 1 9 eqtrd โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„+ ) โ†’ ( ๐ด mod ๐ต ) = ( ๐ด โˆ’ ( ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ยท ๐ต ) ) )