Metamath Proof Explorer


Theorem pcprendvds2

Description: Non-divisibility property of the prime power pre-function. (Contributed by Mario Carneiro, 23-Feb-2014)

Ref Expression
Hypotheses pclem.1 ⊢ A = n ∈ ℕ 0 | P n ∥ N
pclem.2 ⊢ S = sup A ℝ <
Assertion pcprendvds2 ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → ¬ P ∥ N P S

Proof

Step Hyp Ref Expression
1 pclem.1 ⊢ A = n ∈ ℕ 0 | P n ∥ N
2 pclem.2 ⊢ S = sup A ℝ <
3 1 2 pcprendvds ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → ¬ P S + 1 ∥ N
4 eluz2nn ⊢ P ∈ ℤ ≥ 2 → P ∈ ℕ
5 4 adantr ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P ∈ ℕ
6 5 nnzd ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P ∈ ℤ
7 1 2 pcprecl ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → S ∈ ℕ 0 ∧ P S ∥ N
8 7 simprd ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P S ∥ N
9 7 simpld ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → S ∈ ℕ 0
10 5 9 nnexpcld ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P S ∈ ℕ
11 10 nnzd ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P S ∈ ℤ
12 10 nnne0d ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P S ≠ 0
13 simprl ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → N ∈ ℤ
14 dvdsval2 ⊢ P S ∈ ℤ ∧ P S ≠ 0 ∧ N ∈ ℤ → P S ∥ N ↔ N P S ∈ ℤ
15 11 12 13 14 syl3anc ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P S ∥ N ↔ N P S ∈ ℤ
16 8 15 mpbid ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → N P S ∈ ℤ
17 dvdscmul ⊢ P ∈ ℤ ∧ N P S ∈ ℤ ∧ P S ∈ ℤ → P ∥ N P S → P S ⁢ P ∥ P S ⁢ N P S
18 6 16 11 17 syl3anc ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P ∥ N P S → P S ⁢ P ∥ P S ⁢ N P S
19 5 nncnd ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P ∈ ℂ
20 19 9 expp1d ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P S + 1 = P S ⁢ P
21 20 eqcomd ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P S ⁢ P = P S + 1
22 zcn ⊢ N ∈ ℤ → N ∈ ℂ
23 22 ad2antrl ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → N ∈ ℂ
24 10 nncnd ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P S ∈ ℂ
25 23 24 12 divcan2d ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P S ⁢ N P S = N
26 21 25 breq12d ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P S ⁢ P ∥ P S ⁢ N P S ↔ P S + 1 ∥ N
27 18 26 sylibd ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → P ∥ N P S → P S + 1 ∥ N
28 3 27 mtod ⊢ P ∈ ℤ ≥ 2 ∧ N ∈ ℤ ∧ N ≠ 0 → ¬ P ∥ N P S