Metamath Proof Explorer


Theorem muladdmodid

Description: The sum of a positive real number less than an upper bound and the product of an integer and the upper bound is the positive real number modulo the upper bound. (Contributed by AV, 5-Jul-2020)

Ref Expression
Assertion muladdmodid ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ โˆง ๐ด โˆˆ ( 0 [,) ๐‘€ ) ) โ†’ ( ( ( ๐‘ ยท ๐‘€ ) + ๐ด ) mod ๐‘€ ) = ๐ด )

Proof

Step Hyp Ref Expression
1 0red โŠข ( ๐‘€ โˆˆ โ„+ โ†’ 0 โˆˆ โ„ )
2 rpxr โŠข ( ๐‘€ โˆˆ โ„+ โ†’ ๐‘€ โˆˆ โ„* )
3 elico2 โŠข ( ( 0 โˆˆ โ„ โˆง ๐‘€ โˆˆ โ„* ) โ†’ ( ๐ด โˆˆ ( 0 [,) ๐‘€ ) โ†” ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) )
4 1 2 3 syl2anc โŠข ( ๐‘€ โˆˆ โ„+ โ†’ ( ๐ด โˆˆ ( 0 [,) ๐‘€ ) โ†” ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) )
5 4 adantl โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โ†’ ( ๐ด โˆˆ ( 0 [,) ๐‘€ ) โ†” ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) )
6 zcn โŠข ( ๐‘ โˆˆ โ„ค โ†’ ๐‘ โˆˆ โ„‚ )
7 rpcn โŠข ( ๐‘€ โˆˆ โ„+ โ†’ ๐‘€ โˆˆ โ„‚ )
8 mulcl โŠข ( ( ๐‘ โˆˆ โ„‚ โˆง ๐‘€ โˆˆ โ„‚ ) โ†’ ( ๐‘ ยท ๐‘€ ) โˆˆ โ„‚ )
9 6 7 8 syl2an โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โ†’ ( ๐‘ ยท ๐‘€ ) โˆˆ โ„‚ )
10 9 adantr โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ( ๐‘ ยท ๐‘€ ) โˆˆ โ„‚ )
11 recn โŠข ( ๐ด โˆˆ โ„ โ†’ ๐ด โˆˆ โ„‚ )
12 11 3ad2ant1 โŠข ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) โ†’ ๐ด โˆˆ โ„‚ )
13 12 adantl โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ๐ด โˆˆ โ„‚ )
14 10 13 addcomd โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ( ( ๐‘ ยท ๐‘€ ) + ๐ด ) = ( ๐ด + ( ๐‘ ยท ๐‘€ ) ) )
15 14 oveq1d โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ( ( ( ๐‘ ยท ๐‘€ ) + ๐ด ) mod ๐‘€ ) = ( ( ๐ด + ( ๐‘ ยท ๐‘€ ) ) mod ๐‘€ ) )
16 simp1 โŠข ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) โ†’ ๐ด โˆˆ โ„ )
17 16 adantl โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ๐ด โˆˆ โ„ )
18 simpr โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โ†’ ๐‘€ โˆˆ โ„+ )
19 18 adantr โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ๐‘€ โˆˆ โ„+ )
20 simpll โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ๐‘ โˆˆ โ„ค )
21 modcyc โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐‘€ โˆˆ โ„+ โˆง ๐‘ โˆˆ โ„ค ) โ†’ ( ( ๐ด + ( ๐‘ ยท ๐‘€ ) ) mod ๐‘€ ) = ( ๐ด mod ๐‘€ ) )
22 17 19 20 21 syl3anc โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ( ( ๐ด + ( ๐‘ ยท ๐‘€ ) ) mod ๐‘€ ) = ( ๐ด mod ๐‘€ ) )
23 18 16 anim12ci โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ( ๐ด โˆˆ โ„ โˆง ๐‘€ โˆˆ โ„+ ) )
24 3simpc โŠข ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) โ†’ ( 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) )
25 24 adantl โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ( 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) )
26 modid โŠข ( ( ( ๐ด โˆˆ โ„ โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ( ๐ด mod ๐‘€ ) = ๐ด )
27 23 25 26 syl2anc โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ( ๐ด mod ๐‘€ ) = ๐ด )
28 15 22 27 3eqtrd โŠข ( ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โˆง ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) ) โ†’ ( ( ( ๐‘ ยท ๐‘€ ) + ๐ด ) mod ๐‘€ ) = ๐ด )
29 28 ex โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โ†’ ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด โˆง ๐ด < ๐‘€ ) โ†’ ( ( ( ๐‘ ยท ๐‘€ ) + ๐ด ) mod ๐‘€ ) = ๐ด ) )
30 5 29 sylbid โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ ) โ†’ ( ๐ด โˆˆ ( 0 [,) ๐‘€ ) โ†’ ( ( ( ๐‘ ยท ๐‘€ ) + ๐ด ) mod ๐‘€ ) = ๐ด ) )
31 30 3impia โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ โˆˆ โ„+ โˆง ๐ด โˆˆ ( 0 [,) ๐‘€ ) ) โ†’ ( ( ( ๐‘ ยท ๐‘€ ) + ๐ด ) mod ๐‘€ ) = ๐ด )