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