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

Theorem odzdvds 12836
Description: The only powers of  A that are congruent to  1 are the multiples of the order of  A. (Contributed by Mario Carneiro, 28-Feb-2014.) (Proof shortened by AV, 26-Sep-2020.)
Assertion
Ref Expression
odzdvds  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( N  ||  (
( A ^ K
)  -  1 )  <-> 
( ( odZ `  N ) `  A
)  ||  K )
)

Proof of Theorem odzdvds
Dummy variable  n is distinct from all other variables.
StepHypRef Expression
1 nn0z 9499 . . . . . . . . . 10  |-  ( K  e.  NN0  ->  K  e.  ZZ )
2 zq 9860 . . . . . . . . . 10  |-  ( K  e.  ZZ  ->  K  e.  QQ )
31, 2syl 14 . . . . . . . . 9  |-  ( K  e.  NN0  ->  K  e.  QQ )
43adantl 277 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  K  e.  QQ )
5 odzcl 12834 . . . . . . . . . 10  |-  ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  ->  (
( odZ `  N ) `  A
)  e.  NN )
65adantr 276 . . . . . . . . 9  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( odZ `  N ) `  A
)  e.  NN )
7 nnq 9867 . . . . . . . . 9  |-  ( ( ( odZ `  N ) `  A
)  e.  NN  ->  ( ( odZ `  N ) `  A
)  e.  QQ )
86, 7syl 14 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( odZ `  N ) `  A
)  e.  QQ )
96nngt0d 9187 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
0  <  ( ( odZ `  N ) `
 A ) )
10 modqlt 10596 . . . . . . . 8  |-  ( ( K  e.  QQ  /\  ( ( odZ `  N ) `  A
)  e.  QQ  /\  0  <  ( ( odZ `  N ) `  A ) )  -> 
( K  mod  (
( odZ `  N ) `  A
) )  <  (
( odZ `  N ) `  A
) )
114, 8, 9, 10syl3anc 1273 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( K  mod  (
( odZ `  N ) `  A
) )  <  (
( odZ `  N ) `  A
) )
121adantl 277 . . . . . . . . . 10  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  K  e.  ZZ )
1312, 6zmodcld 10608 . . . . . . . . 9  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( K  mod  (
( odZ `  N ) `  A
) )  e.  NN0 )
1413nn0zd 9600 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( K  mod  (
( odZ `  N ) `  A
) )  e.  ZZ )
156nnzd 9601 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( odZ `  N ) `  A
)  e.  ZZ )
16 zltnle 9525 . . . . . . . 8  |-  ( ( ( K  mod  (
( odZ `  N ) `  A
) )  e.  ZZ  /\  ( ( odZ `  N ) `  A
)  e.  ZZ )  ->  ( ( K  mod  ( ( odZ `  N ) `  A ) )  < 
( ( odZ `  N ) `  A
)  <->  -.  ( ( odZ `  N ) `
 A )  <_ 
( K  mod  (
( odZ `  N ) `  A
) ) ) )
1714, 15, 16syl2anc 411 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( K  mod  ( ( odZ `  N ) `  A
) )  <  (
( odZ `  N ) `  A
)  <->  -.  ( ( odZ `  N ) `
 A )  <_ 
( K  mod  (
( odZ `  N ) `  A
) ) ) )
1811, 17mpbid 147 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  -.  ( ( odZ `  N ) `  A
)  <_  ( K  mod  ( ( odZ `  N ) `  A
) ) )
19 1zzd 9506 . . . . . . . . . 10  |-  ( ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  /\  (
( K  mod  (
( odZ `  N ) `  A
) )  e.  NN  /\  N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )  ->  1  e.  ZZ )
20 nnuz 9792 . . . . . . . . . . 11  |-  NN  =  ( ZZ>= `  1 )
2120rabeqi 2795 . . . . . . . . . 10  |-  { n  e.  NN  |  N  ||  ( ( A ^
n )  -  1 ) }  =  {
n  e.  ( ZZ>= ` 
1 )  |  N  ||  ( ( A ^
n )  -  1 ) }
22 oveq2 6026 . . . . . . . . . . . . . . 15  |-  ( n  =  ( K  mod  ( ( odZ `  N ) `  A
) )  ->  ( A ^ n )  =  ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) ) )
2322oveq1d 6033 . . . . . . . . . . . . . 14  |-  ( n  =  ( K  mod  ( ( odZ `  N ) `  A
) )  ->  (
( A ^ n
)  -  1 )  =  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) )  - 
1 ) )
2423breq2d 4100 . . . . . . . . . . . . 13  |-  ( n  =  ( K  mod  ( ( odZ `  N ) `  A
) )  ->  ( N  ||  ( ( A ^ n )  - 
1 )  <->  N  ||  (
( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )
2524elrab 2962 . . . . . . . . . . . 12  |-  ( ( K  mod  ( ( odZ `  N
) `  A )
)  e.  { n  e.  NN  |  N  ||  ( ( A ^
n )  -  1 ) }  <->  ( ( K  mod  ( ( odZ `  N ) `  A ) )  e.  NN  /\  N  ||  ( ( A ^
( K  mod  (
( odZ `  N ) `  A
) ) )  - 
1 ) ) )
2625biimpri 133 . . . . . . . . . . 11  |-  ( ( ( K  mod  (
( odZ `  N ) `  A
) )  e.  NN  /\  N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) )  ->  ( K  mod  ( ( odZ `  N ) `  A
) )  e.  {
n  e.  NN  |  N  ||  ( ( A ^ n )  - 
1 ) } )
2726adantl 277 . . . . . . . . . 10  |-  ( ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  /\  (
( K  mod  (
( odZ `  N ) `  A
) )  e.  NN  /\  N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )  ->  ( K  mod  ( ( odZ `  N ) `  A
) )  e.  {
n  e.  NN  |  N  ||  ( ( A ^ n )  - 
1 ) } )
28 simp1 1023 . . . . . . . . . . . 12  |-  ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  ->  N  e.  NN )
2928ad3antrrr 492 . . . . . . . . . . 11  |-  ( ( ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  /\  (
( K  mod  (
( odZ `  N ) `  A
) )  e.  NN  /\  N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )  /\  n  e.  ( 1 ... ( K  mod  ( ( odZ `  N ) `  A ) ) ) )  ->  N  e.  NN )
30 simp2 1024 . . . . . . . . . . . . . 14  |-  ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  ->  A  e.  ZZ )
3130ad3antrrr 492 . . . . . . . . . . . . 13  |-  ( ( ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  /\  (
( K  mod  (
( odZ `  N ) `  A
) )  e.  NN  /\  N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )  /\  n  e.  ( 1 ... ( K  mod  ( ( odZ `  N ) `  A ) ) ) )  ->  A  e.  ZZ )
32 elfznn 10289 . . . . . . . . . . . . . . 15  |-  ( n  e.  ( 1 ... ( K  mod  (
( odZ `  N ) `  A
) ) )  ->  n  e.  NN )
3332nnnn0d 9455 . . . . . . . . . . . . . 14  |-  ( n  e.  ( 1 ... ( K  mod  (
( odZ `  N ) `  A
) ) )  ->  n  e.  NN0 )
3433adantl 277 . . . . . . . . . . . . 13  |-  ( ( ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  /\  (
( K  mod  (
( odZ `  N ) `  A
) )  e.  NN  /\  N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )  /\  n  e.  ( 1 ... ( K  mod  ( ( odZ `  N ) `  A ) ) ) )  ->  n  e.  NN0 )
35 zexpcl 10817 . . . . . . . . . . . . 13  |-  ( ( A  e.  ZZ  /\  n  e.  NN0 )  -> 
( A ^ n
)  e.  ZZ )
3631, 34, 35syl2anc 411 . . . . . . . . . . . 12  |-  ( ( ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  /\  (
( K  mod  (
( odZ `  N ) `  A
) )  e.  NN  /\  N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )  /\  n  e.  ( 1 ... ( K  mod  ( ( odZ `  N ) `  A ) ) ) )  ->  ( A ^ n )  e.  ZZ )
37 peano2zm 9517 . . . . . . . . . . . 12  |-  ( ( A ^ n )  e.  ZZ  ->  (
( A ^ n
)  -  1 )  e.  ZZ )
3836, 37syl 14 . . . . . . . . . . 11  |-  ( ( ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  /\  (
( K  mod  (
( odZ `  N ) `  A
) )  e.  NN  /\  N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )  /\  n  e.  ( 1 ... ( K  mod  ( ( odZ `  N ) `  A ) ) ) )  ->  ( ( A ^ n )  - 
1 )  e.  ZZ )
39 dvdsdc 12377 . . . . . . . . . . 11  |-  ( ( N  e.  NN  /\  ( ( A ^
n )  -  1 )  e.  ZZ )  -> DECID 
N  ||  ( ( A ^ n )  - 
1 ) )
4029, 38, 39syl2anc 411 . . . . . . . . . 10  |-  ( ( ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  /\  (
( K  mod  (
( odZ `  N ) `  A
) )  e.  NN  /\  N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )  /\  n  e.  ( 1 ... ( K  mod  ( ( odZ `  N ) `  A ) ) ) )  -> DECID  N  ||  ( ( A ^ n )  -  1 ) )
4119, 21, 27, 40infssuzledc 10495 . . . . . . . . 9  |-  ( ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  /\  (
( K  mod  (
( odZ `  N ) `  A
) )  e.  NN  /\  N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )  -> inf ( {
n  e.  NN  |  N  ||  ( ( A ^ n )  - 
1 ) } ,  RR ,  <  )  <_ 
( K  mod  (
( odZ `  N ) `  A
) ) )
4241ex 115 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( K  mod  ( ( odZ `  N ) `  A ) )  e.  NN  /\  N  ||  ( ( A ^
( K  mod  (
( odZ `  N ) `  A
) ) )  - 
1 ) )  -> inf ( { n  e.  NN  |  N  ||  ( ( A ^ n )  -  1 ) } ,  RR ,  <  )  <_  ( K  mod  ( ( odZ `  N ) `  A
) ) ) )
4342ancomsd 269 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( N  ||  ( ( A ^
( K  mod  (
( odZ `  N ) `  A
) ) )  - 
1 )  /\  ( K  mod  ( ( odZ `  N ) `  A ) )  e.  NN )  -> inf ( { n  e.  NN  |  N  ||  ( ( A ^ n )  - 
1 ) } ,  RR ,  <  )  <_ 
( K  mod  (
( odZ `  N ) `  A
) ) ) )
44 odzval 12832 . . . . . . . . 9  |-  ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  ->  (
( odZ `  N ) `  A
)  = inf ( { n  e.  NN  |  N  ||  ( ( A ^ n )  - 
1 ) } ,  RR ,  <  ) )
4544adantr 276 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( odZ `  N ) `  A
)  = inf ( { n  e.  NN  |  N  ||  ( ( A ^ n )  - 
1 ) } ,  RR ,  <  ) )
4645breq1d 4098 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( odZ `  N ) `  A )  <_  ( K  mod  ( ( odZ `  N ) `  A ) )  <-> inf ( {
n  e.  NN  |  N  ||  ( ( A ^ n )  - 
1 ) } ,  RR ,  <  )  <_ 
( K  mod  (
( odZ `  N ) `  A
) ) ) )
4743, 46sylibrd 169 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( N  ||  ( ( A ^
( K  mod  (
( odZ `  N ) `  A
) ) )  - 
1 )  /\  ( K  mod  ( ( odZ `  N ) `  A ) )  e.  NN )  ->  (
( odZ `  N ) `  A
)  <_  ( K  mod  ( ( odZ `  N ) `  A
) ) ) )
4818, 47mtod 669 . . . . 5  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  -.  ( N  ||  (
( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 )  /\  ( K  mod  ( ( odZ `  N
) `  A )
)  e.  NN ) )
49 imnan 696 . . . . 5  |-  ( ( N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 )  ->  -.  ( K  mod  (
( odZ `  N ) `  A
) )  e.  NN ) 
<->  -.  ( N  ||  ( ( A ^
( K  mod  (
( odZ `  N ) `  A
) ) )  - 
1 )  /\  ( K  mod  ( ( odZ `  N ) `  A ) )  e.  NN ) )
5048, 49sylibr 134 . . . 4  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( N  ||  (
( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 )  ->  -.  ( K  mod  (
( odZ `  N ) `  A
) )  e.  NN ) )
51 elnn0 9404 . . . . . 6  |-  ( ( K  mod  ( ( odZ `  N
) `  A )
)  e.  NN0  <->  ( ( K  mod  ( ( odZ `  N ) `  A ) )  e.  NN  \/  ( K  mod  ( ( odZ `  N ) `  A ) )  =  0 ) )
5213, 51sylib 122 . . . . 5  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( K  mod  ( ( odZ `  N ) `  A
) )  e.  NN  \/  ( K  mod  (
( odZ `  N ) `  A
) )  =  0 ) )
5352ord 731 . . . 4  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( -.  ( K  mod  ( ( odZ `  N ) `  A ) )  e.  NN  ->  ( K  mod  ( ( odZ `  N ) `  A
) )  =  0 ) )
5450, 53syld 45 . . 3  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( N  ||  (
( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 )  -> 
( K  mod  (
( odZ `  N ) `  A
) )  =  0 ) )
55 simpl1 1026 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  N  e.  NN )
5655nnzd 9601 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  N  e.  ZZ )
57 dvds0 12385 . . . . . 6  |-  ( N  e.  ZZ  ->  N  ||  0 )
5856, 57syl 14 . . . . 5  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  N  ||  0 )
59 simpl2 1027 . . . . . . . . 9  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  A  e.  ZZ )
6059zcnd 9603 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  A  e.  CC )
6160exp0d 10930 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( A ^ 0 )  =  1 )
6261oveq1d 6033 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( A ^
0 )  -  1 )  =  ( 1  -  1 ) )
63 1m1e0 9212 . . . . . 6  |-  ( 1  -  1 )  =  0
6462, 63eqtrdi 2280 . . . . 5  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( A ^
0 )  -  1 )  =  0 )
6558, 64breqtrrd 4116 . . . 4  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  N  ||  ( ( A ^ 0 )  - 
1 ) )
66 oveq2 6026 . . . . . 6  |-  ( ( K  mod  ( ( odZ `  N
) `  A )
)  =  0  -> 
( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  =  ( A ^
0 ) )
6766oveq1d 6033 . . . . 5  |-  ( ( K  mod  ( ( odZ `  N
) `  A )
)  =  0  -> 
( ( A ^
( K  mod  (
( odZ `  N ) `  A
) ) )  - 
1 )  =  ( ( A ^ 0 )  -  1 ) )
6867breq2d 4100 . . . 4  |-  ( ( K  mod  ( ( odZ `  N
) `  A )
)  =  0  -> 
( N  ||  (
( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 )  <->  N  ||  (
( A ^ 0 )  -  1 ) ) )
6965, 68syl5ibrcom 157 . . 3  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( K  mod  ( ( odZ `  N ) `  A
) )  =  0  ->  N  ||  (
( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 ) ) )
7054, 69impbid 129 . 2  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( N  ||  (
( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  -  1 )  <->  ( K  mod  ( ( odZ `  N ) `  A
) )  =  0 ) )
716nnnn0d 9455 . . . . . . . . 9  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( odZ `  N ) `  A
)  e.  NN0 )
72 znq 9858 . . . . . . . . . . 11  |-  ( ( K  e.  ZZ  /\  ( ( odZ `  N ) `  A
)  e.  NN )  ->  ( K  / 
( ( odZ `  N ) `  A
) )  e.  QQ )
7312, 6, 72syl2anc 411 . . . . . . . . . 10  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( K  /  (
( odZ `  N ) `  A
) )  e.  QQ )
74 nn0ge0 9427 . . . . . . . . . . . 12  |-  ( K  e.  NN0  ->  0  <_  K )
7574adantl 277 . . . . . . . . . . 11  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
0  <_  K )
76 nn0re 9411 . . . . . . . . . . . . 13  |-  ( K  e.  NN0  ->  K  e.  RR )
7776adantl 277 . . . . . . . . . . . 12  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  K  e.  RR )
786nnred 9156 . . . . . . . . . . . 12  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( odZ `  N ) `  A
)  e.  RR )
79 ge0div 9051 . . . . . . . . . . . 12  |-  ( ( K  e.  RR  /\  ( ( odZ `  N ) `  A
)  e.  RR  /\  0  <  ( ( odZ `  N ) `  A ) )  -> 
( 0  <_  K  <->  0  <_  ( K  / 
( ( odZ `  N ) `  A
) ) ) )
8077, 78, 9, 79syl3anc 1273 . . . . . . . . . . 11  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( 0  <_  K  <->  0  <_  ( K  / 
( ( odZ `  N ) `  A
) ) ) )
8175, 80mpbid 147 . . . . . . . . . 10  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
0  <_  ( K  /  ( ( odZ `  N ) `  A ) ) )
82 flqge0nn0 10554 . . . . . . . . . 10  |-  ( ( ( K  /  (
( odZ `  N ) `  A
) )  e.  QQ  /\  0  <_  ( K  /  ( ( odZ `  N ) `  A ) ) )  ->  ( |_ `  ( K  /  (
( odZ `  N ) `  A
) ) )  e. 
NN0 )
8373, 81, 82syl2anc 411 . . . . . . . . 9  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) )  e.  NN0 )
8471, 83nn0mulcld 9460 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( odZ `  N ) `  A )  x.  ( |_ `  ( K  / 
( ( odZ `  N ) `  A
) ) ) )  e.  NN0 )
85 zexpcl 10817 . . . . . . . 8  |-  ( ( A  e.  ZZ  /\  ( ( ( odZ `  N ) `  A )  x.  ( |_ `  ( K  / 
( ( odZ `  N ) `  A
) ) ) )  e.  NN0 )  -> 
( A ^ (
( ( odZ `  N ) `  A
)  x.  ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) )  e.  ZZ )
8659, 84, 85syl2anc 411 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( A ^ (
( ( odZ `  N ) `  A
)  x.  ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) )  e.  ZZ )
87 zq 9860 . . . . . . 7  |-  ( ( A ^ ( ( ( odZ `  N ) `  A
)  x.  ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) )  e.  ZZ  ->  ( A ^ ( ( ( odZ `  N ) `  A
)  x.  ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) )  e.  QQ )
8886, 87syl 14 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( A ^ (
( ( odZ `  N ) `  A
)  x.  ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) )  e.  QQ )
89 1z 9505 . . . . . . 7  |-  1  e.  ZZ
90 zq 9860 . . . . . . 7  |-  ( 1  e.  ZZ  ->  1  e.  QQ )
9189, 90mp1i 10 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
1  e.  QQ )
92 zexpcl 10817 . . . . . . 7  |-  ( ( A  e.  ZZ  /\  ( K  mod  ( ( odZ `  N
) `  A )
)  e.  NN0 )  ->  ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  e.  ZZ )
9359, 13, 92syl2anc 411 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  e.  ZZ )
94 nnq 9867 . . . . . . 7  |-  ( N  e.  NN  ->  N  e.  QQ )
9555, 94syl 14 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  N  e.  QQ )
9655nngt0d 9187 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
0  <  N )
9760, 83, 71expmuld 10939 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( A ^ (
( ( odZ `  N ) `  A
)  x.  ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) )  =  ( ( A ^ ( ( odZ `  N
) `  A )
) ^ ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) )
9897oveq1d 6033 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( A ^
( ( ( odZ `  N ) `  A )  x.  ( |_ `  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) )  mod  N )  =  ( ( ( A ^ ( ( odZ `  N
) `  A )
) ^ ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) )  mod  N ) )
99 zexpcl 10817 . . . . . . . . 9  |-  ( ( A  e.  ZZ  /\  ( ( odZ `  N ) `  A
)  e.  NN0 )  ->  ( A ^ (
( odZ `  N ) `  A
) )  e.  ZZ )
10059, 71, 99syl2anc 411 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( A ^ (
( odZ `  N ) `  A
) )  e.  ZZ )
101 1zzd 9506 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
1  e.  ZZ )
102 odzid 12835 . . . . . . . . . 10  |-  ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  ->  N  ||  ( ( A ^
( ( odZ `  N ) `  A
) )  -  1 ) )
103102adantr 276 . . . . . . . . 9  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  N  ||  ( ( A ^ ( ( odZ `  N ) `  A ) )  - 
1 ) )
104 moddvds 12378 . . . . . . . . . 10  |-  ( ( N  e.  NN  /\  ( A ^ ( ( odZ `  N
) `  A )
)  e.  ZZ  /\  1  e.  ZZ )  ->  ( ( ( A ^ ( ( odZ `  N ) `  A ) )  mod 
N )  =  ( 1  mod  N )  <-> 
N  ||  ( ( A ^ ( ( odZ `  N ) `  A ) )  - 
1 ) ) )
10555, 100, 101, 104syl3anc 1273 . . . . . . . . 9  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( A ^ ( ( odZ `  N ) `  A ) )  mod 
N )  =  ( 1  mod  N )  <-> 
N  ||  ( ( A ^ ( ( odZ `  N ) `  A ) )  - 
1 ) ) )
106103, 105mpbird 167 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( A ^
( ( odZ `  N ) `  A
) )  mod  N
)  =  ( 1  mod  N ) )
107100, 101, 83, 95, 96, 106modqexp 10929 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( A ^ ( ( odZ `  N ) `  A ) ) ^
( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) ) )  mod  N )  =  ( ( 1 ^ ( |_ `  ( K  /  (
( odZ `  N ) `  A
) ) ) )  mod  N ) )
10873flqcld 10538 . . . . . . . . 9  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) )  e.  ZZ )
109 1exp 10831 . . . . . . . . 9  |-  ( ( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) )  e.  ZZ  ->  (
1 ^ ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) )  =  1 )
110108, 109syl 14 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( 1 ^ ( |_ `  ( K  / 
( ( odZ `  N ) `  A
) ) ) )  =  1 )
111110oveq1d 6033 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( 1 ^ ( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) ) )  mod  N )  =  ( 1  mod 
N ) )
11298, 107, 1113eqtrd 2268 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( A ^
( ( ( odZ `  N ) `  A )  x.  ( |_ `  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) )  mod  N )  =  ( 1  mod 
N ) )
11388, 91, 93, 95, 96, 112modqmul1 10640 . . . . 5  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( A ^ ( ( ( odZ `  N
) `  A )  x.  ( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) ) ) )  x.  ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) ) )  mod  N )  =  ( ( 1  x.  ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) ) )  mod  N ) )
11460, 13, 84expaddd 10938 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( A ^ (
( ( ( odZ `  N ) `  A )  x.  ( |_ `  ( K  / 
( ( odZ `  N ) `  A
) ) ) )  +  ( K  mod  ( ( odZ `  N ) `  A
) ) ) )  =  ( ( A ^ ( ( ( odZ `  N
) `  A )  x.  ( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) ) ) )  x.  ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) ) ) )
115 modqval 10587 . . . . . . . . . . 11  |-  ( ( K  e.  QQ  /\  ( ( odZ `  N ) `  A
)  e.  QQ  /\  0  <  ( ( odZ `  N ) `  A ) )  -> 
( K  mod  (
( odZ `  N ) `  A
) )  =  ( K  -  ( ( ( odZ `  N ) `  A
)  x.  ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) ) )
1164, 8, 9, 115syl3anc 1273 . . . . . . . . . 10  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( K  mod  (
( odZ `  N ) `  A
) )  =  ( K  -  ( ( ( odZ `  N ) `  A
)  x.  ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) ) )
117116oveq2d 6034 . . . . . . . . 9  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( ( odZ `  N
) `  A )  x.  ( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) ) )  +  ( K  mod  ( ( odZ `  N ) `  A ) ) )  =  ( ( ( ( odZ `  N ) `  A
)  x.  ( |_
`  ( K  / 
( ( odZ `  N ) `  A
) ) ) )  +  ( K  -  ( ( ( odZ `  N ) `  A )  x.  ( |_ `  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) ) ) )
11884nn0cnd 9457 . . . . . . . . . 10  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( odZ `  N ) `  A )  x.  ( |_ `  ( K  / 
( ( odZ `  N ) `  A
) ) ) )  e.  CC )
11977recnd 8208 . . . . . . . . . 10  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  ->  K  e.  CC )
120118, 119pncan3d 8493 . . . . . . . . 9  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( ( odZ `  N
) `  A )  x.  ( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) ) )  +  ( K  -  ( ( ( odZ `  N
) `  A )  x.  ( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) ) ) ) )  =  K )
121117, 120eqtrd 2264 . . . . . . . 8  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( ( odZ `  N
) `  A )  x.  ( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) ) )  +  ( K  mod  ( ( odZ `  N ) `  A ) ) )  =  K )
122121oveq2d 6034 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( A ^ (
( ( ( odZ `  N ) `  A )  x.  ( |_ `  ( K  / 
( ( odZ `  N ) `  A
) ) ) )  +  ( K  mod  ( ( odZ `  N ) `  A
) ) ) )  =  ( A ^ K ) )
123114, 122eqtr3d 2266 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( A ^
( ( ( odZ `  N ) `  A )  x.  ( |_ `  ( K  / 
( ( odZ `  N ) `  A
) ) ) ) )  x.  ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) ) )  =  ( A ^ K ) )
124123oveq1d 6033 . . . . 5  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( A ^ ( ( ( odZ `  N
) `  A )  x.  ( |_ `  ( K  /  ( ( odZ `  N ) `  A ) ) ) ) )  x.  ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) ) )  mod  N )  =  ( ( A ^ K )  mod  N
) )
12593zcnd 9603 . . . . . . 7  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  e.  CC )
126125mulid2d 8198 . . . . . 6  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( 1  x.  ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) ) )  =  ( A ^
( K  mod  (
( odZ `  N ) `  A
) ) ) )
127126oveq1d 6033 . . . . 5  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( 1  x.  ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) ) )  mod  N )  =  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) )  mod 
N ) )
128113, 124, 1273eqtr3d 2272 . . . 4  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( A ^ K )  mod  N
)  =  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  mod  N ) )
129128eqeq1d 2240 . . 3  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( A ^ K )  mod 
N )  =  ( 1  mod  N )  <-> 
( ( A ^
( K  mod  (
( odZ `  N ) `  A
) ) )  mod 
N )  =  ( 1  mod  N ) ) )
130 zexpcl 10817 . . . . 5  |-  ( ( A  e.  ZZ  /\  K  e.  NN0 )  -> 
( A ^ K
)  e.  ZZ )
13159, 130sylancom 420 . . . 4  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( A ^ K
)  e.  ZZ )
132 moddvds 12378 . . . 4  |-  ( ( N  e.  NN  /\  ( A ^ K )  e.  ZZ  /\  1  e.  ZZ )  ->  (
( ( A ^ K )  mod  N
)  =  ( 1  mod  N )  <->  N  ||  (
( A ^ K
)  -  1 ) ) )
13355, 131, 101, 132syl3anc 1273 . . 3  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( A ^ K )  mod 
N )  =  ( 1  mod  N )  <-> 
N  ||  ( ( A ^ K )  - 
1 ) ) )
134 moddvds 12378 . . . 4  |-  ( ( N  e.  NN  /\  ( A ^ ( K  mod  ( ( odZ `  N ) `  A ) ) )  e.  ZZ  /\  1  e.  ZZ )  ->  (
( ( A ^
( K  mod  (
( odZ `  N ) `  A
) ) )  mod 
N )  =  ( 1  mod  N )  <-> 
N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) )  - 
1 ) ) )
13555, 93, 101, 134syl3anc 1273 . . 3  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) )  mod 
N )  =  ( 1  mod  N )  <-> 
N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) )  - 
1 ) ) )
136129, 133, 1353bitr3d 218 . 2  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( N  ||  (
( A ^ K
)  -  1 )  <-> 
N  ||  ( ( A ^ ( K  mod  ( ( odZ `  N ) `  A
) ) )  - 
1 ) ) )
137 dvdsval3 12370 . . 3  |-  ( ( ( ( odZ `  N ) `  A
)  e.  NN  /\  K  e.  ZZ )  ->  ( ( ( odZ `  N ) `  A )  ||  K  <->  ( K  mod  ( ( odZ `  N
) `  A )
)  =  0 ) )
1386, 12, 137syl2anc 411 . 2  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( ( ( odZ `  N ) `  A )  ||  K  <->  ( K  mod  ( ( odZ `  N
) `  A )
)  =  0 ) )
13970, 136, 1383bitr4d 220 1  |-  ( ( ( N  e.  NN  /\  A  e.  ZZ  /\  ( A  gcd  N )  =  1 )  /\  K  e.  NN0 )  -> 
( N  ||  (
( A ^ K
)  -  1 )  <-> 
( ( odZ `  N ) `  A
)  ||  K )
)
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    /\ wa 104    <-> wb 105    \/ wo 715  DECID wdc 841    /\ w3a 1004    = wceq 1397    e. wcel 2202   {crab 2514   class class class wbr 4088   ` cfv 5326  (class class class)co 6018  infcinf 7182   RRcr 8031   0cc0 8032   1c1 8033    + caddc 8035    x. cmul 8037    < clt 8214    <_ cle 8215    - cmin 8350    / cdiv 8852   NNcn 9143   NN0cn0 9402   ZZcz 9479   ZZ>=cuz 9755   QQcq 9853   ...cfz 10243   |_cfl 10529    mod cmo 10585   ^cexp 10801    || cdvds 12366    gcd cgcd 12542   odZcodz 12798
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 716  ax-5 1495  ax-7 1496  ax-gen 1497  ax-ie1 1541  ax-ie2 1542  ax-8 1552  ax-10 1553  ax-11 1554  ax-i12 1555  ax-bndl 1557  ax-4 1558  ax-17 1574  ax-i9 1578  ax-ial 1582  ax-i5r 1583  ax-13 2204  ax-14 2205  ax-ext 2213  ax-coll 4204  ax-sep 4207  ax-nul 4215  ax-pow 4264  ax-pr 4299  ax-un 4530  ax-setind 4635  ax-iinf 4686  ax-cnex 8123  ax-resscn 8124  ax-1cn 8125  ax-1re 8126  ax-icn 8127  ax-addcl 8128  ax-addrcl 8129  ax-mulcl 8130  ax-mulrcl 8131  ax-addcom 8132  ax-mulcom 8133  ax-addass 8134  ax-mulass 8135  ax-distr 8136  ax-i2m1 8137  ax-0lt1 8138  ax-1rid 8139  ax-0id 8140  ax-rnegex 8141  ax-precex 8142  ax-cnre 8143  ax-pre-ltirr 8144  ax-pre-ltwlin 8145  ax-pre-lttrn 8146  ax-pre-apti 8147  ax-pre-ltadd 8148  ax-pre-mulgt0 8149  ax-pre-mulext 8150  ax-arch 8151  ax-caucvg 8152
This theorem depends on definitions:  df-bi 117  df-stab 838  df-dc 842  df-3or 1005  df-3an 1006  df-tru 1400  df-fal 1403  df-nf 1509  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2363  df-ne 2403  df-nel 2498  df-ral 2515  df-rex 2516  df-reu 2517  df-rmo 2518  df-rab 2519  df-v 2804  df-sbc 3032  df-csb 3128  df-dif 3202  df-un 3204  df-in 3206  df-ss 3213  df-nul 3495  df-if 3606  df-pw 3654  df-sn 3675  df-pr 3676  df-op 3678  df-uni 3894  df-int 3929  df-iun 3972  df-br 4089  df-opab 4151  df-mpt 4152  df-tr 4188  df-id 4390  df-po 4393  df-iso 4394  df-iord 4463  df-on 4465  df-ilim 4466  df-suc 4468  df-iom 4689  df-xp 4731  df-rel 4732  df-cnv 4733  df-co 4734  df-dm 4735  df-rn 4736  df-res 4737  df-ima 4738  df-iota 5286  df-fun 5328  df-fn 5329  df-f 5330  df-f1 5331  df-fo 5332  df-f1o 5333  df-fv 5334  df-isom 5335  df-riota 5971  df-ov 6021  df-oprab 6022  df-mpo 6023  df-1st 6303  df-2nd 6304  df-recs 6471  df-irdg 6536  df-frec 6557  df-1o 6582  df-oadd 6586  df-er 6702  df-en 6910  df-dom 6911  df-fin 6912  df-sup 7183  df-inf 7184  df-pnf 8216  df-mnf 8217  df-xr 8218  df-ltxr 8219  df-le 8220  df-sub 8352  df-neg 8353  df-reap 8755  df-ap 8762  df-div 8853  df-inn 9144  df-2 9202  df-3 9203  df-4 9204  df-n0 9403  df-z 9480  df-uz 9756  df-q 9854  df-rp 9889  df-fz 10244  df-fzo 10378  df-fl 10531  df-mod 10586  df-seqfrec 10711  df-exp 10802  df-ihash 11039  df-cj 11420  df-re 11421  df-im 11422  df-rsqrt 11576  df-abs 11577  df-clim 11857  df-proddc 12130  df-dvds 12367  df-gcd 12543  df-odz 12800  df-phi 12801
This theorem is referenced by:  odzphi  12837  pockthlem  12947
  Copyright terms: Public domain W3C validator