Metamath Proof Explorer


Theorem pcbcctr

Description: Prime count of a central binomial coefficient. (Contributed by Mario Carneiro, 12-Mar-2014)

Ref Expression
Assertion pcbcctr ⊢ N ∈ ℕ ∧ P ∈ ℙ → P pCnt ( 2 ⋅ N N) = ∑ k = 1 2 ⋅ N 2 ⋅ N P k − 2 ⁢ N P k

Proof

Step Hyp Ref Expression
1 2nn ⊢ 2 ∈ ℕ
2 nnmulcl ⊢ 2 ∈ ℕ ∧ N ∈ ℕ → 2 ⋅ N ∈ ℕ
3 1 2 mpan ⊢ N ∈ ℕ → 2 ⋅ N ∈ ℕ
4 3 adantr ⊢ N ∈ ℕ ∧ P ∈ ℙ → 2 ⋅ N ∈ ℕ
5 nnnn0 ⊢ N ∈ ℕ → N ∈ ℕ 0
6 fzctr ⊢ N ∈ ℕ 0 → N ∈ 0 … 2 ⋅ N
7 5 6 syl ⊢ N ∈ ℕ → N ∈ 0 … 2 ⋅ N
8 7 adantr ⊢ N ∈ ℕ ∧ P ∈ ℙ → N ∈ 0 … 2 ⋅ N
9 simpr ⊢ N ∈ ℕ ∧ P ∈ ℙ → P ∈ ℙ
10 pcbc ⊢ 2 ⋅ N ∈ ℕ ∧ N ∈ 0 … 2 ⋅ N ∧ P ∈ ℙ → P pCnt ( 2 ⋅ N N) = ∑ k = 1 2 ⋅ N 2 ⋅ N P k − 2 ⋅ N − N P k + N P k
11 4 8 9 10 syl3anc ⊢ N ∈ ℕ ∧ P ∈ ℙ → P pCnt ( 2 ⋅ N N) = ∑ k = 1 2 ⋅ N 2 ⋅ N P k − 2 ⋅ N − N P k + N P k
12 nncn ⊢ N ∈ ℕ → N ∈ ℂ
13 12 2timesd ⊢ N ∈ ℕ → 2 ⋅ N = N + N
14 12 12 13 mvrladdd ⊢ N ∈ ℕ → 2 ⋅ N − N = N
15 14 fvoveq1d ⊢ N ∈ ℕ → 2 ⋅ N − N P k = N P k
16 15 oveq1d ⊢ N ∈ ℕ → 2 ⋅ N − N P k + N P k = N P k + N P k
17 16 ad2antrr ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ 1 … 2 ⋅ N → 2 ⋅ N − N P k + N P k = N P k + N P k
18 nnre ⊢ N ∈ ℕ → N ∈ ℝ
19 18 ad2antrr ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ 1 … 2 ⋅ N → N ∈ ℝ
20 prmnn ⊢ P ∈ ℙ → P ∈ ℕ
21 20 adantl ⊢ N ∈ ℕ ∧ P ∈ ℙ → P ∈ ℕ
22 elfznn ⊢ k ∈ 1 … 2 ⋅ N → k ∈ ℕ
23 22 nnnn0d ⊢ k ∈ 1 … 2 ⋅ N → k ∈ ℕ 0
24 nnexpcl ⊢ P ∈ ℕ ∧ k ∈ ℕ 0 → P k ∈ ℕ
25 21 23 24 syl2an ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ 1 … 2 ⋅ N → P k ∈ ℕ
26 19 25 nndivred ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ 1 … 2 ⋅ N → N P k ∈ ℝ
27 26 flcld ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ 1 … 2 ⋅ N → N P k ∈ ℤ
28 27 zcnd ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ 1 … 2 ⋅ N → N P k ∈ ℂ
29 28 2timesd ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ 1 … 2 ⋅ N → 2 ⁢ N P k = N P k + N P k
30 17 29 eqtr4d ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ 1 … 2 ⋅ N → 2 ⋅ N − N P k + N P k = 2 ⁢ N P k
31 30 oveq2d ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ 1 … 2 ⋅ N → 2 ⋅ N P k − 2 ⋅ N − N P k + N P k = 2 ⋅ N P k − 2 ⁢ N P k
32 31 sumeq2dv ⊢ N ∈ ℕ ∧ P ∈ ℙ → ∑ k = 1 2 ⋅ N 2 ⋅ N P k − 2 ⋅ N − N P k + N P k = ∑ k = 1 2 ⋅ N 2 ⋅ N P k − 2 ⁢ N P k
33 11 32 eqtrd ⊢ N ∈ ℕ ∧ P ∈ ℙ → P pCnt ( 2 ⋅ N N) = ∑ k = 1 2 ⋅ N 2 ⋅ N P k − 2 ⁢ N P k