MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  isprm5 Structured version   Unicode version

Theorem isprm5 14112
Description: One need only check prime divisors of  P up to  sqr P in order to ensure primality. (Contributed by Mario Carneiro, 18-Feb-2014.)
Assertion
Ref Expression
isprm5  |-  ( P  e.  Prime  <->  ( P  e.  ( ZZ>= `  2 )  /\  A. z  e.  Prime  ( ( z ^ 2 )  <_  P  ->  -.  z  ||  P ) ) )
Distinct variable group:    z, P

Proof of Theorem isprm5
Dummy variable  x is distinct from all other variables.
StepHypRef Expression
1 isprm4 14086 . 2  |-  ( P  e.  Prime  <->  ( P  e.  ( ZZ>= `  2 )  /\  A. z  e.  (
ZZ>= `  2 ) ( z  ||  P  -> 
z  =  P ) ) )
2 prmuz2 14094 . . . . . . . 8  |-  ( z  e.  Prime  ->  z  e.  ( ZZ>= `  2 )
)
32a1i 11 . . . . . . 7  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( z  e.  Prime  ->  z  e.  ( ZZ>= `  2 )
) )
4 eluz2b2 11154 . . . . . . . . . . . . 13  |-  ( P  e.  ( ZZ>= `  2
)  <->  ( P  e.  NN  /\  1  < 
P ) )
54simprbi 464 . . . . . . . . . . . 12  |-  ( P  e.  ( ZZ>= `  2
)  ->  1  <  P )
6 eluzelre 11092 . . . . . . . . . . . . 13  |-  ( P  e.  ( ZZ>= `  2
)  ->  P  e.  RR )
74simplbi 460 . . . . . . . . . . . . . 14  |-  ( P  e.  ( ZZ>= `  2
)  ->  P  e.  NN )
87nngt0d 10579 . . . . . . . . . . . . 13  |-  ( P  e.  ( ZZ>= `  2
)  ->  0  <  P )
9 ltmulgt11 10402 . . . . . . . . . . . . 13  |-  ( ( P  e.  RR  /\  P  e.  RR  /\  0  <  P )  ->  (
1  <  P  <->  P  <  ( P  x.  P ) ) )
106, 6, 8, 9syl3anc 1228 . . . . . . . . . . . 12  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( 1  <  P  <->  P  <  ( P  x.  P ) ) )
115, 10mpbid 210 . . . . . . . . . . 11  |-  ( P  e.  ( ZZ>= `  2
)  ->  P  <  ( P  x.  P ) )
126, 6remulcld 9624 . . . . . . . . . . . 12  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( P  x.  P )  e.  RR )
136, 12ltnled 9731 . . . . . . . . . . 11  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( P  <  ( P  x.  P
)  <->  -.  ( P  x.  P )  <_  P
) )
1411, 13mpbid 210 . . . . . . . . . 10  |-  ( P  e.  ( ZZ>= `  2
)  ->  -.  ( P  x.  P )  <_  P )
15 oveq12 6293 . . . . . . . . . . . . 13  |-  ( ( z  =  P  /\  z  =  P )  ->  ( z  x.  z
)  =  ( P  x.  P ) )
1615anidms 645 . . . . . . . . . . . 12  |-  ( z  =  P  ->  (
z  x.  z )  =  ( P  x.  P ) )
1716breq1d 4457 . . . . . . . . . . 11  |-  ( z  =  P  ->  (
( z  x.  z
)  <_  P  <->  ( P  x.  P )  <_  P
) )
1817notbid 294 . . . . . . . . . 10  |-  ( z  =  P  ->  ( -.  ( z  x.  z
)  <_  P  <->  -.  ( P  x.  P )  <_  P ) )
1914, 18syl5ibrcom 222 . . . . . . . . 9  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( z  =  P  ->  -.  (
z  x.  z )  <_  P ) )
2019imim2d 52 . . . . . . . 8  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( (
z  ||  P  ->  z  =  P )  -> 
( z  ||  P  ->  -.  ( z  x.  z )  <_  P
) ) )
21 con2 116 . . . . . . . 8  |-  ( ( z  ||  P  ->  -.  ( z  x.  z
)  <_  P )  ->  ( ( z  x.  z )  <_  P  ->  -.  z  ||  P
) )
2220, 21syl6 33 . . . . . . 7  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( (
z  ||  P  ->  z  =  P )  -> 
( ( z  x.  z )  <_  P  ->  -.  z  ||  P
) ) )
233, 22imim12d 74 . . . . . 6  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( (
z  e.  ( ZZ>= ` 
2 )  ->  (
z  ||  P  ->  z  =  P ) )  ->  ( z  e. 
Prime  ->  ( ( z  x.  z )  <_  P  ->  -.  z  ||  P ) ) ) )
2423ralimdv2 2871 . . . . 5  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( A. z  e.  ( ZZ>= ` 
2 ) ( z 
||  P  ->  z  =  P )  ->  A. z  e.  Prime  ( ( z  x.  z )  <_  P  ->  -.  z  ||  P ) ) )
25 annim 425 . . . . . . . . 9  |-  ( ( z  ||  P  /\  -.  z  =  P
)  <->  -.  ( z  ||  P  ->  z  =  P ) )
26 oveq12 6293 . . . . . . . . . . . . . . . . . 18  |-  ( ( x  =  z  /\  x  =  z )  ->  ( x  x.  x
)  =  ( z  x.  z ) )
2726anidms 645 . . . . . . . . . . . . . . . . 17  |-  ( x  =  z  ->  (
x  x.  x )  =  ( z  x.  z ) )
2827breq1d 4457 . . . . . . . . . . . . . . . 16  |-  ( x  =  z  ->  (
( x  x.  x
)  <_  P  <->  ( z  x.  z )  <_  P
) )
29 breq1 4450 . . . . . . . . . . . . . . . 16  |-  ( x  =  z  ->  (
x  ||  P  <->  z  ||  P ) )
3028, 29anbi12d 710 . . . . . . . . . . . . . . 15  |-  ( x  =  z  ->  (
( ( x  x.  x )  <_  P  /\  x  ||  P )  <-> 
( ( z  x.  z )  <_  P  /\  z  ||  P ) ) )
3130rspcev 3214 . . . . . . . . . . . . . 14  |-  ( ( z  e.  ( ZZ>= ` 
2 )  /\  (
( z  x.  z
)  <_  P  /\  z  ||  P ) )  ->  E. x  e.  (
ZZ>= `  2 ) ( ( x  x.  x
)  <_  P  /\  x  ||  P ) )
3231ancom2s 800 . . . . . . . . . . . . 13  |-  ( ( z  e.  ( ZZ>= ` 
2 )  /\  (
z  ||  P  /\  ( z  x.  z
)  <_  P )
)  ->  E. x  e.  ( ZZ>= `  2 )
( ( x  x.  x )  <_  P  /\  x  ||  P ) )
3332expr 615 . . . . . . . . . . . 12  |-  ( ( z  e.  ( ZZ>= ` 
2 )  /\  z  ||  P )  ->  (
( z  x.  z
)  <_  P  ->  E. x  e.  ( ZZ>= ` 
2 ) ( ( x  x.  x )  <_  P  /\  x  ||  P ) ) )
3433ad2ant2lr 747 . . . . . . . . . . 11  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
( z  x.  z
)  <_  P  ->  E. x  e.  ( ZZ>= ` 
2 ) ( ( x  x.  x )  <_  P  /\  x  ||  P ) ) )
35 simprl 755 . . . . . . . . . . . . . 14  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  z  ||  P )
36 eluzelz 11091 . . . . . . . . . . . . . . . 16  |-  ( z  e.  ( ZZ>= `  2
)  ->  z  e.  ZZ )
3736ad2antlr 726 . . . . . . . . . . . . . . 15  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  z  e.  ZZ )
38 eluz2b2 11154 . . . . . . . . . . . . . . . . . 18  |-  ( z  e.  ( ZZ>= `  2
)  <->  ( z  e.  NN  /\  1  < 
z ) )
3938simplbi 460 . . . . . . . . . . . . . . . . 17  |-  ( z  e.  ( ZZ>= `  2
)  ->  z  e.  NN )
4039ad2antlr 726 . . . . . . . . . . . . . . . 16  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  z  e.  NN )
4140nnne0d 10580 . . . . . . . . . . . . . . 15  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  z  =/=  0 )
42 eluzelz 11091 . . . . . . . . . . . . . . . 16  |-  ( P  e.  ( ZZ>= `  2
)  ->  P  e.  ZZ )
4342ad2antrr 725 . . . . . . . . . . . . . . 15  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  P  e.  ZZ )
44 dvdsval2 13850 . . . . . . . . . . . . . . 15  |-  ( ( z  e.  ZZ  /\  z  =/=  0  /\  P  e.  ZZ )  ->  (
z  ||  P  <->  ( P  /  z )  e.  ZZ ) )
4537, 41, 43, 44syl3anc 1228 . . . . . . . . . . . . . 14  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
z  ||  P  <->  ( P  /  z )  e.  ZZ ) )
4635, 45mpbid 210 . . . . . . . . . . . . 13  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  ( P  /  z )  e.  ZZ )
47 eluzelre 11092 . . . . . . . . . . . . . . . . . 18  |-  ( z  e.  ( ZZ>= `  2
)  ->  z  e.  RR )
4847ad2antlr 726 . . . . . . . . . . . . . . . . 17  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  z  e.  RR )
4948recnd 9622 . . . . . . . . . . . . . . . 16  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  z  e.  CC )
5049mulid2d 9614 . . . . . . . . . . . . . . 15  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
1  x.  z )  =  z )
517ad2antrr 725 . . . . . . . . . . . . . . . . 17  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  P  e.  NN )
52 dvdsle 13890 . . . . . . . . . . . . . . . . . 18  |-  ( ( z  e.  ZZ  /\  P  e.  NN )  ->  ( z  ||  P  ->  z  <_  P )
)
5352imp 429 . . . . . . . . . . . . . . . . 17  |-  ( ( ( z  e.  ZZ  /\  P  e.  NN )  /\  z  ||  P
)  ->  z  <_  P )
5437, 51, 35, 53syl21anc 1227 . . . . . . . . . . . . . . . 16  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  z  <_  P )
55 simprr 756 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  -.  z  =  P )
5655neqned 2670 . . . . . . . . . . . . . . . . 17  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  z  =/=  P )
5756necomd 2738 . . . . . . . . . . . . . . . 16  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  P  =/=  z )
586ad2antrr 725 . . . . . . . . . . . . . . . . 17  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  P  e.  RR )
5948, 58ltlend 9729 . . . . . . . . . . . . . . . 16  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
z  <  P  <->  ( z  <_  P  /\  P  =/=  z ) ) )
6054, 57, 59mpbir2and 920 . . . . . . . . . . . . . . 15  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  z  <  P )
6150, 60eqbrtrd 4467 . . . . . . . . . . . . . 14  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
1  x.  z )  <  P )
62 1red 9611 . . . . . . . . . . . . . . 15  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  1  e.  RR )
6343zred 10966 . . . . . . . . . . . . . . 15  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  P  e.  RR )
64 nnre 10543 . . . . . . . . . . . . . . . . 17  |-  ( z  e.  NN  ->  z  e.  RR )
65 nngt0 10565 . . . . . . . . . . . . . . . . 17  |-  ( z  e.  NN  ->  0  <  z )
6664, 65jca 532 . . . . . . . . . . . . . . . 16  |-  ( z  e.  NN  ->  (
z  e.  RR  /\  0  <  z ) )
6740, 66syl 16 . . . . . . . . . . . . . . 15  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
z  e.  RR  /\  0  <  z ) )
68 ltmuldiv 10415 . . . . . . . . . . . . . . 15  |-  ( ( 1  e.  RR  /\  P  e.  RR  /\  (
z  e.  RR  /\  0  <  z ) )  ->  ( ( 1  x.  z )  < 
P  <->  1  <  ( P  /  z ) ) )
6962, 63, 67, 68syl3anc 1228 . . . . . . . . . . . . . 14  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
( 1  x.  z
)  <  P  <->  1  <  ( P  /  z ) ) )
7061, 69mpbid 210 . . . . . . . . . . . . 13  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  1  <  ( P  /  z
) )
71 eluz2b1 11153 . . . . . . . . . . . . 13  |-  ( ( P  /  z )  e.  ( ZZ>= `  2
)  <->  ( ( P  /  z )  e.  ZZ  /\  1  < 
( P  /  z
) ) )
7246, 70, 71sylanbrc 664 . . . . . . . . . . . 12  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  ( P  /  z )  e.  ( ZZ>= `  2 )
)
7348, 48remulcld 9624 . . . . . . . . . . . . . . . 16  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
z  x.  z )  e.  RR )
7440, 40nnmulcld 10583 . . . . . . . . . . . . . . . . 17  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
z  x.  z )  e.  NN )
75 nnrp 11229 . . . . . . . . . . . . . . . . . 18  |-  ( P  e.  NN  ->  P  e.  RR+ )
76 nnrp 11229 . . . . . . . . . . . . . . . . . 18  |-  ( ( z  x.  z )  e.  NN  ->  (
z  x.  z )  e.  RR+ )
77 rpdivcl 11242 . . . . . . . . . . . . . . . . . 18  |-  ( ( P  e.  RR+  /\  (
z  x.  z )  e.  RR+ )  ->  ( P  /  ( z  x.  z ) )  e.  RR+ )
7875, 76, 77syl2an 477 . . . . . . . . . . . . . . . . 17  |-  ( ( P  e.  NN  /\  ( z  x.  z
)  e.  NN )  ->  ( P  / 
( z  x.  z
) )  e.  RR+ )
7951, 74, 78syl2anc 661 . . . . . . . . . . . . . . . 16  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  ( P  /  ( z  x.  z ) )  e.  RR+ )
8058, 73, 79lemul1d 11295 . . . . . . . . . . . . . . 15  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  ( P  <_  ( z  x.  z )  <->  ( P  x.  ( P  /  (
z  x.  z ) ) )  <_  (
( z  x.  z
)  x.  ( P  /  ( z  x.  z ) ) ) ) )
8158recnd 9622 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  P  e.  CC )
8281, 49, 81, 49, 41, 41divmuldivd 10361 . . . . . . . . . . . . . . . . 17  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
( P  /  z
)  x.  ( P  /  z ) )  =  ( ( P  x.  P )  / 
( z  x.  z
) ) )
8374nncnd 10552 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
z  x.  z )  e.  CC )
8474nnne0d 10580 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
z  x.  z )  =/=  0 )
8581, 81, 83, 84divassd 10355 . . . . . . . . . . . . . . . . 17  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
( P  x.  P
)  /  ( z  x.  z ) )  =  ( P  x.  ( P  /  (
z  x.  z ) ) ) )
8682, 85eqtrd 2508 . . . . . . . . . . . . . . . 16  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
( P  /  z
)  x.  ( P  /  z ) )  =  ( P  x.  ( P  /  (
z  x.  z ) ) ) )
8781, 83, 84divcan2d 10322 . . . . . . . . . . . . . . . . 17  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
( z  x.  z
)  x.  ( P  /  ( z  x.  z ) ) )  =  P )
8887eqcomd 2475 . . . . . . . . . . . . . . . 16  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  P  =  ( ( z  x.  z )  x.  ( P  /  (
z  x.  z ) ) ) )
8986, 88breq12d 4460 . . . . . . . . . . . . . . 15  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
( ( P  / 
z )  x.  ( P  /  z ) )  <_  P  <->  ( P  x.  ( P  /  (
z  x.  z ) ) )  <_  (
( z  x.  z
)  x.  ( P  /  ( z  x.  z ) ) ) ) )
9080, 89bitr4d 256 . . . . . . . . . . . . . 14  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  ( P  <_  ( z  x.  z )  <->  ( ( P  /  z )  x.  ( P  /  z
) )  <_  P
) )
9190biimpd 207 . . . . . . . . . . . . 13  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  ( P  <_  ( z  x.  z )  ->  (
( P  /  z
)  x.  ( P  /  z ) )  <_  P ) )
9281, 49, 41divcan2d 10322 . . . . . . . . . . . . . 14  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
z  x.  ( P  /  z ) )  =  P )
93 dvds0lem 13855 . . . . . . . . . . . . . 14  |-  ( ( ( z  e.  ZZ  /\  ( P  /  z
)  e.  ZZ  /\  P  e.  ZZ )  /\  ( z  x.  ( P  /  z ) )  =  P )  -> 
( P  /  z
)  ||  P )
9437, 46, 43, 92, 93syl31anc 1231 . . . . . . . . . . . . 13  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  ( P  /  z )  ||  P )
9591, 94jctird 544 . . . . . . . . . . . 12  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  ( P  <_  ( z  x.  z )  ->  (
( ( P  / 
z )  x.  ( P  /  z ) )  <_  P  /\  ( P  /  z )  ||  P ) ) )
96 oveq12 6293 . . . . . . . . . . . . . . . 16  |-  ( ( x  =  ( P  /  z )  /\  x  =  ( P  /  z ) )  ->  ( x  x.  x )  =  ( ( P  /  z
)  x.  ( P  /  z ) ) )
9796anidms 645 . . . . . . . . . . . . . . 15  |-  ( x  =  ( P  / 
z )  ->  (
x  x.  x )  =  ( ( P  /  z )  x.  ( P  /  z
) ) )
9897breq1d 4457 . . . . . . . . . . . . . 14  |-  ( x  =  ( P  / 
z )  ->  (
( x  x.  x
)  <_  P  <->  ( ( P  /  z )  x.  ( P  /  z
) )  <_  P
) )
99 breq1 4450 . . . . . . . . . . . . . 14  |-  ( x  =  ( P  / 
z )  ->  (
x  ||  P  <->  ( P  /  z )  ||  P ) )
10098, 99anbi12d 710 . . . . . . . . . . . . 13  |-  ( x  =  ( P  / 
z )  ->  (
( ( x  x.  x )  <_  P  /\  x  ||  P )  <-> 
( ( ( P  /  z )  x.  ( P  /  z
) )  <_  P  /\  ( P  /  z
)  ||  P )
) )
101100rspcev 3214 . . . . . . . . . . . 12  |-  ( ( ( P  /  z
)  e.  ( ZZ>= ` 
2 )  /\  (
( ( P  / 
z )  x.  ( P  /  z ) )  <_  P  /\  ( P  /  z )  ||  P ) )  ->  E. x  e.  ( ZZ>=
`  2 ) ( ( x  x.  x
)  <_  P  /\  x  ||  P ) )
10272, 95, 101syl6an 545 . . . . . . . . . . 11  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  ( P  <_  ( z  x.  z )  ->  E. x  e.  ( ZZ>= `  2 )
( ( x  x.  x )  <_  P  /\  x  ||  P ) ) )
10373, 58letrid 9734 . . . . . . . . . . 11  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  (
( z  x.  z
)  <_  P  \/  P  <_  ( z  x.  z ) ) )
10434, 102, 103mpjaod 381 . . . . . . . . . 10  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  z  e.  ( ZZ>= ` 
2 ) )  /\  ( z  ||  P  /\  -.  z  =  P ) )  ->  E. x  e.  ( ZZ>= `  2 )
( ( x  x.  x )  <_  P  /\  x  ||  P ) )
105104ex 434 . . . . . . . . 9  |-  ( ( P  e.  ( ZZ>= ` 
2 )  /\  z  e.  ( ZZ>= `  2 )
)  ->  ( (
z  ||  P  /\  -.  z  =  P
)  ->  E. x  e.  ( ZZ>= `  2 )
( ( x  x.  x )  <_  P  /\  x  ||  P ) ) )
10625, 105syl5bir 218 . . . . . . . 8  |-  ( ( P  e.  ( ZZ>= ` 
2 )  /\  z  e.  ( ZZ>= `  2 )
)  ->  ( -.  ( z  ||  P  ->  z  =  P )  ->  E. x  e.  (
ZZ>= `  2 ) ( ( x  x.  x
)  <_  P  /\  x  ||  P ) ) )
107106rexlimdva 2955 . . . . . . 7  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( E. z  e.  ( ZZ>= ` 
2 )  -.  (
z  ||  P  ->  z  =  P )  ->  E. x  e.  ( ZZ>=
`  2 ) ( ( x  x.  x
)  <_  P  /\  x  ||  P ) ) )
108 exprmfct 14110 . . . . . . . . . . 11  |-  ( x  e.  ( ZZ>= `  2
)  ->  E. z  e.  Prime  z  ||  x
)
109108ad2antlr 726 . . . . . . . . . 10  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  x  e.  ( ZZ>= ` 
2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P ) )  ->  E. z  e.  Prime  z  ||  x
)
110 prmz 14080 . . . . . . . . . . . . . . . . 17  |-  ( z  e.  Prime  ->  z  e.  ZZ )
111110ad2antrl 727 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
z  e.  ZZ )
112111zred 10966 . . . . . . . . . . . . . . 15  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
z  e.  RR )
113112, 112remulcld 9624 . . . . . . . . . . . . . 14  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
( z  x.  z
)  e.  RR )
114 eluzelz 11091 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  ( ZZ>= `  2
)  ->  x  e.  ZZ )
115114ad3antlr 730 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  ->  x  e.  ZZ )
116115zred 10966 . . . . . . . . . . . . . . 15  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  ->  x  e.  RR )
117116, 116remulcld 9624 . . . . . . . . . . . . . 14  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
( x  x.  x
)  e.  RR )
11842ad3antrrr 729 . . . . . . . . . . . . . . 15  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  ->  P  e.  ZZ )
119118zred 10966 . . . . . . . . . . . . . 14  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  ->  P  e.  RR )
120 eluz2b2 11154 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  ( ZZ>= `  2
)  <->  ( x  e.  NN  /\  1  < 
x ) )
121120simplbi 460 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  ( ZZ>= `  2
)  ->  x  e.  NN )
122121ad3antlr 730 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  ->  x  e.  NN )
123 simprr 756 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
z  ||  x )
124 dvdsle 13890 . . . . . . . . . . . . . . . . 17  |-  ( ( z  e.  ZZ  /\  x  e.  NN )  ->  ( z  ||  x  ->  z  <_  x )
)
125124imp 429 . . . . . . . . . . . . . . . 16  |-  ( ( ( z  e.  ZZ  /\  x  e.  NN )  /\  z  ||  x
)  ->  z  <_  x )
126111, 122, 123, 125syl21anc 1227 . . . . . . . . . . . . . . 15  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
z  <_  x )
12739nnnn0d 10852 . . . . . . . . . . . . . . . . . . 19  |-  ( z  e.  ( ZZ>= `  2
)  ->  z  e.  NN0 )
128127nn0ge0d 10855 . . . . . . . . . . . . . . . . . 18  |-  ( z  e.  ( ZZ>= `  2
)  ->  0  <_  z )
1292, 128syl 16 . . . . . . . . . . . . . . . . 17  |-  ( z  e.  Prime  ->  0  <_ 
z )
130129ad2antrl 727 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
0  <_  z )
131 nnnn0 10802 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  NN  ->  x  e.  NN0 )
132131nn0ge0d 10855 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  NN  ->  0  <_  x )
133122, 132syl 16 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
0  <_  x )
134 le2msq 10445 . . . . . . . . . . . . . . . 16  |-  ( ( ( z  e.  RR  /\  0  <_  z )  /\  ( x  e.  RR  /\  0  <_  x )
)  ->  ( z  <_  x  <->  ( z  x.  z )  <_  (
x  x.  x ) ) )
135112, 130, 116, 133, 134syl22anc 1229 . . . . . . . . . . . . . . 15  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
( z  <_  x  <->  ( z  x.  z )  <_  ( x  x.  x ) ) )
136126, 135mpbid 210 . . . . . . . . . . . . . 14  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
( z  x.  z
)  <_  ( x  x.  x ) )
137 simplrl 759 . . . . . . . . . . . . . 14  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
( x  x.  x
)  <_  P )
138113, 117, 119, 136, 137letrd 9738 . . . . . . . . . . . . 13  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
( z  x.  z
)  <_  P )
139 simplrr 760 . . . . . . . . . . . . . 14  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  ->  x  ||  P )
140 dvdstr 13878 . . . . . . . . . . . . . . 15  |-  ( ( z  e.  ZZ  /\  x  e.  ZZ  /\  P  e.  ZZ )  ->  (
( z  ||  x  /\  x  ||  P )  ->  z  ||  P
) )
141111, 115, 118, 140syl3anc 1228 . . . . . . . . . . . . . 14  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
( ( z  ||  x  /\  x  ||  P
)  ->  z  ||  P ) )
142123, 139, 141mp2and 679 . . . . . . . . . . . . 13  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  -> 
z  ||  P )
143138, 142jc 147 . . . . . . . . . . . 12  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  (
z  e.  Prime  /\  z  ||  x ) )  ->  -.  ( ( z  x.  z )  <_  P  ->  -.  z  ||  P
) )
144143expr 615 . . . . . . . . . . 11  |-  ( ( ( ( P  e.  ( ZZ>= `  2 )  /\  x  e.  ( ZZ>=
`  2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P
) )  /\  z  e.  Prime )  ->  (
z  ||  x  ->  -.  ( ( z  x.  z )  <_  P  ->  -.  z  ||  P
) ) )
145144reximdva 2938 . . . . . . . . . 10  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  x  e.  ( ZZ>= ` 
2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P ) )  ->  ( E. z  e.  Prime  z  ||  x  ->  E. z  e.  Prime  -.  ( ( z  x.  z )  <_  P  ->  -.  z  ||  P
) ) )
146109, 145mpd 15 . . . . . . . . 9  |-  ( ( ( P  e.  (
ZZ>= `  2 )  /\  x  e.  ( ZZ>= ` 
2 ) )  /\  ( ( x  x.  x )  <_  P  /\  x  ||  P ) )  ->  E. z  e.  Prime  -.  ( (
z  x.  z )  <_  P  ->  -.  z  ||  P ) )
147146ex 434 . . . . . . . 8  |-  ( ( P  e.  ( ZZ>= ` 
2 )  /\  x  e.  ( ZZ>= `  2 )
)  ->  ( (
( x  x.  x
)  <_  P  /\  x  ||  P )  ->  E. z  e.  Prime  -.  ( ( z  x.  z )  <_  P  ->  -.  z  ||  P
) ) )
148147rexlimdva 2955 . . . . . . 7  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( E. x  e.  ( ZZ>= ` 
2 ) ( ( x  x.  x )  <_  P  /\  x  ||  P )  ->  E. z  e.  Prime  -.  ( (
z  x.  z )  <_  P  ->  -.  z  ||  P ) ) )
149107, 148syld 44 . . . . . 6  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( E. z  e.  ( ZZ>= ` 
2 )  -.  (
z  ||  P  ->  z  =  P )  ->  E. z  e.  Prime  -.  ( ( z  x.  z )  <_  P  ->  -.  z  ||  P
) ) )
150 rexnal 2912 . . . . . 6  |-  ( E. z  e.  ( ZZ>= ` 
2 )  -.  (
z  ||  P  ->  z  =  P )  <->  -.  A. z  e.  ( ZZ>= `  2 )
( z  ||  P  ->  z  =  P ) )
151 rexnal 2912 . . . . . 6  |-  ( E. z  e.  Prime  -.  (
( z  x.  z
)  <_  P  ->  -.  z  ||  P )  <->  -.  A. z  e.  Prime  ( ( z  x.  z
)  <_  P  ->  -.  z  ||  P ) )
152149, 150, 1513imtr3g 269 . . . . 5  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( -.  A. z  e.  ( ZZ>= ` 
2 ) ( z 
||  P  ->  z  =  P )  ->  -.  A. z  e.  Prime  (
( z  x.  z
)  <_  P  ->  -.  z  ||  P ) ) )
15324, 152impcon4bid 205 . . . 4  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( A. z  e.  ( ZZ>= ` 
2 ) ( z 
||  P  ->  z  =  P )  <->  A. z  e.  Prime  ( ( z  x.  z )  <_  P  ->  -.  z  ||  P ) ) )
154 prmnn 14079 . . . . . . . . 9  |-  ( z  e.  Prime  ->  z  e.  NN )
155154nncnd 10552 . . . . . . . 8  |-  ( z  e.  Prime  ->  z  e.  CC )
156155sqvald 12275 . . . . . . 7  |-  ( z  e.  Prime  ->  ( z ^ 2 )  =  ( z  x.  z
) )
157156breq1d 4457 . . . . . 6  |-  ( z  e.  Prime  ->  ( ( z ^ 2 )  <_  P  <->  ( z  x.  z )  <_  P
) )
158157imbi1d 317 . . . . 5  |-  ( z  e.  Prime  ->  ( ( ( z ^ 2 )  <_  P  ->  -.  z  ||  P )  <-> 
( ( z  x.  z )  <_  P  ->  -.  z  ||  P
) ) )
159158ralbiia 2894 . . . 4  |-  ( A. z  e.  Prime  ( ( z ^ 2 )  <_  P  ->  -.  z  ||  P )  <->  A. z  e.  Prime  ( ( z  x.  z )  <_  P  ->  -.  z  ||  P ) )
160153, 159syl6bbr 263 . . 3  |-  ( P  e.  ( ZZ>= `  2
)  ->  ( A. z  e.  ( ZZ>= ` 
2 ) ( z 
||  P  ->  z  =  P )  <->  A. z  e.  Prime  ( ( z ^ 2 )  <_  P  ->  -.  z  ||  P ) ) )
161160pm5.32i 637 . 2  |-  ( ( P  e.  ( ZZ>= ` 
2 )  /\  A. z  e.  ( ZZ>= ` 
2 ) ( z 
||  P  ->  z  =  P ) )  <->  ( P  e.  ( ZZ>= `  2 )  /\  A. z  e.  Prime  ( ( z ^ 2 )  <_  P  ->  -.  z  ||  P ) ) )
1621, 161bitri 249 1  |-  ( P  e.  Prime  <->  ( P  e.  ( ZZ>= `  2 )  /\  A. z  e.  Prime  ( ( z ^ 2 )  <_  P  ->  -.  z  ||  P ) ) )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 184    /\ wa 369    = wceq 1379    e. wcel 1767    =/= wne 2662   A.wral 2814   E.wrex 2815   class class class wbr 4447   ` cfv 5588  (class class class)co 6284   RRcr 9491   0cc0 9492   1c1 9493    x. cmul 9497    < clt 9628    <_ cle 9629    / cdiv 10206   NNcn 10536   2c2 10585   ZZcz 10864   ZZ>=cuz 11082   RR+crp 11220   ^cexp 12134    || cdivides 13847   Primecprime 14076
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1601  ax-4 1612  ax-5 1680  ax-6 1719  ax-7 1739  ax-8 1769  ax-9 1771  ax-10 1786  ax-11 1791  ax-12 1803  ax-13 1968  ax-ext 2445  ax-sep 4568  ax-nul 4576  ax-pow 4625  ax-pr 4686  ax-un 6576  ax-cnex 9548  ax-resscn 9549  ax-1cn 9550  ax-icn 9551  ax-addcl 9552  ax-addrcl 9553  ax-mulcl 9554  ax-mulrcl 9555  ax-mulcom 9556  ax-addass 9557  ax-mulass 9558  ax-distr 9559  ax-i2m1 9560  ax-1ne0 9561  ax-1rid 9562  ax-rnegex 9563  ax-rrecex 9564  ax-cnre 9565  ax-pre-lttri 9566  ax-pre-lttrn 9567  ax-pre-ltadd 9568  ax-pre-mulgt0 9569
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 974  df-3an 975  df-tru 1382  df-ex 1597  df-nf 1600  df-sb 1712  df-eu 2279  df-mo 2280  df-clab 2453  df-cleq 2459  df-clel 2462  df-nfc 2617  df-ne 2664  df-nel 2665  df-ral 2819  df-rex 2820  df-reu 2821  df-rmo 2822  df-rab 2823  df-v 3115  df-sbc 3332  df-csb 3436  df-dif 3479  df-un 3481  df-in 3483  df-ss 3490  df-pss 3492  df-nul 3786  df-if 3940  df-pw 4012  df-sn 4028  df-pr 4030  df-tp 4032  df-op 4034  df-uni 4246  df-int 4283  df-iun 4327  df-br 4448  df-opab 4506  df-mpt 4507  df-tr 4541  df-eprel 4791  df-id 4795  df-po 4800  df-so 4801  df-fr 4838  df-we 4840  df-ord 4881  df-on 4882  df-lim 4883  df-suc 4884  df-xp 5005  df-rel 5006  df-cnv 5007  df-co 5008  df-dm 5009  df-rn 5010  df-res 5011  df-ima 5012  df-iota 5551  df-fun 5590  df-fn 5591  df-f 5592  df-f1 5593  df-fo 5594  df-f1o 5595  df-fv 5596  df-riota 6245  df-ov 6287  df-oprab 6288  df-mpt2 6289  df-om 6685  df-1st 6784  df-2nd 6785  df-recs 7042  df-rdg 7076  df-1o 7130  df-2o 7131  df-oadd 7134  df-er 7311  df-en 7517  df-dom 7518  df-sdom 7519  df-fin 7520  df-pnf 9630  df-mnf 9631  df-xr 9632  df-ltxr 9633  df-le 9634  df-sub 9807  df-neg 9808  df-div 10207  df-nn 10537  df-2 10594  df-n0 10796  df-z 10865  df-uz 11083  df-rp 11221  df-fz 11673  df-seq 12076  df-exp 12135  df-dvds 13848  df-prm 14077
This theorem is referenced by:  pockthg  14283  prmlem1a  14450  isprm7  30823
  Copyright terms: Public domain W3C validator