Metamath Proof Explorer


Theorem zmodcl

Description: Closure law for the modulo operation restricted to integers. (Contributed by NM, 27-Nov-2008)

Ref Expression
Assertion zmodcl ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„• ) โ†’ ( ๐ด mod ๐ต ) โˆˆ โ„•0 )

Proof

Step Hyp Ref Expression
1 zre โŠข ( ๐ด โˆˆ โ„ค โ†’ ๐ด โˆˆ โ„ )
2 nnrp โŠข ( ๐ต โˆˆ โ„• โ†’ ๐ต โˆˆ โ„+ )
3 modval โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„+ ) โ†’ ( ๐ด mod ๐ต ) = ( ๐ด โˆ’ ( ๐ต ยท ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ) ) )
4 1 2 3 syl2an โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„• ) โ†’ ( ๐ด mod ๐ต ) = ( ๐ด โˆ’ ( ๐ต ยท ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ) ) )
5 nnz โŠข ( ๐ต โˆˆ โ„• โ†’ ๐ต โˆˆ โ„ค )
6 5 adantl โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„• ) โ†’ ๐ต โˆˆ โ„ค )
7 nndivre โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„• ) โ†’ ( ๐ด / ๐ต ) โˆˆ โ„ )
8 1 7 sylan โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„• ) โ†’ ( ๐ด / ๐ต ) โˆˆ โ„ )
9 8 flcld โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„• ) โ†’ ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) โˆˆ โ„ค )
10 6 9 zmulcld โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„• ) โ†’ ( ๐ต ยท ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ) โˆˆ โ„ค )
11 zsubcl โŠข ( ( ๐ด โˆˆ โ„ค โˆง ( ๐ต ยท ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ) โˆˆ โ„ค ) โ†’ ( ๐ด โˆ’ ( ๐ต ยท ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ) ) โˆˆ โ„ค )
12 10 11 syldan โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„• ) โ†’ ( ๐ด โˆ’ ( ๐ต ยท ( โŒŠ โ€˜ ( ๐ด / ๐ต ) ) ) ) โˆˆ โ„ค )
13 4 12 eqeltrd โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„• ) โ†’ ( ๐ด mod ๐ต ) โˆˆ โ„ค )
14 modge0 โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„+ ) โ†’ 0 โ‰ค ( ๐ด mod ๐ต ) )
15 1 2 14 syl2an โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„• ) โ†’ 0 โ‰ค ( ๐ด mod ๐ต ) )
16 elnn0z โŠข ( ( ๐ด mod ๐ต ) โˆˆ โ„•0 โ†” ( ( ๐ด mod ๐ต ) โˆˆ โ„ค โˆง 0 โ‰ค ( ๐ด mod ๐ต ) ) )
17 13 15 16 sylanbrc โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„• ) โ†’ ( ๐ด mod ๐ต ) โˆˆ โ„•0 )