Metamath Proof Explorer


Theorem nnnn0modprm0

Description: For a positive integer and a nonnegative integer both less than a given prime number there is always a second nonnegative integer (less than the given prime number) so that the sum of this second nonnegative integer multiplied with the positive integer and the first nonnegative integer is 0 ( modulo the given prime number). (Contributed by Alexander van der Vekens, 8-Nov-2018)

Ref Expression
Assertion nnnn0modprm0 ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) โˆง ๐ผ โˆˆ ( 0 ..^ ๐‘ƒ ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 )

Proof

Step Hyp Ref Expression
1 prmnn โŠข ( ๐‘ƒ โˆˆ โ„™ โ†’ ๐‘ƒ โˆˆ โ„• )
2 1 adantr โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ๐‘ƒ โˆˆ โ„• )
3 fzo0sn0fzo1 โŠข ( ๐‘ƒ โˆˆ โ„• โ†’ ( 0 ..^ ๐‘ƒ ) = ( { 0 } โˆช ( 1 ..^ ๐‘ƒ ) ) )
4 2 3 syl โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ( 0 ..^ ๐‘ƒ ) = ( { 0 } โˆช ( 1 ..^ ๐‘ƒ ) ) )
5 4 eleq2d โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ( ๐ผ โˆˆ ( 0 ..^ ๐‘ƒ ) โ†” ๐ผ โˆˆ ( { 0 } โˆช ( 1 ..^ ๐‘ƒ ) ) ) )
6 elun โŠข ( ๐ผ โˆˆ ( { 0 } โˆช ( 1 ..^ ๐‘ƒ ) ) โ†” ( ๐ผ โˆˆ { 0 } โˆจ ๐ผ โˆˆ ( 1 ..^ ๐‘ƒ ) ) )
7 elsni โŠข ( ๐ผ โˆˆ { 0 } โ†’ ๐ผ = 0 )
8 lbfzo0 โŠข ( 0 โˆˆ ( 0 ..^ ๐‘ƒ ) โ†” ๐‘ƒ โˆˆ โ„• )
9 1 8 sylibr โŠข ( ๐‘ƒ โˆˆ โ„™ โ†’ 0 โˆˆ ( 0 ..^ ๐‘ƒ ) )
10 elfzoelz โŠข ( ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) โ†’ ๐‘ โˆˆ โ„ค )
11 zcn โŠข ( ๐‘ โˆˆ โ„ค โ†’ ๐‘ โˆˆ โ„‚ )
12 mul02 โŠข ( ๐‘ โˆˆ โ„‚ โ†’ ( 0 ยท ๐‘ ) = 0 )
13 12 oveq2d โŠข ( ๐‘ โˆˆ โ„‚ โ†’ ( 0 + ( 0 ยท ๐‘ ) ) = ( 0 + 0 ) )
14 00id โŠข ( 0 + 0 ) = 0
15 13 14 eqtrdi โŠข ( ๐‘ โˆˆ โ„‚ โ†’ ( 0 + ( 0 ยท ๐‘ ) ) = 0 )
16 10 11 15 3syl โŠข ( ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) โ†’ ( 0 + ( 0 ยท ๐‘ ) ) = 0 )
17 16 adantl โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ( 0 + ( 0 ยท ๐‘ ) ) = 0 )
18 17 oveq1d โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ( ( 0 + ( 0 ยท ๐‘ ) ) mod ๐‘ƒ ) = ( 0 mod ๐‘ƒ ) )
19 nnrp โŠข ( ๐‘ƒ โˆˆ โ„• โ†’ ๐‘ƒ โˆˆ โ„+ )
20 0mod โŠข ( ๐‘ƒ โˆˆ โ„+ โ†’ ( 0 mod ๐‘ƒ ) = 0 )
21 1 19 20 3syl โŠข ( ๐‘ƒ โˆˆ โ„™ โ†’ ( 0 mod ๐‘ƒ ) = 0 )
22 21 adantr โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ( 0 mod ๐‘ƒ ) = 0 )
23 18 22 eqtrd โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ( ( 0 + ( 0 ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 )
24 oveq1 โŠข ( ๐‘— = 0 โ†’ ( ๐‘— ยท ๐‘ ) = ( 0 ยท ๐‘ ) )
25 24 oveq2d โŠข ( ๐‘— = 0 โ†’ ( 0 + ( ๐‘— ยท ๐‘ ) ) = ( 0 + ( 0 ยท ๐‘ ) ) )
26 25 oveq1d โŠข ( ๐‘— = 0 โ†’ ( ( 0 + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = ( ( 0 + ( 0 ยท ๐‘ ) ) mod ๐‘ƒ ) )
27 26 eqeq1d โŠข ( ๐‘— = 0 โ†’ ( ( ( 0 + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 โ†” ( ( 0 + ( 0 ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
28 27 rspcev โŠข ( ( 0 โˆˆ ( 0 ..^ ๐‘ƒ ) โˆง ( ( 0 + ( 0 ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( 0 + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 )
29 9 23 28 syl2an2r โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( 0 + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 )
30 29 adantl โŠข ( ( ๐ผ = 0 โˆง ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( 0 + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 )
31 oveq1 โŠข ( ๐ผ = 0 โ†’ ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) = ( 0 + ( ๐‘— ยท ๐‘ ) ) )
32 31 oveq1d โŠข ( ๐ผ = 0 โ†’ ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = ( ( 0 + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) )
33 32 eqeq1d โŠข ( ๐ผ = 0 โ†’ ( ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 โ†” ( ( 0 + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
34 33 adantr โŠข ( ( ๐ผ = 0 โˆง ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) ) โ†’ ( ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 โ†” ( ( 0 + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
35 34 rexbidv โŠข ( ( ๐ผ = 0 โˆง ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) ) โ†’ ( โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 โ†” โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( 0 + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
36 30 35 mpbird โŠข ( ( ๐ผ = 0 โˆง ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 )
37 36 ex โŠข ( ๐ผ = 0 โ†’ ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
38 7 37 syl โŠข ( ๐ผ โˆˆ { 0 } โ†’ ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
39 simpl โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ๐‘ƒ โˆˆ โ„™ )
40 39 adantl โŠข ( ( ๐ผ โˆˆ ( 1 ..^ ๐‘ƒ ) โˆง ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) ) โ†’ ๐‘ƒ โˆˆ โ„™ )
41 simprr โŠข ( ( ๐ผ โˆˆ ( 1 ..^ ๐‘ƒ ) โˆง ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) ) โ†’ ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) )
42 simpl โŠข ( ( ๐ผ โˆˆ ( 1 ..^ ๐‘ƒ ) โˆง ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) ) โ†’ ๐ผ โˆˆ ( 1 ..^ ๐‘ƒ ) )
43 modprm0 โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) โˆง ๐ผ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 )
44 40 41 42 43 syl3anc โŠข ( ( ๐ผ โˆˆ ( 1 ..^ ๐‘ƒ ) โˆง ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 )
45 44 ex โŠข ( ๐ผ โˆˆ ( 1 ..^ ๐‘ƒ ) โ†’ ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
46 38 45 jaoi โŠข ( ( ๐ผ โˆˆ { 0 } โˆจ ๐ผ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
47 6 46 sylbi โŠข ( ๐ผ โˆˆ ( { 0 } โˆช ( 1 ..^ ๐‘ƒ ) ) โ†’ ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
48 47 com12 โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ( ๐ผ โˆˆ ( { 0 } โˆช ( 1 ..^ ๐‘ƒ ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
49 5 48 sylbid โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) ) โ†’ ( ๐ผ โˆˆ ( 0 ..^ ๐‘ƒ ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 ) )
50 49 3impia โŠข ( ( ๐‘ƒ โˆˆ โ„™ โˆง ๐‘ โˆˆ ( 1 ..^ ๐‘ƒ ) โˆง ๐ผ โˆˆ ( 0 ..^ ๐‘ƒ ) ) โ†’ โˆƒ ๐‘— โˆˆ ( 0 ..^ ๐‘ƒ ) ( ( ๐ผ + ( ๐‘— ยท ๐‘ ) ) mod ๐‘ƒ ) = 0 )