Metamath Proof Explorer


Theorem chtnprm

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

Ref Expression
Assertion chtnprm ⊢ 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 elin2d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ ℙ
3 simprl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → ¬ A + 1 ∈ ℙ
4 nelne2 ⊢ x ∈ ℙ ∧ ¬ A + 1 ∈ ℙ → x ≠ A + 1
5 2 3 4 syl2anc ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ≠ A + 1
6 velsn ⊢ x ∈ A + 1 ↔ x = A + 1
7 6 necon3bbii ⊢ ¬ x ∈ A + 1 ↔ x ≠ A + 1
8 5 7 sylibr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → ¬ x ∈ A + 1
9 1 elin1d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A + 1
10 2z ⊢ 2 ∈ ℤ
11 zcn ⊢ A ∈ ℤ → A ∈ ℂ
12 11 adantr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → A ∈ ℂ
13 ax-1cn ⊢ 1 ∈ ℂ
14 pncan ⊢ A ∈ ℂ ∧ 1 ∈ ℂ → A + 1 - 1 = A
15 12 13 14 sylancl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → A + 1 - 1 = A
16 elfzuz2 ⊢ x ∈ 2 … A + 1 → A + 1 ∈ ℤ ≥ 2
17 uz2m1nn ⊢ A + 1 ∈ ℤ ≥ 2 → A + 1 - 1 ∈ ℕ
18 9 16 17 3syl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → A + 1 - 1 ∈ ℕ
19 15 18 eqeltrrd ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → A ∈ ℕ
20 nnuz ⊢ ℕ = ℤ ≥ 1
21 2m1e1 ⊢ 2 − 1 = 1
22 21 fveq2i ⊢ ℤ ≥ 2 − 1 = ℤ ≥ 1
23 20 22 eqtr4i ⊢ ℕ = ℤ ≥ 2 − 1
24 19 23 eleqtrdi ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → A ∈ ℤ ≥ 2 − 1
25 fzsuc2 ⊢ 2 ∈ ℤ ∧ A ∈ ℤ ≥ 2 − 1 → 2 … A + 1 = 2 … A ∪ A + 1
26 10 24 25 sylancr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → 2 … A + 1 = 2 … A ∪ A + 1
27 9 26 eleqtrd ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A ∪ A + 1
28 elun ⊢ x ∈ 2 … A ∪ A + 1 ↔ x ∈ 2 … A ∨ x ∈ A + 1
29 27 28 sylib ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A ∨ x ∈ A + 1
30 29 ord ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → ¬ x ∈ 2 … A → x ∈ A + 1
31 8 30 mt3d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A
32 31 2 elind ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ ∧ x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A ∩ ℙ
33 32 expr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → x ∈ 2 … A + 1 ∩ ℙ → x ∈ 2 … A ∩ ℙ
34 33 ssrdv ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A + 1 ∩ ℙ ⊆ 2 … A ∩ ℙ
35 uzid ⊢ A ∈ ℤ → A ∈ ℤ ≥ A
36 35 adantr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → A ∈ ℤ ≥ A
37 peano2uz ⊢ A ∈ ℤ ≥ A → A + 1 ∈ ℤ ≥ A
38 fzss2 ⊢ A + 1 ∈ ℤ ≥ A → 2 … A ⊆ 2 … A + 1
39 ssrin ⊢ 2 … A ⊆ 2 … A + 1 → 2 … A ∩ ℙ ⊆ 2 … A + 1 ∩ ℙ
40 36 37 38 39 4syl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A ∩ ℙ ⊆ 2 … A + 1 ∩ ℙ
41 34 40 eqssd ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A + 1 ∩ ℙ = 2 … A ∩ ℙ
42 peano2z ⊢ A ∈ ℤ → A + 1 ∈ ℤ
43 42 adantr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → A + 1 ∈ ℤ
44 flid ⊢ A + 1 ∈ ℤ → A + 1 = A + 1
45 43 44 syl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → A + 1 = A + 1
46 45 oveq2d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A + 1 = 2 … A + 1
47 46 ineq1d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A + 1 ∩ ℙ = 2 … A + 1 ∩ ℙ
48 flid ⊢ A ∈ ℤ → A = A
49 48 adantr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → A = A
50 49 oveq2d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A = 2 … A
51 50 ineq1d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A ∩ ℙ = 2 … A ∩ ℙ
52 41 47 51 3eqtr4d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 2 … A + 1 ∩ ℙ = 2 … A ∩ ℙ
53 zre ⊢ A ∈ ℤ → A ∈ ℝ
54 53 adantr ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → A ∈ ℝ
55 peano2re ⊢ A ∈ ℝ → A + 1 ∈ ℝ
56 ppisval ⊢ A + 1 ∈ ℝ → 0 A + 1 ∩ ℙ = 2 … A + 1 ∩ ℙ
57 54 55 56 3syl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 0 A + 1 ∩ ℙ = 2 … A + 1 ∩ ℙ
58 ppisval ⊢ A ∈ ℝ → 0 A ∩ ℙ = 2 … A ∩ ℙ
59 54 58 syl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 0 A ∩ ℙ = 2 … A ∩ ℙ
60 52 57 59 3eqtr4d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → 0 A + 1 ∩ ℙ = 0 A ∩ ℙ
61 60 sumeq1d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → ∑ p ∈ 0 A + 1 ∩ ℙ log ⁡ p = ∑ p ∈ 0 A ∩ ℙ log ⁡ p
62 chtval ⊢ A + 1 ∈ ℝ → θ ⁡ A + 1 = ∑ p ∈ 0 A + 1 ∩ ℙ log ⁡ p
63 54 55 62 3syl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → θ ⁡ A + 1 = ∑ p ∈ 0 A + 1 ∩ ℙ log ⁡ p
64 chtval ⊢ A ∈ ℝ → θ ⁡ A = ∑ p ∈ 0 A ∩ ℙ log ⁡ p
65 54 64 syl ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → θ ⁡ A = ∑ p ∈ 0 A ∩ ℙ log ⁡ p
66 61 63 65 3eqtr4d ⊢ A ∈ ℤ ∧ ¬ A + 1 ∈ ℙ → θ ⁡ A + 1 = θ ⁡ A