ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  modprm0 Unicode version

Theorem modprm0 13035
Description: For two positive integers less than a given prime number there is always a nonnegative integer (less than the given prime number) so that the sum of one of the two positive integers and the other of the positive integers multiplied by the nonnegative integer is 0 ( modulo the given prime number). (Contributed by Alexander van der Vekens, 17-May-2018.)
Assertion
Ref Expression
modprm0  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  E. j  e.  ( 0..^ P ) ( ( I  +  ( j  x.  N ) )  mod  P )  =  0 )
Distinct variable groups:    j, I    j, N    P, j

Proof of Theorem modprm0
Dummy variable  r is distinct from all other variables.
StepHypRef Expression
1 reumodprminv 13034 . . . 4  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P ) )  ->  E! r  e.  ( 1 ... ( P  -  1 ) ) ( ( N  x.  r )  mod 
P )  =  1 )
2 reurex 2771 . . . 4  |-  ( E! r  e.  ( 1 ... ( P  - 
1 ) ) ( ( N  x.  r
)  mod  P )  =  1  ->  E. r  e.  ( 1 ... ( P  -  1 ) ) ( ( N  x.  r )  mod 
P )  =  1 )
3 prmz 12891 . . . . . . . . . . 11  |-  ( P  e.  Prime  ->  P  e.  ZZ )
433ad2ant1 1049 . . . . . . . . . 10  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  P  e.  ZZ )
54adantl 277 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  P  e.  ZZ )
6 elfzelz 10430 . . . . . . . . . . 11  |-  ( r  e.  ( 1 ... ( P  -  1 ) )  ->  r  e.  ZZ )
76adantr 276 . . . . . . . . . 10  |-  ( ( r  e.  ( 1 ... ( P  - 
1 ) )  /\  ( ( N  x.  r )  mod  P
)  =  1 )  ->  r  e.  ZZ )
8 elfzoelz 10556 . . . . . . . . . . 11  |-  ( I  e.  ( 1..^ P )  ->  I  e.  ZZ )
983ad2ant3 1051 . . . . . . . . . 10  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  I  e.  ZZ )
10 zmulcl 9700 . . . . . . . . . 10  |-  ( ( r  e.  ZZ  /\  I  e.  ZZ )  ->  ( r  x.  I
)  e.  ZZ )
117, 9, 10syl2an 289 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( r  x.  I )  e.  ZZ )
125, 11zsubcld 9775 . . . . . . . 8  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( P  -  ( r  x.  I ) )  e.  ZZ )
13 prmnn 12890 . . . . . . . . . 10  |-  ( P  e.  Prime  ->  P  e.  NN )
14133ad2ant1 1049 . . . . . . . . 9  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  P  e.  NN )
1514adantl 277 . . . . . . . 8  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  P  e.  NN )
16 zmodfzo 10786 . . . . . . . 8  |-  ( ( ( P  -  (
r  x.  I ) )  e.  ZZ  /\  P  e.  NN )  ->  ( ( P  -  ( r  x.  I
) )  mod  P
)  e.  ( 0..^ P ) )
1712, 15, 16syl2anc 415 . . . . . . 7  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( ( P  -  ( r  x.  I ) )  mod 
P )  e.  ( 0..^ P ) )
189adantl 277 . . . . . . . . . 10  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  I  e.  ZZ )
19 zq 10028 . . . . . . . . . 10  |-  ( I  e.  ZZ  ->  I  e.  QQ )
2018, 19syl 14 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  I  e.  QQ )
21 zq 10028 . . . . . . . . . 10  |-  ( ( P  -  ( r  x.  I ) )  e.  ZZ  ->  ( P  -  ( r  x.  I ) )  e.  QQ )
2212, 21syl 14 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( P  -  ( r  x.  I ) )  e.  QQ )
23 elfzoelz 10556 . . . . . . . . . . 11  |-  ( N  e.  ( 1..^ P )  ->  N  e.  ZZ )
24233ad2ant2 1050 . . . . . . . . . 10  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  N  e.  ZZ )
2524adantl 277 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  N  e.  ZZ )
26 zq 10028 . . . . . . . . . 10  |-  ( P  e.  ZZ  ->  P  e.  QQ )
275, 26syl 14 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  P  e.  QQ )
2815nngt0d 9349 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  0  <  P )
29 modqaddmulmod 10830 . . . . . . . . 9  |-  ( ( ( I  e.  QQ  /\  ( P  -  (
r  x.  I ) )  e.  QQ  /\  N  e.  ZZ )  /\  ( P  e.  QQ  /\  0  <  P ) )  ->  ( (
I  +  ( ( ( P  -  (
r  x.  I ) )  mod  P )  x.  N ) )  mod  P )  =  ( ( I  +  ( ( P  -  ( r  x.  I
) )  x.  N
) )  mod  P
) )
3020, 22, 25, 27, 28, 29syl32anc 1286 . . . . . . . 8  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
I  +  ( ( ( P  -  (
r  x.  I ) )  mod  P )  x.  N ) )  mod  P )  =  ( ( I  +  ( ( P  -  ( r  x.  I
) )  x.  N
) )  mod  P
) )
3113nncnd 9319 . . . . . . . . . . . . 13  |-  ( P  e.  Prime  ->  P  e.  CC )
32313ad2ant1 1049 . . . . . . . . . . . 12  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  P  e.  CC )
3332adantl 277 . . . . . . . . . . 11  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  P  e.  CC )
346zcnd 9771 . . . . . . . . . . . . 13  |-  ( r  e.  ( 1 ... ( P  -  1 ) )  ->  r  e.  CC )
3534adantr 276 . . . . . . . . . . . 12  |-  ( ( r  e.  ( 1 ... ( P  - 
1 ) )  /\  ( ( N  x.  r )  mod  P
)  =  1 )  ->  r  e.  CC )
368zcnd 9771 . . . . . . . . . . . . 13  |-  ( I  e.  ( 1..^ P )  ->  I  e.  CC )
37363ad2ant3 1051 . . . . . . . . . . . 12  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  I  e.  CC )
38 mulcl 8306 . . . . . . . . . . . 12  |-  ( ( r  e.  CC  /\  I  e.  CC )  ->  ( r  x.  I
)  e.  CC )
3935, 37, 38syl2an 289 . . . . . . . . . . 11  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( r  x.  I )  e.  CC )
4023zcnd 9771 . . . . . . . . . . . . 13  |-  ( N  e.  ( 1..^ P )  ->  N  e.  CC )
41403ad2ant2 1050 . . . . . . . . . . . 12  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  N  e.  CC )
4241adantl 277 . . . . . . . . . . 11  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  N  e.  CC )
4333, 39, 42subdird 8742 . . . . . . . . . 10  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( ( P  -  ( r  x.  I ) )  x.  N )  =  ( ( P  x.  N
)  -  ( ( r  x.  I )  x.  N ) ) )
4443oveq2d 6101 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( I  +  ( ( P  -  ( r  x.  I ) )  x.  N ) )  =  ( I  +  ( ( P  x.  N
)  -  ( ( r  x.  I )  x.  N ) ) ) )
4544oveq1d 6100 . . . . . . . 8  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
I  +  ( ( P  -  ( r  x.  I ) )  x.  N ) )  mod  P )  =  ( ( I  +  ( ( P  x.  N )  -  (
( r  x.  I
)  x.  N ) ) )  mod  P
) )
46 mulcom 8308 . . . . . . . . . . . . . . . . . . 19  |-  ( ( P  e.  CC  /\  N  e.  CC )  ->  ( P  x.  N
)  =  ( N  x.  P ) )
4731, 40, 46syl2an 289 . . . . . . . . . . . . . . . . . 18  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P ) )  ->  ( P  x.  N )  =  ( N  x.  P ) )
4847oveq1d 6100 . . . . . . . . . . . . . . . . 17  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P ) )  ->  ( ( P  x.  N )  mod  P )  =  ( ( N  x.  P
)  mod  P )
)
4923adantl 277 . . . . . . . . . . . . . . . . . 18  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P ) )  ->  N  e.  ZZ )
503adantr 276 . . . . . . . . . . . . . . . . . . 19  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P ) )  ->  P  e.  ZZ )
5150, 26syl 14 . . . . . . . . . . . . . . . . . 18  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P ) )  ->  P  e.  QQ )
5213nngt0d 9349 . . . . . . . . . . . . . . . . . . 19  |-  ( P  e.  Prime  ->  0  < 
P )
5352adantr 276 . . . . . . . . . . . . . . . . . 18  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P ) )  ->  0  <  P )
54 mulqmod0 10769 . . . . . . . . . . . . . . . . . 18  |-  ( ( N  e.  ZZ  /\  P  e.  QQ  /\  0  <  P )  ->  (
( N  x.  P
)  mod  P )  =  0 )
5549, 51, 53, 54syl3anc 1278 . . . . . . . . . . . . . . . . 17  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P ) )  ->  ( ( N  x.  P )  mod  P )  =  0 )
5648, 55eqtrd 2271 . . . . . . . . . . . . . . . 16  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P ) )  ->  ( ( P  x.  N )  mod  P )  =  0 )
57563adant3 1048 . . . . . . . . . . . . . . 15  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  ( ( P  x.  N )  mod 
P )  =  0 )
5857adantl 277 . . . . . . . . . . . . . 14  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( ( P  x.  N )  mod  P )  =  0 )
5935adantr 276 . . . . . . . . . . . . . . . . 17  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  r  e.  CC )
6037adantl 277 . . . . . . . . . . . . . . . . 17  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  I  e.  CC )
6159, 60, 42mul32d 8479 . . . . . . . . . . . . . . . 16  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
r  x.  I )  x.  N )  =  ( ( r  x.  N )  x.  I
) )
6261oveq1d 6100 . . . . . . . . . . . . . . 15  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
( r  x.  I
)  x.  N )  mod  P )  =  ( ( ( r  x.  N )  x.  I )  mod  P
) )
63 elfznn 10462 . . . . . . . . . . . . . . . . . . . 20  |-  ( r  e.  ( 1 ... ( P  -  1 ) )  ->  r  e.  NN )
6463adantr 276 . . . . . . . . . . . . . . . . . . 19  |-  ( ( r  e.  ( 1 ... ( P  - 
1 ) )  /\  ( ( N  x.  r )  mod  P
)  =  1 )  ->  r  e.  NN )
6564adantr 276 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  r  e.  NN )
66 elfzo1 10605 . . . . . . . . . . . . . . . . . . . . 21  |-  ( N  e.  ( 1..^ P )  <->  ( N  e.  NN  /\  P  e.  NN  /\  N  < 
P ) )
6766simp1bi 1043 . . . . . . . . . . . . . . . . . . . 20  |-  ( N  e.  ( 1..^ P )  ->  N  e.  NN )
68673ad2ant2 1050 . . . . . . . . . . . . . . . . . . 19  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  N  e.  NN )
6968adantl 277 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  N  e.  NN )
7065, 69nnmulcld 9354 . . . . . . . . . . . . . . . . 17  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( r  x.  N )  e.  NN )
71 nnq 10035 . . . . . . . . . . . . . . . . 17  |-  ( ( r  x.  N )  e.  NN  ->  (
r  x.  N )  e.  QQ )
7270, 71syl 14 . . . . . . . . . . . . . . . 16  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( r  x.  N )  e.  QQ )
73 modqmulmod 10828 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( r  x.  N )  e.  QQ  /\  I  e.  ZZ )  /\  ( P  e.  QQ  /\  0  < 
P ) )  -> 
( ( ( ( r  x.  N )  mod  P )  x.  I )  mod  P
)  =  ( ( ( r  x.  N
)  x.  I )  mod  P ) )
7472, 18, 27, 28, 73syl22anc 1279 . . . . . . . . . . . . . . 15  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
( ( r  x.  N )  mod  P
)  x.  I )  mod  P )  =  ( ( ( r  x.  N )  x.  I )  mod  P
) )
7562, 74eqtr4d 2274 . . . . . . . . . . . . . 14  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
( r  x.  I
)  x.  N )  mod  P )  =  ( ( ( ( r  x.  N )  mod  P )  x.  I )  mod  P
) )
7658, 75oveq12d 6103 . . . . . . . . . . . . 13  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
( P  x.  N
)  mod  P )  -  ( ( ( r  x.  I )  x.  N )  mod 
P ) )  =  ( 0  -  (
( ( ( r  x.  N )  mod 
P )  x.  I
)  mod  P )
) )
7776oveq1d 6100 . . . . . . . . . . . 12  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
( ( P  x.  N )  mod  P
)  -  ( ( ( r  x.  I
)  x.  N )  mod  P ) )  mod  P )  =  ( ( 0  -  ( ( ( ( r  x.  N )  mod  P )  x.  I )  mod  P
) )  mod  P
) )
7815, 69nnmulcld 9354 . . . . . . . . . . . . . 14  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( P  x.  N )  e.  NN )
79 nnq 10035 . . . . . . . . . . . . . 14  |-  ( ( P  x.  N )  e.  NN  ->  ( P  x.  N )  e.  QQ )
8078, 79syl 14 . . . . . . . . . . . . 13  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( P  x.  N )  e.  QQ )
81 elfzo1 10605 . . . . . . . . . . . . . . . . . . 19  |-  ( I  e.  ( 1..^ P )  <->  ( I  e.  NN  /\  P  e.  NN  /\  I  < 
P ) )
8281simp1bi 1043 . . . . . . . . . . . . . . . . . 18  |-  ( I  e.  ( 1..^ P )  ->  I  e.  NN )
83823ad2ant3 1051 . . . . . . . . . . . . . . . . 17  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  I  e.  NN )
8483adantl 277 . . . . . . . . . . . . . . . 16  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  I  e.  NN )
8565, 84nnmulcld 9354 . . . . . . . . . . . . . . 15  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( r  x.  I )  e.  NN )
8685, 69nnmulcld 9354 . . . . . . . . . . . . . 14  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
r  x.  I )  x.  N )  e.  NN )
87 nnq 10035 . . . . . . . . . . . . . 14  |-  ( ( ( r  x.  I
)  x.  N )  e.  NN  ->  (
( r  x.  I
)  x.  N )  e.  QQ )
8886, 87syl 14 . . . . . . . . . . . . 13  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
r  x.  I )  x.  N )  e.  QQ )
89 modqsubmodmod 10822 . . . . . . . . . . . . 13  |-  ( ( ( ( P  x.  N )  e.  QQ  /\  ( ( r  x.  I )  x.  N
)  e.  QQ )  /\  ( P  e.  QQ  /\  0  < 
P ) )  -> 
( ( ( ( P  x.  N )  mod  P )  -  ( ( ( r  x.  I )  x.  N )  mod  P
) )  mod  P
)  =  ( ( ( P  x.  N
)  -  ( ( r  x.  I )  x.  N ) )  mod  P ) )
9080, 88, 27, 28, 89syl22anc 1279 . . . . . . . . . . . 12  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
( ( P  x.  N )  mod  P
)  -  ( ( ( r  x.  I
)  x.  N )  mod  P ) )  mod  P )  =  ( ( ( P  x.  N )  -  ( ( r  x.  I )  x.  N
) )  mod  P
) )
91 mulcom 8308 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( N  e.  CC  /\  r  e.  CC )  ->  ( N  x.  r
)  =  ( r  x.  N ) )
9241, 34, 91syl2anr 290 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( r  e.  ( 1 ... ( P  - 
1 ) )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( N  x.  r )  =  ( r  x.  N ) )
9392oveq1d 6100 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( r  e.  ( 1 ... ( P  - 
1 ) )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  (
( N  x.  r
)  mod  P )  =  ( ( r  x.  N )  mod 
P ) )
9493eqeq1d 2247 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( r  e.  ( 1 ... ( P  - 
1 ) )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  (
( ( N  x.  r )  mod  P
)  =  1  <->  (
( r  x.  N
)  mod  P )  =  1 ) )
9594biimpd 144 . . . . . . . . . . . . . . . . . . 19  |-  ( ( r  e.  ( 1 ... ( P  - 
1 ) )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  (
( ( N  x.  r )  mod  P
)  =  1  -> 
( ( r  x.  N )  mod  P
)  =  1 ) )
9695impancom 260 . . . . . . . . . . . . . . . . . 18  |-  ( ( r  e.  ( 1 ... ( P  - 
1 ) )  /\  ( ( N  x.  r )  mod  P
)  =  1 )  ->  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  ( ( r  x.  N )  mod 
P )  =  1 ) )
9796imp 124 . . . . . . . . . . . . . . . . 17  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
r  x.  N )  mod  P )  =  1 )
9897oveq1d 6100 . . . . . . . . . . . . . . . 16  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
( r  x.  N
)  mod  P )  x.  I )  =  ( 1  x.  I ) )
9998oveq1d 6100 . . . . . . . . . . . . . . 15  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
( ( r  x.  N )  mod  P
)  x.  I )  mod  P )  =  ( ( 1  x.  I )  mod  P
) )
10099oveq2d 6101 . . . . . . . . . . . . . 14  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( 0  -  ( ( ( ( r  x.  N
)  mod  P )  x.  I )  mod  P
) )  =  ( 0  -  ( ( 1  x.  I )  mod  P ) ) )
101100oveq1d 6100 . . . . . . . . . . . . 13  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
0  -  ( ( ( ( r  x.  N )  mod  P
)  x.  I )  mod  P ) )  mod  P )  =  ( ( 0  -  ( ( 1  x.  I )  mod  P
) )  mod  P
) )
10260mullidd 8344 . . . . . . . . . . . . . . . . 17  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( 1  x.  I )  =  I )
103102oveq1d 6100 . . . . . . . . . . . . . . . 16  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
1  x.  I )  mod  P )  =  ( I  mod  P
) )
10484nnnn0d 9622 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  I  e.  NN0 )
105104nn0ge0d 9625 . . . . . . . . . . . . . . . . 17  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  0  <_  I )
106 elfzolt2 10566 . . . . . . . . . . . . . . . . . . 19  |-  ( I  e.  ( 1..^ P )  ->  I  <  P )
1071063ad2ant3 1051 . . . . . . . . . . . . . . . . . 18  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  I  <  P
)
108107adantl 277 . . . . . . . . . . . . . . . . 17  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  I  <  P )
109 modqid 10788 . . . . . . . . . . . . . . . . 17  |-  ( ( ( I  e.  QQ  /\  P  e.  QQ )  /\  ( 0  <_  I  /\  I  <  P
) )  ->  (
I  mod  P )  =  I )
11020, 27, 105, 108, 109syl22anc 1279 . . . . . . . . . . . . . . . 16  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( I  mod  P )  =  I )
111103, 110eqtrd 2271 . . . . . . . . . . . . . . 15  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
1  x.  I )  mod  P )  =  I )
112111oveq2d 6101 . . . . . . . . . . . . . 14  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( 0  -  ( ( 1  x.  I )  mod 
P ) )  =  ( 0  -  I
) )
113112oveq1d 6100 . . . . . . . . . . . . 13  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
0  -  ( ( 1  x.  I )  mod  P ) )  mod  P )  =  ( ( 0  -  I )  mod  P
) )
114101, 113eqtrd 2271 . . . . . . . . . . . 12  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
0  -  ( ( ( ( r  x.  N )  mod  P
)  x.  I )  mod  P ) )  mod  P )  =  ( ( 0  -  I )  mod  P
) )
11577, 90, 1143eqtr3d 2279 . . . . . . . . . . 11  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
( P  x.  N
)  -  ( ( r  x.  I )  x.  N ) )  mod  P )  =  ( ( 0  -  I )  mod  P
) )
116115oveq2d 6101 . . . . . . . . . 10  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( I  +  ( ( ( P  x.  N )  -  ( ( r  x.  I )  x.  N ) )  mod 
P ) )  =  ( I  +  ( ( 0  -  I
)  mod  P )
) )
117116oveq1d 6100 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
I  +  ( ( ( P  x.  N
)  -  ( ( r  x.  I )  x.  N ) )  mod  P ) )  mod  P )  =  ( ( I  +  ( ( 0  -  I )  mod  P
) )  mod  P
) )
118 qsubcl 10040 . . . . . . . . . . 11  |-  ( ( ( P  x.  N
)  e.  QQ  /\  ( ( r  x.  I )  x.  N
)  e.  QQ )  ->  ( ( P  x.  N )  -  ( ( r  x.  I )  x.  N
) )  e.  QQ )
11980, 88, 118syl2anc 415 . . . . . . . . . 10  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( ( P  x.  N )  -  ( ( r  x.  I )  x.  N ) )  e.  QQ )
120 modqadd2mod 10813 . . . . . . . . . 10  |-  ( ( ( ( ( P  x.  N )  -  ( ( r  x.  I )  x.  N
) )  e.  QQ  /\  I  e.  QQ )  /\  ( P  e.  QQ  /\  0  < 
P ) )  -> 
( ( I  +  ( ( ( P  x.  N )  -  ( ( r  x.  I )  x.  N
) )  mod  P
) )  mod  P
)  =  ( ( I  +  ( ( P  x.  N )  -  ( ( r  x.  I )  x.  N ) ) )  mod  P ) )
121119, 20, 27, 28, 120syl22anc 1279 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
I  +  ( ( ( P  x.  N
)  -  ( ( r  x.  I )  x.  N ) )  mod  P ) )  mod  P )  =  ( ( I  +  ( ( P  x.  N )  -  (
( r  x.  I
)  x.  N ) ) )  mod  P
) )
122 0zd 9658 . . . . . . . . . . . . 13  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  0  e.  ZZ )
123122, 18zsubcld 9775 . . . . . . . . . . . 12  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( 0  -  I )  e.  ZZ )
124 zq 10028 . . . . . . . . . . . 12  |-  ( ( 0  -  I )  e.  ZZ  ->  (
0  -  I )  e.  QQ )
125123, 124syl 14 . . . . . . . . . . 11  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( 0  -  I )  e.  QQ )
126 modqadd2mod 10813 . . . . . . . . . . 11  |-  ( ( ( ( 0  -  I )  e.  QQ  /\  I  e.  QQ )  /\  ( P  e.  QQ  /\  0  < 
P ) )  -> 
( ( I  +  ( ( 0  -  I )  mod  P
) )  mod  P
)  =  ( ( I  +  ( 0  -  I ) )  mod  P ) )
127125, 20, 27, 28, 126syl22anc 1279 . . . . . . . . . 10  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
I  +  ( ( 0  -  I )  mod  P ) )  mod  P )  =  ( ( I  +  ( 0  -  I
) )  mod  P
) )
128 0cnd 8319 . . . . . . . . . . . . . 14  |-  ( I  e.  ( 1..^ P )  ->  0  e.  CC )
12936, 128pncan3d 8640 . . . . . . . . . . . . 13  |-  ( I  e.  ( 1..^ P )  ->  ( I  +  ( 0  -  I ) )  =  0 )
1301293ad2ant3 1051 . . . . . . . . . . . 12  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  ( I  +  ( 0  -  I
) )  =  0 )
131130adantl 277 . . . . . . . . . . 11  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( I  +  ( 0  -  I ) )  =  0 )
132131oveq1d 6100 . . . . . . . . . 10  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
I  +  ( 0  -  I ) )  mod  P )  =  ( 0  mod  P
) )
1333, 26syl 14 . . . . . . . . . . . . 13  |-  ( P  e.  Prime  ->  P  e.  QQ )
134 q0mod 10794 . . . . . . . . . . . . 13  |-  ( ( P  e.  QQ  /\  0  <  P )  -> 
( 0  mod  P
)  =  0 )
135133, 52, 134syl2anc 415 . . . . . . . . . . . 12  |-  ( P  e.  Prime  ->  ( 0  mod  P )  =  0 )
1361353ad2ant1 1049 . . . . . . . . . . 11  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  ( 0  mod 
P )  =  0 )
137136adantl 277 . . . . . . . . . 10  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( 0  mod  P )  =  0 )
138127, 132, 1373eqtrd 2275 . . . . . . . . 9  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
I  +  ( ( 0  -  I )  mod  P ) )  mod  P )  =  0 )
139117, 121, 1383eqtr3d 2279 . . . . . . . 8  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
I  +  ( ( P  x.  N )  -  ( ( r  x.  I )  x.  N ) ) )  mod  P )  =  0 )
14030, 45, 1393eqtrd 2275 . . . . . . 7  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  ( (
I  +  ( ( ( P  -  (
r  x.  I ) )  mod  P )  x.  N ) )  mod  P )  =  0 )
141 oveq1 6092 . . . . . . . . . . 11  |-  ( j  =  ( ( P  -  ( r  x.  I ) )  mod 
P )  ->  (
j  x.  N )  =  ( ( ( P  -  ( r  x.  I ) )  mod  P )  x.  N ) )
142141oveq2d 6101 . . . . . . . . . 10  |-  ( j  =  ( ( P  -  ( r  x.  I ) )  mod 
P )  ->  (
I  +  ( j  x.  N ) )  =  ( I  +  ( ( ( P  -  ( r  x.  I ) )  mod 
P )  x.  N
) ) )
143142oveq1d 6100 . . . . . . . . 9  |-  ( j  =  ( ( P  -  ( r  x.  I ) )  mod 
P )  ->  (
( I  +  ( j  x.  N ) )  mod  P )  =  ( ( I  +  ( ( ( P  -  ( r  x.  I ) )  mod  P )  x.  N ) )  mod 
P ) )
144143eqeq1d 2247 . . . . . . . 8  |-  ( j  =  ( ( P  -  ( r  x.  I ) )  mod 
P )  ->  (
( ( I  +  ( j  x.  N
) )  mod  P
)  =  0  <->  (
( I  +  ( ( ( P  -  ( r  x.  I
) )  mod  P
)  x.  N ) )  mod  P )  =  0 ) )
145144rspcev 2929 . . . . . . 7  |-  ( ( ( ( P  -  ( r  x.  I
) )  mod  P
)  e.  ( 0..^ P )  /\  (
( I  +  ( ( ( P  -  ( r  x.  I
) )  mod  P
)  x.  N ) )  mod  P )  =  0 )  ->  E. j  e.  (
0..^ P ) ( ( I  +  ( j  x.  N ) )  mod  P )  =  0 )
14617, 140, 145syl2anc 415 . . . . . 6  |-  ( ( ( r  e.  ( 1 ... ( P  -  1 ) )  /\  ( ( N  x.  r )  mod 
P )  =  1 )  /\  ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) ) )  ->  E. j  e.  ( 0..^ P ) ( ( I  +  ( j  x.  N
) )  mod  P
)  =  0 )
147146ex 115 . . . . 5  |-  ( ( r  e.  ( 1 ... ( P  - 
1 ) )  /\  ( ( N  x.  r )  mod  P
)  =  1 )  ->  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  E. j  e.  ( 0..^ P ) ( ( I  +  ( j  x.  N ) )  mod  P )  =  0 ) )
148147rexlimiva 2663 . . . 4  |-  ( E. r  e.  ( 1 ... ( P  - 
1 ) ) ( ( N  x.  r
)  mod  P )  =  1  ->  (
( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  E. j  e.  ( 0..^ P ) ( ( I  +  ( j  x.  N
) )  mod  P
)  =  0 ) )
1491, 2, 1483syl 17 . . 3  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P ) )  ->  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  E. j  e.  ( 0..^ P ) ( ( I  +  ( j  x.  N ) )  mod  P )  =  0 ) )
1501493adant3 1048 . 2  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  E. j  e.  ( 0..^ P ) ( ( I  +  ( j  x.  N ) )  mod  P )  =  0 ) )
151150pm2.43i 49 1  |-  ( ( P  e.  Prime  /\  N  e.  ( 1..^ P )  /\  I  e.  ( 1..^ P ) )  ->  E. j  e.  ( 0..^ P ) ( ( I  +  ( j  x.  N ) )  mod  P )  =  0 )
Colors of variables:    wff set class
This proof depends on syntax axioms:    -> wi 4    /\ wa 104    /\ w3a 1009    = wceq 1402    e. wcel 2209   E.wrex 2529   E!wreu 2530   class class class wbr 4130  (class class class)co 6085   CCcc 8177   0cc0 8179   1c1 8180    + caddc 8182    x. cmul 8184    < clt 8360    <_ cle 8361    - cmin 8497   NNcn 9305   ZZcz 9646   QQcq 10021   ...cfz 10413  ..^cfzo 10551    mod cmo 10761   Primecprime 12887
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4246  ax-sep 4249  ax-nul 4259  ax-pow 4311  ax-pr 4346  ax-un 4578  ax-setind 4684  ax-iinf 4735  ax-cnex 8270  ax-resscn 8271  ax-1cn 8272  ax-1re 8273  ax-icn 8274  ax-addcl 8275  ax-addrcl 8276  ax-mulcl 8277  ax-mulrcl 8278  ax-addcom 8279  ax-mulcom 8280  ax-addass 8281  ax-mulass 8282  ax-distr 8283  ax-i2m1 8284  ax-0lt1 8285  ax-1rid 8286  ax-0id 8287  ax-rnegex 8288  ax-precex 8289  ax-cnre 8290  ax-pre-ltirr 8291  ax-pre-ltwlin 8292  ax-pre-lttrn 8293  ax-pre-apti 8294  ax-pre-ltadd 8295  ax-pre-mulgt0 8296  ax-pre-mulext 8297  ax-arch 8298  ax-caucvg 8299
This proof depends on definitions:  df-bi 117  df-stab 843  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3715  df-pr 3716  df-op 3718  df-uni 3936  df-int 3971  df-iun 4014  df-br 4131  df-opab 4193  df-mpt 4194  df-tr 4230  df-id 4438  df-po 4441  df-iso 4442  df-iord 4511  df-on 4513  df-ilim 4514  df-suc 4516  df-iom 4738  df-xp 4780  df-rel 4781  df-cnv 4782  df-co 4783  df-dm 4784  df-rn 4785  df-res 4786  df-ima 4787  df-iota 5337  df-fun 5379  df-fn 5380  df-f 5381  df-f1 5382  df-fo 5383  df-f1o 5384  df-fv 5385  df-isom 5386  df-riota 6038  df-ov 6088  df-oprab 6089  df-mpo 6090  df-1st 6374  df-2nd 6375  df-recs 6576  df-irdg 6641  df-frec 6662  df-1o 6687  df-2o 6688  df-oadd 6691  df-er 6807  df-en 7023  df-dom 7024  df-fin 7025  df-sup 7324  df-pnf 8362  df-mnf 8363  df-xr 8364  df-ltxr 8365  df-le 8366  df-sub 8499  df-neg 8500  df-reap 8904  df-ap 8911  df-div 9004  df-inn 9306  df-2 9364  df-3 9365  df-4 9366  df-n0 9566  df-z 9647  df-uz 9924  df-q 10022  df-rp 10057  df-fz 10414  df-fzo 10552  df-fl 10707  df-mod 10762  df-seqfrec 10887  df-exp 10978  df-ihash 11217  df-cj 11609  df-re 11610  df-im 11611  df-rsqrt 11766  df-abs 11767  df-clim 12047  df-proddc 12320  df-dvds 12557  df-gcd 12733  df-prm 12888  df-phi 12991
This theorem is used by:  nnnn0modprm0  13036
  Copyright terms: Public domain W3C validator