Metamath Proof Explorer


Theorem ppinprm

Description: The prime-counting function ppi at a non-prime. (Contributed by Mario Carneiro, 19-Sep-2014)

Ref Expression
Assertion ppinprm ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → π _ ⁡ A + 1 = π _ ⁡ A

Proof

Step Hyp Ref Expression
1 simprr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A + 1 ∩ ℙ
2 1 elin1d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A + 1
3 2z ⊢ 2 ∈ ℤ
4 zcn ⊢ A ∈ ℤ → A ∈ ℂ
5 4 adantr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → A ∈ ℂ
6 ax-1cn ⊢ 1 ∈ ℂ
7 pncan ⊢ A ∈ ℂ ∧ 1 ∈ ℂ → A + 1 - 1 = A
8 5 6 7 sylancl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → A + 1 - 1 = A
9 elfzuz2 ⊢ x ∈ 2 … A + 1 → A + 1 ∈ ℤ ≥ 2
10 uz2m1nn ⊢ A + 1 ∈ ℤ ≥ 2 → A + 1 - 1 ∈ ℕ
11 2 9 10 3syl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → A + 1 - 1 ∈ ℕ
12 8 11 eqeltrrd ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → A ∈ ℕ
13 nnuz ⊢ ℕ = ℤ ≥ 1
14 2m1e1 ⊢ 2 − 1 = 1
15 14 fveq2i ⊢ ℤ ≥ 2 − 1 = ℤ ≥ 1
16 13 15 eqtr4i ⊢ ℕ = ℤ ≥ 2 − 1
17 12 16 eleqtrdi ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → A ∈ ℤ ≥ 2 − 1
18 fzsuc2 ⊢ 2 ∈ ℤ ∧ A ∈ ℤ ≥ 2 − 1 → 2 … A + 1 = 2 … A ∪ A + 1
19 3 17 18 sylancr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → 2 … A + 1 = 2 … A ∪ A + 1
20 2 19 eleqtrd ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A ∪ A + 1
21 elun ⊢ x ∈ 2 … A ∪ A + 1 ↔ x ∈ 2 … A ∨ x ∈ A + 1
22 20 21 sylib ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A ∨ x ∈ A + 1
23 1 elin2d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ ℙ
24 simprl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → ¬ A + 1 ∈ ℙ
25 nelne2 ⊢ x ∈ ℙ ∧ ¬ A + 1 ∈ ℙ → x ≠ A + 1
26 23 24 25 syl2anc ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ≠ A + 1
27 velsn ⊢ x ∈ A + 1 ↔ x = A + 1
28 27 necon3bbii ⊢ ¬ x ∈ A + 1 ↔ x ≠ A + 1
29 26 28 sylibr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → ¬ x ∈ A + 1
30 22 29 olcnd ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A
31 30 23 elind ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A ∩ ℙ
32 31 expr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A ∩ ℙ
33 32 ssrdv ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A + 1 ∩ ℙ ⊆ 2 … A ∩ ℙ
34 uzid ⊢ A ∈ ℤ → A ∈ ℤ ≥ A
35 34 adantr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → A ∈ ℤ ≥ A
36 peano2uz ⊢ A ∈ ℤ ≥ A → A + 1 ∈ ℤ ≥ A
37 fzss2 ⊢ A + 1 ∈ ℤ ≥ A → 2 … A ⊆ 2 … A + 1
38 ssrin ⊢ 2 … A ⊆ 2 … A + 1 → 2 … A ∩ ℙ ⊆ 2 … A + 1 ∩ ℙ
39 35 36 37 38 4syl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A ∩ ℙ ⊆ 2 … A + 1 ∩ ℙ
40 33 39 eqssd ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A + 1 ∩ ℙ = 2 … A ∩ ℙ
41 40 fveq2d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A + 1 ∩ ℙ = 2 … A ∩ ℙ
42 peano2z ⊢ A ∈ ℤ → A + 1 ∈ ℤ
43 42 adantr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → A + 1 ∈ ℤ
44 ppival2 ⊢ A + 1 ∈ ℤ → π _ ⁡ A + 1 = 2 … A + 1 ∩ ℙ
45 43 44 syl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → π _ ⁡ A + 1 = 2 … A + 1 ∩ ℙ
46 ppival2 ⊢ A ∈ ℤ → π _ ⁡ A = 2 … A ∩ ℙ
47 46 adantr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → π _ ⁡ A = 2 … A ∩ ℙ
48 41 45 47 3eqtr4d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → π _ ⁡ A + 1 = π _ ⁡ A