Proof of Theorem pcdvdsb
Step | Hyp | Ref
| Expression |
1 | | oveq2 7283 |
. . . 4
⊢ (𝑁 = 0 → (𝑃 pCnt 𝑁) = (𝑃 pCnt 0)) |
2 | 1 | breq2d 5086 |
. . 3
⊢ (𝑁 = 0 → (𝐴 ≤ (𝑃 pCnt 𝑁) ↔ 𝐴 ≤ (𝑃 pCnt 0))) |
3 | | breq2 5078 |
. . 3
⊢ (𝑁 = 0 → ((𝑃↑𝐴) ∥ 𝑁 ↔ (𝑃↑𝐴) ∥ 0)) |
4 | 2, 3 | bibi12d 346 |
. 2
⊢ (𝑁 = 0 → ((𝐴 ≤ (𝑃 pCnt 𝑁) ↔ (𝑃↑𝐴) ∥ 𝑁) ↔ (𝐴 ≤ (𝑃 pCnt 0) ↔ (𝑃↑𝐴) ∥ 0))) |
5 | | simpl3 1192 |
. . . . . . 7
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
𝐴 ∈
ℕ0) |
6 | 5 | nn0zd 12424 |
. . . . . 6
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
𝐴 ∈
ℤ) |
7 | | simpl1 1190 |
. . . . . . . 8
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
𝑃 ∈
ℙ) |
8 | | simpl2 1191 |
. . . . . . . 8
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
𝑁 ∈
ℤ) |
9 | | simpr 485 |
. . . . . . . 8
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
𝑁 ≠ 0) |
10 | | pczcl 16549 |
. . . . . . . 8
⊢ ((𝑃 ∈ ℙ ∧ (𝑁 ∈ ℤ ∧ 𝑁 ≠ 0)) → (𝑃 pCnt 𝑁) ∈
ℕ0) |
11 | 7, 8, 9, 10 | syl12anc 834 |
. . . . . . 7
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝑃 pCnt 𝑁) ∈
ℕ0) |
12 | 11 | nn0zd 12424 |
. . . . . 6
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝑃 pCnt 𝑁) ∈ ℤ) |
13 | | eluz 12596 |
. . . . . 6
⊢ ((𝐴 ∈ ℤ ∧ (𝑃 pCnt 𝑁) ∈ ℤ) → ((𝑃 pCnt 𝑁) ∈ (ℤ≥‘𝐴) ↔ 𝐴 ≤ (𝑃 pCnt 𝑁))) |
14 | 6, 12, 13 | syl2anc 584 |
. . . . 5
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
((𝑃 pCnt 𝑁) ∈ (ℤ≥‘𝐴) ↔ 𝐴 ≤ (𝑃 pCnt 𝑁))) |
15 | | prmnn 16379 |
. . . . . . . 8
⊢ (𝑃 ∈ ℙ → 𝑃 ∈
ℕ) |
16 | 7, 15 | syl 17 |
. . . . . . 7
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
𝑃 ∈
ℕ) |
17 | 16 | nnzd 12425 |
. . . . . 6
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
𝑃 ∈
ℤ) |
18 | | dvdsexp 16037 |
. . . . . . 7
⊢ ((𝑃 ∈ ℤ ∧ 𝐴 ∈ ℕ0
∧ (𝑃 pCnt 𝑁) ∈
(ℤ≥‘𝐴)) → (𝑃↑𝐴) ∥ (𝑃↑(𝑃 pCnt 𝑁))) |
19 | 18 | 3expia 1120 |
. . . . . 6
⊢ ((𝑃 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ ((𝑃 pCnt 𝑁) ∈
(ℤ≥‘𝐴) → (𝑃↑𝐴) ∥ (𝑃↑(𝑃 pCnt 𝑁)))) |
20 | 17, 5, 19 | syl2anc 584 |
. . . . 5
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
((𝑃 pCnt 𝑁) ∈ (ℤ≥‘𝐴) → (𝑃↑𝐴) ∥ (𝑃↑(𝑃 pCnt 𝑁)))) |
21 | 14, 20 | sylbird 259 |
. . . 4
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝐴 ≤ (𝑃 pCnt 𝑁) → (𝑃↑𝐴) ∥ (𝑃↑(𝑃 pCnt 𝑁)))) |
22 | | pczdvds 16564 |
. . . . . 6
⊢ ((𝑃 ∈ ℙ ∧ (𝑁 ∈ ℤ ∧ 𝑁 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝑁)) ∥ 𝑁) |
23 | 7, 8, 9, 22 | syl12anc 834 |
. . . . 5
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝑃↑(𝑃 pCnt 𝑁)) ∥ 𝑁) |
24 | | nnexpcl 13795 |
. . . . . . . . . 10
⊢ ((𝑃 ∈ ℕ ∧ 𝐴 ∈ ℕ0)
→ (𝑃↑𝐴) ∈
ℕ) |
25 | 15, 24 | sylan 580 |
. . . . . . . . 9
⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℕ0)
→ (𝑃↑𝐴) ∈
ℕ) |
26 | 25 | 3adant2 1130 |
. . . . . . . 8
⊢ ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ (𝑃↑𝐴) ∈
ℕ) |
27 | 26 | nnzd 12425 |
. . . . . . 7
⊢ ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ (𝑃↑𝐴) ∈
ℤ) |
28 | 27 | adantr 481 |
. . . . . 6
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝑃↑𝐴) ∈ ℤ) |
29 | 16, 11 | nnexpcld 13960 |
. . . . . . 7
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝑃↑(𝑃 pCnt 𝑁)) ∈ ℕ) |
30 | 29 | nnzd 12425 |
. . . . . 6
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝑃↑(𝑃 pCnt 𝑁)) ∈ ℤ) |
31 | | dvdstr 16003 |
. . . . . 6
⊢ (((𝑃↑𝐴) ∈ ℤ ∧ (𝑃↑(𝑃 pCnt 𝑁)) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑃↑𝐴) ∥ (𝑃↑(𝑃 pCnt 𝑁)) ∧ (𝑃↑(𝑃 pCnt 𝑁)) ∥ 𝑁) → (𝑃↑𝐴) ∥ 𝑁)) |
32 | 28, 30, 8, 31 | syl3anc 1370 |
. . . . 5
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(((𝑃↑𝐴) ∥ (𝑃↑(𝑃 pCnt 𝑁)) ∧ (𝑃↑(𝑃 pCnt 𝑁)) ∥ 𝑁) → (𝑃↑𝐴) ∥ 𝑁)) |
33 | 23, 32 | mpan2d 691 |
. . . 4
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
((𝑃↑𝐴) ∥ (𝑃↑(𝑃 pCnt 𝑁)) → (𝑃↑𝐴) ∥ 𝑁)) |
34 | 21, 33 | syld 47 |
. . 3
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝐴 ≤ (𝑃 pCnt 𝑁) → (𝑃↑𝐴) ∥ 𝑁)) |
35 | | nn0re 12242 |
. . . . . . 7
⊢ ((𝑃 pCnt 𝑁) ∈ ℕ0 → (𝑃 pCnt 𝑁) ∈ ℝ) |
36 | | nn0re 12242 |
. . . . . . 7
⊢ (𝐴 ∈ ℕ0
→ 𝐴 ∈
ℝ) |
37 | | ltnle 11054 |
. . . . . . 7
⊢ (((𝑃 pCnt 𝑁) ∈ ℝ ∧ 𝐴 ∈ ℝ) → ((𝑃 pCnt 𝑁) < 𝐴 ↔ ¬ 𝐴 ≤ (𝑃 pCnt 𝑁))) |
38 | 35, 36, 37 | syl2an 596 |
. . . . . 6
⊢ (((𝑃 pCnt 𝑁) ∈ ℕ0 ∧ 𝐴 ∈ ℕ0)
→ ((𝑃 pCnt 𝑁) < 𝐴 ↔ ¬ 𝐴 ≤ (𝑃 pCnt 𝑁))) |
39 | | nn0ltp1le 12378 |
. . . . . 6
⊢ (((𝑃 pCnt 𝑁) ∈ ℕ0 ∧ 𝐴 ∈ ℕ0)
→ ((𝑃 pCnt 𝑁) < 𝐴 ↔ ((𝑃 pCnt 𝑁) + 1) ≤ 𝐴)) |
40 | 38, 39 | bitr3d 280 |
. . . . 5
⊢ (((𝑃 pCnt 𝑁) ∈ ℕ0 ∧ 𝐴 ∈ ℕ0)
→ (¬ 𝐴 ≤ (𝑃 pCnt 𝑁) ↔ ((𝑃 pCnt 𝑁) + 1) ≤ 𝐴)) |
41 | 11, 5, 40 | syl2anc 584 |
. . . 4
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(¬ 𝐴 ≤ (𝑃 pCnt 𝑁) ↔ ((𝑃 pCnt 𝑁) + 1) ≤ 𝐴)) |
42 | | peano2nn0 12273 |
. . . . . . . . 9
⊢ ((𝑃 pCnt 𝑁) ∈ ℕ0 → ((𝑃 pCnt 𝑁) + 1) ∈
ℕ0) |
43 | 11, 42 | syl 17 |
. . . . . . . 8
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
((𝑃 pCnt 𝑁) + 1) ∈
ℕ0) |
44 | 43 | nn0zd 12424 |
. . . . . . 7
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
((𝑃 pCnt 𝑁) + 1) ∈ ℤ) |
45 | | eluz 12596 |
. . . . . . 7
⊢ ((((𝑃 pCnt 𝑁) + 1) ∈ ℤ ∧ 𝐴 ∈ ℤ) → (𝐴 ∈
(ℤ≥‘((𝑃 pCnt 𝑁) + 1)) ↔ ((𝑃 pCnt 𝑁) + 1) ≤ 𝐴)) |
46 | 44, 6, 45 | syl2anc 584 |
. . . . . 6
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝐴 ∈
(ℤ≥‘((𝑃 pCnt 𝑁) + 1)) ↔ ((𝑃 pCnt 𝑁) + 1) ≤ 𝐴)) |
47 | | dvdsexp 16037 |
. . . . . . . 8
⊢ ((𝑃 ∈ ℤ ∧ ((𝑃 pCnt 𝑁) + 1) ∈ ℕ0 ∧
𝐴 ∈
(ℤ≥‘((𝑃 pCnt 𝑁) + 1))) → (𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ (𝑃↑𝐴)) |
48 | 47 | 3expia 1120 |
. . . . . . 7
⊢ ((𝑃 ∈ ℤ ∧ ((𝑃 pCnt 𝑁) + 1) ∈ ℕ0) →
(𝐴 ∈
(ℤ≥‘((𝑃 pCnt 𝑁) + 1)) → (𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ (𝑃↑𝐴))) |
49 | 17, 43, 48 | syl2anc 584 |
. . . . . 6
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝐴 ∈
(ℤ≥‘((𝑃 pCnt 𝑁) + 1)) → (𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ (𝑃↑𝐴))) |
50 | 46, 49 | sylbird 259 |
. . . . 5
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(((𝑃 pCnt 𝑁) + 1) ≤ 𝐴 → (𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ (𝑃↑𝐴))) |
51 | | pczndvds 16566 |
. . . . . . . 8
⊢ ((𝑃 ∈ ℙ ∧ (𝑁 ∈ ℤ ∧ 𝑁 ≠ 0)) → ¬ (𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ 𝑁) |
52 | 7, 8, 9, 51 | syl12anc 834 |
. . . . . . 7
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
¬ (𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ 𝑁) |
53 | 16, 43 | nnexpcld 13960 |
. . . . . . . . 9
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝑃↑((𝑃 pCnt 𝑁) + 1)) ∈ ℕ) |
54 | 53 | nnzd 12425 |
. . . . . . . 8
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝑃↑((𝑃 pCnt 𝑁) + 1)) ∈ ℤ) |
55 | | dvdstr 16003 |
. . . . . . . 8
⊢ (((𝑃↑((𝑃 pCnt 𝑁) + 1)) ∈ ℤ ∧ (𝑃↑𝐴) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ (𝑃↑𝐴) ∧ (𝑃↑𝐴) ∥ 𝑁) → (𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ 𝑁)) |
56 | 54, 28, 8, 55 | syl3anc 1370 |
. . . . . . 7
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(((𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ (𝑃↑𝐴) ∧ (𝑃↑𝐴) ∥ 𝑁) → (𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ 𝑁)) |
57 | 52, 56 | mtod 197 |
. . . . . 6
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
¬ ((𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ (𝑃↑𝐴) ∧ (𝑃↑𝐴) ∥ 𝑁)) |
58 | | imnan 400 |
. . . . . 6
⊢ (((𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ (𝑃↑𝐴) → ¬ (𝑃↑𝐴) ∥ 𝑁) ↔ ¬ ((𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ (𝑃↑𝐴) ∧ (𝑃↑𝐴) ∥ 𝑁)) |
59 | 57, 58 | sylibr 233 |
. . . . 5
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
((𝑃↑((𝑃 pCnt 𝑁) + 1)) ∥ (𝑃↑𝐴) → ¬ (𝑃↑𝐴) ∥ 𝑁)) |
60 | 50, 59 | syld 47 |
. . . 4
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(((𝑃 pCnt 𝑁) + 1) ≤ 𝐴 → ¬ (𝑃↑𝐴) ∥ 𝑁)) |
61 | 41, 60 | sylbid 239 |
. . 3
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(¬ 𝐴 ≤ (𝑃 pCnt 𝑁) → ¬ (𝑃↑𝐴) ∥ 𝑁)) |
62 | 34, 61 | impcon4bid 226 |
. 2
⊢ (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
∧ 𝑁 ≠ 0) →
(𝐴 ≤ (𝑃 pCnt 𝑁) ↔ (𝑃↑𝐴) ∥ 𝑁)) |
63 | 36 | 3ad2ant3 1134 |
. . . . . 6
⊢ ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ 𝐴 ∈
ℝ) |
64 | 63 | rexrd 11025 |
. . . . 5
⊢ ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ 𝐴 ∈
ℝ*) |
65 | | pnfge 12866 |
. . . . 5
⊢ (𝐴 ∈ ℝ*
→ 𝐴 ≤
+∞) |
66 | 64, 65 | syl 17 |
. . . 4
⊢ ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ 𝐴 ≤
+∞) |
67 | | pc0 16555 |
. . . . 5
⊢ (𝑃 ∈ ℙ → (𝑃 pCnt 0) =
+∞) |
68 | 67 | 3ad2ant1 1132 |
. . . 4
⊢ ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ (𝑃 pCnt 0) =
+∞) |
69 | 66, 68 | breqtrrd 5102 |
. . 3
⊢ ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ 𝐴 ≤ (𝑃 pCnt 0)) |
70 | | dvds0 15981 |
. . . 4
⊢ ((𝑃↑𝐴) ∈ ℤ → (𝑃↑𝐴) ∥ 0) |
71 | 27, 70 | syl 17 |
. . 3
⊢ ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ (𝑃↑𝐴) ∥ 0) |
72 | 69, 71 | 2thd 264 |
. 2
⊢ ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ (𝐴 ≤ (𝑃 pCnt 0) ↔ (𝑃↑𝐴) ∥ 0)) |
73 | 4, 62, 72 | pm2.61ne 3030 |
1
⊢ ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℤ ∧ 𝐴 ∈ ℕ0)
→ (𝐴 ≤ (𝑃 pCnt 𝑁) ↔ (𝑃↑𝐴) ∥ 𝑁)) |