Metamath Proof Explorer


Theorem pclem

Description: - Lemma for the prime power pre-function's properties. (Contributed by Mario Carneiro, 23-Feb-2014)

Ref Expression
Hypothesis pclem.1 A = n 0 | P n N
Assertion pclem P 2 N N 0 A A x y A y x

Proof

Step Hyp Ref Expression
1 pclem.1 A = n 0 | P n N
2 1 ssrab3 A 0
3 nn0ssz 0
4 2 3 sstri A
5 4 a1i P 2 N N 0 A
6 0nn0 0 0
7 6 a1i P 2 N N 0 0 0
8 eluzelcn P 2 P
9 8 adantr P 2 N N 0 P
10 9 exp0d P 2 N N 0 P 0 = 1
11 1dvds N 1 N
12 11 ad2antrl P 2 N N 0 1 N
13 10 12 eqbrtrd P 2 N N 0 P 0 N
14 oveq2 n = 0 P n = P 0
15 14 breq1d n = 0 P n N P 0 N
16 15 1 elrab2 0 A 0 0 P 0 N
17 7 13 16 sylanbrc P 2 N N 0 0 A
18 17 ne0d P 2 N N 0 A
19 nnssz
20 zcn N N
21 20 abscld N N
22 21 ad2antrl P 2 N N 0 N
23 eluzelre P 2 P
24 23 adantr P 2 N N 0 P
25 eluz2gt1 P 2 1 < P
26 25 adantr P 2 N N 0 1 < P
27 expnbnd N P 1 < P x N < P x
28 22 24 26 27 syl3anc P 2 N N 0 x N < P x
29 simprr P 2 N N 0 x y A y A
30 oveq2 n = y P n = P y
31 30 breq1d n = y P n N P y N
32 31 1 elrab2 y A y 0 P y N
33 29 32 sylib P 2 N N 0 x y A y 0 P y N
34 33 simprd P 2 N N 0 x y A P y N
35 eluz2nn P 2 P
36 35 ad2antrr P 2 N N 0 x y A P
37 33 simpld P 2 N N 0 x y A y 0
38 36 37 nnexpcld P 2 N N 0 x y A P y
39 38 nnzd P 2 N N 0 x y A P y
40 simplrl P 2 N N 0 x y A N
41 simplrr P 2 N N 0 x y A N 0
42 dvdsleabs P y N N 0 P y N P y N
43 39 40 41 42 syl3anc P 2 N N 0 x y A P y N P y N
44 34 43 mpd P 2 N N 0 x y A P y N
45 38 nnred P 2 N N 0 x y A P y
46 22 adantr P 2 N N 0 x y A N
47 23 ad2antrr P 2 N N 0 x y A P
48 nnnn0 x x 0
49 48 ad2antrl P 2 N N 0 x y A x 0
50 47 49 reexpcld P 2 N N 0 x y A P x
51 lelttr P y N P x P y N N < P x P y < P x
52 45 46 50 51 syl3anc P 2 N N 0 x y A P y N N < P x P y < P x
53 44 52 mpand P 2 N N 0 x y A N < P x P y < P x
54 37 nn0zd P 2 N N 0 x y A y
55 nnz x x
56 55 ad2antrl P 2 N N 0 x y A x
57 25 ad2antrr P 2 N N 0 x y A 1 < P
58 47 54 56 57 ltexp2d P 2 N N 0 x y A y < x P y < P x
59 53 58 sylibrd P 2 N N 0 x y A N < P x y < x
60 37 nn0red P 2 N N 0 x y A y
61 nnre x x
62 61 ad2antrl P 2 N N 0 x y A x
63 ltle y x y < x y x
64 60 62 63 syl2anc P 2 N N 0 x y A y < x y x
65 59 64 syld P 2 N N 0 x y A N < P x y x
66 65 anassrs P 2 N N 0 x y A N < P x y x
67 66 ralrimdva P 2 N N 0 x N < P x y A y x
68 67 reximdva P 2 N N 0 x N < P x x y A y x
69 28 68 mpd P 2 N N 0 x y A y x
70 ssrexv x y A y x x y A y x
71 19 69 70 mpsyl P 2 N N 0 x y A y x
72 5 18 71 3jca P 2 N N 0 A A x y A y x