Theorem chebbnd1lem1 27378

Description: Lemma for chebbnd1 27381: show a lower bound on π(𝑥) at even integers using similar techniques to those used to prove bpos 27202. (Note that the expression 𝐾 is actually equal to 2 · 𝑁, but proving that is not necessary for the proof, and it's too much work.) The key to the proof is bposlem1 27193, which shows that each term in the expansion ((2 · 𝑁)C𝑁) = ∏𝑝 ∈ ℙ (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) is at most 2 · 𝑁, so that the sum really only has nonzero elements up to 2 · 𝑁, and since each term is at most 2 · 𝑁, after taking logs we get the inequality π(2 · 𝑁) · log(2 · 𝑁) ≤ log((2 · 𝑁)C𝑁), and bclbnd 27189 finishes the proof. (Contributed by Mario Carneiro, 22-Sep-2014.) (Revised by Mario Carneiro, 15-Apr-2016.)

Hypothesis

Ref	Expression
chebbnd1lem1.1	⊢ 𝐾 = if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁))

Assertion

Ref	Expression
chebbnd1lem1	⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((4↑𝑁) / 𝑁)) < ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁))))

Proof of Theorem chebbnd1lem1

Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		4nn 12211	. . . . . 6 ⊢ 4 ∈ ℕ
2		eluznn 12819	. . . . . . . 8 ⊢ ((4 ∈ ℕ ∧ 𝑁 ∈ (ℤ≥‘4)) → 𝑁 ∈ ℕ)
3	1, 2	mpan 690	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ ℕ)
4	3	nnnn0d 12445	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ ℕ0)
5		nnexpcl 13981	. . . . . 6 ⊢ ((4 ∈ ℕ ∧ 𝑁 ∈ ℕ0) → (4↑𝑁) ∈ ℕ)
6	1, 4, 5	sylancr 587	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → (4↑𝑁) ∈ ℕ)
7	6	nnrpd 12935	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → (4↑𝑁) ∈ ℝ+)
8	3	nnrpd 12935	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ ℝ+)
9	7, 8	rpdivcld 12954	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((4↑𝑁) / 𝑁) ∈ ℝ+)
10	9	relogcld 26530	. 2 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((4↑𝑁) / 𝑁)) ∈ ℝ)
11		fzctr 13543	. . . . . 6 ⊢ (𝑁 ∈ ℕ0 → 𝑁 ∈ (0...(2 · 𝑁)))
12	4, 11	syl 17	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ (0...(2 · 𝑁)))
13		bccl2 14230	. . . . 5 ⊢ (𝑁 ∈ (0...(2 · 𝑁)) → ((2 · 𝑁)C𝑁) ∈ ℕ)
14	12, 13	syl 17	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((2 · 𝑁)C𝑁) ∈ ℕ)
15	14	nnrpd 12935	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((2 · 𝑁)C𝑁) ∈ ℝ+)
16	15	relogcld 26530	. 2 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((2 · 𝑁)C𝑁)) ∈ ℝ)
17		2z 12507	. . . . . . 7 ⊢ 2 ∈ ℤ
18		eluzelz 12745	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ ℤ)
19		zmulcl 12524	. . . . . . 7 ⊢ ((2 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (2 · 𝑁) ∈ ℤ)
20	17, 18, 19	sylancr 587	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 · 𝑁) ∈ ℤ)
21	20	zred 12580	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 · 𝑁) ∈ ℝ)
22		ppicl 27039	. . . . 5 ⊢ ((2 · 𝑁) ∈ ℝ → (π‘(2 · 𝑁)) ∈ ℕ0)
23	21, 22	syl 17	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘(2 · 𝑁)) ∈ ℕ0)
24	23	nn0red 12446	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘(2 · 𝑁)) ∈ ℝ)
25		2nn 12201	. . . . . 6 ⊢ 2 ∈ ℕ
26		nnmulcl 12152	. . . . . 6 ⊢ ((2 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 · 𝑁) ∈ ℕ)
27	25, 3, 26	sylancr 587	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 · 𝑁) ∈ ℕ)
28	27	nnrpd 12935	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 · 𝑁) ∈ ℝ+)
29	28	relogcld 26530	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘(2 · 𝑁)) ∈ ℝ)
30	24, 29	remulcld 11145	. 2 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁))) ∈ ℝ)
31		bclbnd 27189	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((4↑𝑁) / 𝑁) < ((2 · 𝑁)C𝑁))
32		logltb 26507	. . . 4 ⊢ ((((4↑𝑁) / 𝑁) ∈ ℝ+ ∧ ((2 · 𝑁)C𝑁) ∈ ℝ+) → (((4↑𝑁) / 𝑁) < ((2 · 𝑁)C𝑁) ↔ (log‘((4↑𝑁) / 𝑁)) < (log‘((2 · 𝑁)C𝑁))))
33	9, 15, 32	syl2anc 584	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → (((4↑𝑁) / 𝑁) < ((2 · 𝑁)C𝑁) ↔ (log‘((4↑𝑁) / 𝑁)) < (log‘((2 · 𝑁)C𝑁))))
34	31, 33	mpbid 232	. 2 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((4↑𝑁) / 𝑁)) < (log‘((2 · 𝑁)C𝑁)))
35		chebbnd1lem1.1	. . . . . . . 8 ⊢ 𝐾 = if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁))
36	27, 14	ifcld 4523	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ≥‘4) → if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ∈ ℕ)
37	35, 36	eqeltrid 2832	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝐾 ∈ ℕ)
38	37	nnred 12143	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝐾 ∈ ℝ)
39		ppicl 27039	. . . . . 6 ⊢ (𝐾 ∈ ℝ → (π‘𝐾) ∈ ℕ0)
40	38, 39	syl 17	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘𝐾) ∈ ℕ0)
41	40	nn0red 12446	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘𝐾) ∈ ℝ)
42	41, 29	remulcld 11145	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((π‘𝐾) · (log‘(2 · 𝑁))) ∈ ℝ)
43		fzfid 13880	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → (1...𝐾) ∈ Fin)
44		inss1 4188	. . . . . 6 ⊢ ((1...𝐾) ∩ ℙ) ⊆ (1...𝐾)
45		ssfi 9087	. . . . . 6 ⊢ (((1...𝐾) ∈ Fin ∧ ((1...𝐾) ∩ ℙ) ⊆ (1...𝐾)) → ((1...𝐾) ∩ ℙ) ∈ Fin)
46	43, 44, 45	sylancl 586	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((1...𝐾) ∩ ℙ) ∈ Fin)
47	37	nnzd 12498	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝐾 ∈ ℤ)
48	14	nnzd 12498	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((2 · 𝑁)C𝑁) ∈ ℤ)
49	14	nnred 12143	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((2 · 𝑁)C𝑁) ∈ ℝ)
50		min2 13092	. . . . . . . . . . . 12 ⊢ (((2 · 𝑁) ∈ ℝ ∧ ((2 · 𝑁)C𝑁) ∈ ℝ) → if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ≤ ((2 · 𝑁)C𝑁))
51	21, 49, 50	syl2anc 584	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ≥‘4) → if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ≤ ((2 · 𝑁)C𝑁))
52	35, 51	eqbrtrid 5127	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝐾 ≤ ((2 · 𝑁)C𝑁))
53		eluz2 12741	. . . . . . . . . 10 ⊢ (((2 · 𝑁)C𝑁) ∈ (ℤ≥‘𝐾) ↔ (𝐾 ∈ ℤ ∧ ((2 · 𝑁)C𝑁) ∈ ℤ ∧ 𝐾 ≤ ((2 · 𝑁)C𝑁)))
54	47, 48, 52, 53	syl3anbrc 1344	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((2 · 𝑁)C𝑁) ∈ (ℤ≥‘𝐾))
55		fzss2 13467	. . . . . . . . 9 ⊢ (((2 · 𝑁)C𝑁) ∈ (ℤ≥‘𝐾) → (1...𝐾) ⊆ (1...((2 · 𝑁)C𝑁)))
56	54, 55	syl 17	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ≥‘4) → (1...𝐾) ⊆ (1...((2 · 𝑁)C𝑁)))
57	56	ssrind 4195	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((1...𝐾) ∩ ℙ) ⊆ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ))
58	57	sselda 3935	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ))
59		simpr 484	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ))
60	59	elin1d 4155	. . . . . . . . . 10 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → 𝑘 ∈ (1...((2 · 𝑁)C𝑁)))
61		elfznn 13456	. . . . . . . . . 10 ⊢ (𝑘 ∈ (1...((2 · 𝑁)C𝑁)) → 𝑘 ∈ ℕ)
62	60, 61	syl 17	. . . . . . . . 9 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → 𝑘 ∈ ℕ)
63	59	elin2d 4156	. . . . . . . . . 10 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → 𝑘 ∈ ℙ)
64	14	adantr 480	. . . . . . . . . 10 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → ((2 · 𝑁)C𝑁) ∈ ℕ)
65	63, 64	pccld 16762	. . . . . . . . 9 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ0)
66	62, 65	nnexpcld 14152	. . . . . . . 8 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℕ)
67	66	nnrpd 12935	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ+)
68	67	relogcld 26530	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ∈ ℝ)
69	58, 68	syldan 591	. . . . 5 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ∈ ℝ)
70	29	adantr 480	. . . . 5 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (log‘(2 · 𝑁)) ∈ ℝ)
71		elinel2 4153	. . . . . . . 8 ⊢ (𝑘 ∈ ((1...𝐾) ∩ ℙ) → 𝑘 ∈ ℙ)
72		bposlem1 27193	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑘 ∈ ℙ) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁))
73	3, 71, 72	syl2an 596	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁))
74	58, 67	syldan 591	. . . . . . . 8 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ+)
75	74	reeflogd 26531	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (exp‘(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))) = (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))
76	28	adantr 480	. . . . . . . 8 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (2 · 𝑁) ∈ ℝ+)
77	76	reeflogd 26531	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (exp‘(log‘(2 · 𝑁))) = (2 · 𝑁))
78	73, 75, 77	3brtr4d 5124	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (exp‘(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))) ≤ (exp‘(log‘(2 · 𝑁))))
79		efle 16027	. . . . . . 7 ⊢ (((log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ∈ ℝ ∧ (log‘(2 · 𝑁)) ∈ ℝ) → ((log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ≤ (log‘(2 · 𝑁)) ↔ (exp‘(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))) ≤ (exp‘(log‘(2 · 𝑁)))))
80	69, 70, 79	syl2anc 584	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → ((log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ≤ (log‘(2 · 𝑁)) ↔ (exp‘(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))) ≤ (exp‘(log‘(2 · 𝑁)))))
81	78, 80	mpbird 257	. . . . 5 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ≤ (log‘(2 · 𝑁)))
82	46, 69, 70, 81	fsumle 15706	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ≤ Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(2 · 𝑁)))
83	68	recnd 11143	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ∈ ℂ)
84	58, 83	syldan 591	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ∈ ℂ)
85		eldifn 4083	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) → ¬ 𝑘 ∈ ((1...𝐾) ∩ ℙ))
86	85	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → ¬ 𝑘 ∈ ((1...𝐾) ∩ ℙ))
87		simpr 484	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)))
88	87	eldifad 3915	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ))
89	88	elin1d 4155	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ (1...((2 · 𝑁)C𝑁)))
90	89, 61	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ ℕ)
91	90	adantrr 717	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ ℕ)
92	91	nnred 12143	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ ℝ)
93	88, 66	syldan 591	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℕ)
94	93	nnred 12143	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ)
95	94	adantrr 717	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ)
96	21	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (2 · 𝑁) ∈ ℝ)
97	91	nncnd 12144	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ ℂ)
98	97	exp1d 14048	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘↑1) = 𝑘)
99	91	nnge1d 12176	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 1 ≤ 𝑘)
100		simprr 772	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)
101		nnuz 12778	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ℕ = (ℤ≥‘1)
102	100, 101	eleqtrdi 2838	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ (ℤ≥‘1))
103	92, 99, 102	leexp2ad 14161	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘↑1) ≤ (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))
104	98, 103	eqbrtrrd 5116	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ≤ (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))
105	3	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑁 ∈ ℕ)
106	88	elin2d 4156	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ ℙ)
107	106	adantrr 717	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ ℙ)
108	105, 107, 72	syl2anc 584	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁))
109	92, 95, 96, 104, 108	letrd 11273	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ≤ (2 · 𝑁))
110		elfzle2 13431	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ (1...((2 · 𝑁)C𝑁)) → 𝑘 ≤ ((2 · 𝑁)C𝑁))
111	89, 110	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ≤ ((2 · 𝑁)C𝑁))
112	111	adantrr 717	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ≤ ((2 · 𝑁)C𝑁))
113	49	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → ((2 · 𝑁)C𝑁) ∈ ℝ)
114		lemin 13094	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℝ ∧ (2 · 𝑁) ∈ ℝ ∧ ((2 · 𝑁)C𝑁) ∈ ℝ) → (𝑘 ≤ if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ↔ (𝑘 ≤ (2 · 𝑁) ∧ 𝑘 ≤ ((2 · 𝑁)C𝑁))))
115	92, 96, 113, 114	syl3anc 1373	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘 ≤ if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ↔ (𝑘 ≤ (2 · 𝑁) ∧ 𝑘 ≤ ((2 · 𝑁)C𝑁))))
116	109, 112, 115	mpbir2and 713	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ≤ if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)))
117	116, 35	breqtrrdi 5134	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ≤ 𝐾)
118	37	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝐾 ∈ ℕ)
119	118	nnzd 12498	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝐾 ∈ ℤ)
120		fznn 13495	. . . . . . . . . . . . . . . 16 ⊢ (𝐾 ∈ ℤ → (𝑘 ∈ (1...𝐾) ↔ (𝑘 ∈ ℕ ∧ 𝑘 ≤ 𝐾)))
121	119, 120	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘 ∈ (1...𝐾) ↔ (𝑘 ∈ ℕ ∧ 𝑘 ≤ 𝐾)))
122	91, 117, 121	mpbir2and 713	. . . . . . . . . . . . . 14 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ (1...𝐾))
123	122, 107	elind 4151	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ ((1...𝐾) ∩ ℙ))
124	123	expr 456	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → ((𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ → 𝑘 ∈ ((1...𝐾) ∩ ℙ)))
125	86, 124	mtod 198	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → ¬ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)
126	88, 65	syldan 591	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ0)
127		elnn0 12386	. . . . . . . . . . . . 13 ⊢ ((𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ0 ↔ ((𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ ∨ (𝑘 pCnt ((2 · 𝑁)C𝑁)) = 0))
128	126, 127	sylib 218	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → ((𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ ∨ (𝑘 pCnt ((2 · 𝑁)C𝑁)) = 0))
129	128	ord 864	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (¬ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ → (𝑘 pCnt ((2 · 𝑁)C𝑁)) = 0))
130	125, 129	mpd 15	. . . . . . . . . 10 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) = 0)
131	130	oveq2d 7365	. . . . . . . . 9 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) = (𝑘↑0))
132	90	nncnd 12144	. . . . . . . . . 10 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ ℂ)
133	132	exp0d 14047	. . . . . . . . 9 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘↑0) = 1)
134	131, 133	eqtrd 2764	. . . . . . . 8 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) = 1)
135	134	fveq2d 6826	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = (log‘1))
136		log1 26492	. . . . . . 7 ⊢ (log‘1) = 0
137	135, 136	eqtrdi 2780	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = 0)
138		fzfid 13880	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → (1...((2 · 𝑁)C𝑁)) ∈ Fin)
139		inss1 4188	. . . . . . 7 ⊢ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ⊆ (1...((2 · 𝑁)C𝑁))
140		ssfi 9087	. . . . . . 7 ⊢ (((1...((2 · 𝑁)C𝑁)) ∈ Fin ∧ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ⊆ (1...((2 · 𝑁)C𝑁))) → ((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∈ Fin)
141	138, 139, 140	sylancl 586	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∈ Fin)
142	57, 84, 137, 141	fsumss 15632	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = Σ𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))))
143	62	nnrpd 12935	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → 𝑘 ∈ ℝ+)
144	65	nn0zd 12497	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℤ)
145		relogexp 26503	. . . . . . 7 ⊢ ((𝑘 ∈ ℝ+ ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℤ) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = ((𝑘 pCnt ((2 · 𝑁)C𝑁)) · (log‘𝑘)))
146	143, 144, 145	syl2anc 584	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = ((𝑘 pCnt ((2 · 𝑁)C𝑁)) · (log‘𝑘)))
147	146	sumeq2dv 15609	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = Σ𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)((𝑘 pCnt ((2 · 𝑁)C𝑁)) · (log‘𝑘)))
148		pclogsum 27124	. . . . . 6 ⊢ (((2 · 𝑁)C𝑁) ∈ ℕ → Σ𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)((𝑘 pCnt ((2 · 𝑁)C𝑁)) · (log‘𝑘)) = (log‘((2 · 𝑁)C𝑁)))
149	14, 148	syl 17	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)((𝑘 pCnt ((2 · 𝑁)C𝑁)) · (log‘𝑘)) = (log‘((2 · 𝑁)C𝑁)))
150	142, 147, 149	3eqtrd 2768	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = (log‘((2 · 𝑁)C𝑁)))
151	29	recnd 11143	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘(2 · 𝑁)) ∈ ℂ)
152		fsumconst 15697	. . . . . 6 ⊢ ((((1...𝐾) ∩ ℙ) ∈ Fin ∧ (log‘(2 · 𝑁)) ∈ ℂ) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(2 · 𝑁)) = ((♯‘((1...𝐾) ∩ ℙ)) · (log‘(2 · 𝑁))))
153	46, 151, 152	syl2anc 584	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(2 · 𝑁)) = ((♯‘((1...𝐾) ∩ ℙ)) · (log‘(2 · 𝑁))))
154		2eluzge1 12783	. . . . . . 7 ⊢ 2 ∈ (ℤ≥‘1)
155		ppival2g 27037	. . . . . . 7 ⊢ ((𝐾 ∈ ℤ ∧ 2 ∈ (ℤ≥‘1)) → (π‘𝐾) = (♯‘((1...𝐾) ∩ ℙ)))
156	47, 154, 155	sylancl 586	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘𝐾) = (♯‘((1...𝐾) ∩ ℙ)))
157	156	oveq1d 7364	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((π‘𝐾) · (log‘(2 · 𝑁))) = ((♯‘((1...𝐾) ∩ ℙ)) · (log‘(2 · 𝑁))))
158	153, 157	eqtr4d 2767	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(2 · 𝑁)) = ((π‘𝐾) · (log‘(2 · 𝑁))))
159	82, 150, 158	3brtr3d 5123	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((2 · 𝑁)C𝑁)) ≤ ((π‘𝐾) · (log‘(2 · 𝑁))))
160		min1 13091	. . . . . . 7 ⊢ (((2 · 𝑁) ∈ ℝ ∧ ((2 · 𝑁)C𝑁) ∈ ℝ) → if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ≤ (2 · 𝑁))
161	21, 49, 160	syl2anc 584	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ≤ (2 · 𝑁))
162	35, 161	eqbrtrid 5127	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝐾 ≤ (2 · 𝑁))
163		ppiwordi 27070	. . . . 5 ⊢ ((𝐾 ∈ ℝ ∧ (2 · 𝑁) ∈ ℝ ∧ 𝐾 ≤ (2 · 𝑁)) → (π‘𝐾) ≤ (π‘(2 · 𝑁)))
164	38, 21, 162, 163	syl3anc 1373	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘𝐾) ≤ (π‘(2 · 𝑁)))
165		1red 11116	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 1 ∈ ℝ)
166		2re 12202	. . . . . . . 8 ⊢ 2 ∈ ℝ
167	166	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 2 ∈ ℝ)
168		1lt2 12294	. . . . . . . 8 ⊢ 1 < 2
169	168	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 1 < 2)
170		2t1e2 12286	. . . . . . . 8 ⊢ (2 · 1) = 2
171	3	nnge1d 12176	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ≥‘4) → 1 ≤ 𝑁)
172		eluzelre 12746	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ ℝ)
173		2pos 12231	. . . . . . . . . . . 12 ⊢ 0 < 2
174	166, 173	pm3.2i 470	. . . . . . . . . . 11 ⊢ (2 ∈ ℝ ∧ 0 < 2)
175	174	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 ∈ ℝ ∧ 0 < 2))
176		lemul2 11977	. . . . . . . . . 10 ⊢ ((1 ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → (1 ≤ 𝑁 ↔ (2 · 1) ≤ (2 · 𝑁)))
177	165, 172, 175, 176	syl3anc 1373	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ≥‘4) → (1 ≤ 𝑁 ↔ (2 · 1) ≤ (2 · 𝑁)))
178	171, 177	mpbid 232	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 · 1) ≤ (2 · 𝑁))
179	170, 178	eqbrtrrid 5128	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 2 ≤ (2 · 𝑁))
180	165, 167, 21, 169, 179	ltletrd 11276	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → 1 < (2 · 𝑁))
181	21, 180	rplogcld 26536	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘(2 · 𝑁)) ∈ ℝ+)
182	41, 24, 181	lemul1d 12980	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((π‘𝐾) ≤ (π‘(2 · 𝑁)) ↔ ((π‘𝐾) · (log‘(2 · 𝑁))) ≤ ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁)))))
183	164, 182	mpbid 232	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((π‘𝐾) · (log‘(2 · 𝑁))) ≤ ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁))))
184	16, 42, 30, 159, 183	letrd 11273	. 2 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((2 · 𝑁)C𝑁)) ≤ ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁))))
185	10, 16, 30, 34, 184	ltletrd 11276	1 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((4↑𝑁) / 𝑁)) < ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁))))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∨ wo 847   = wceq 1540   ∈ wcel 2109   ∖ cdif 3900   ∩ cin 3902   ⊆ wss 3903  ifcif 4476   class class class wbr 5092  ‘cfv 6482  (class class class)co 7349  Fincfn 8872  ℂcc 11007  ℝcr 11008  0cc0 11009  1c1 11010   · cmul 11014   < clt 11149   ≤ cle 11150   / cdiv 11777  ℕcn 12128  2c2 12183  4c4 12185  ℕ₀cn0 12384  ℤcz 12471  ℤ_≥cuz 12735  ℝ⁺crp 12893  ...cfz 13410  ↑cexp 13968  Ccbc 14209  ♯chash 14237  Σcsu 15593  expce 15968  ℙcprime 16582   pCnt cpc 16748  logclog 26461  πcppi 27002

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5218  ax-sep 5235  ax-nul 5245  ax-pow 5304  ax-pr 5371  ax-un 7671  ax-inf2 9537  ax-cnex 11065  ax-resscn 11066  ax-1cn 11067  ax-icn 11068  ax-addcl 11069  ax-addrcl 11070  ax-mulcl 11071  ax-mulrcl 11072  ax-mulcom 11073  ax-addass 11074  ax-mulass 11075  ax-distr 11076  ax-i2m1 11077  ax-1ne0 11078  ax-1rid 11079  ax-rnegex 11080  ax-rrecex 11081  ax-cnre 11082  ax-pre-lttri 11083  ax-pre-lttrn 11084  ax-pre-ltadd 11085  ax-pre-mulgt0 11086  ax-pre-sup 11087  ax-addf 11088

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3343  df-reu 3344  df-rab 3395  df-v 3438  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4285  df-if 4477  df-pw 4553  df-sn 4578  df-pr 4580  df-tp 4582  df-op 4584  df-uni 4859  df-int 4897  df-iun 4943  df-iin 4944  df-br 5093  df-opab 5155  df-mpt 5174  df-tr 5200  df-id 5514  df-eprel 5519  df-po 5527  df-so 5528  df-fr 5572  df-se 5573  df-we 5574  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-pred 6249  df-ord 6310  df-on 6311  df-lim 6312  df-suc 6313  df-iota 6438  df-fun 6484  df-fn 6485  df-f 6486  df-f1 6487  df-fo 6488  df-f1o 6489  df-fv 6490  df-isom 6491  df-riota 7306  df-ov 7352  df-oprab 7353  df-mpo 7354  df-of 7613  df-om 7800  df-1st 7924  df-2nd 7925  df-supp 8094  df-frecs 8214  df-wrecs 8245  df-recs 8294  df-rdg 8332  df-1o 8388  df-2o 8389  df-oadd 8392  df-er 8625  df-map 8755  df-pm 8756  df-ixp 8825  df-en 8873  df-dom 8874  df-sdom 8875  df-fin 8876  df-fsupp 9252  df-fi 9301  df-sup 9332  df-inf 9333  df-oi 9402  df-card 9835  df-pnf 11151  df-mnf 11152  df-xr 11153  df-ltxr 11154  df-le 11155  df-sub 11349  df-neg 11350  df-div 11778  df-nn 12129  df-2 12191  df-3 12192  df-4 12193  df-5 12194  df-6 12195  df-7 12196  df-8 12197  df-9 12198  df-n0 12385  df-xnn0 12458  df-z 12472  df-dec 12592  df-uz 12736  df-q 12850  df-rp 12894  df-xneg 13014  df-xadd 13015  df-xmul 13016  df-ioo 13252  df-ioc 13253  df-ico 13254  df-icc 13255  df-fz 13411  df-fzo 13558  df-fl 13696  df-mod 13774  df-seq 13909  df-exp 13969  df-fac 14181  df-bc 14210  df-hash 14238  df-shft 14974  df-cj 15006  df-re 15007  df-im 15008  df-sqrt 15142  df-abs 15143  df-limsup 15378  df-clim 15395  df-rlim 15396  df-sum 15594  df-ef 15974  df-sin 15976  df-cos 15977  df-pi 15979  df-dvds 16164  df-gcd 16406  df-prm 16583  df-pc 16749  df-struct 17058  df-sets 17075  df-slot 17093  df-ndx 17105  df-base 17121  df-ress 17142  df-plusg 17174  df-mulr 17175  df-starv 17176  df-sca 17177  df-vsca 17178  df-ip 17179  df-tset 17180  df-ple 17181  df-ds 17183  df-unif 17184  df-hom 17185  df-cco 17186  df-rest 17326  df-topn 17327  df-0g 17345  df-gsum 17346  df-topgen 17347  df-pt 17348  df-prds 17351  df-xrs 17406  df-qtop 17411  df-imas 17412  df-xps 17414  df-mre 17488  df-mrc 17489  df-acs 17491  df-mgm 18514  df-sgrp 18593  df-mnd 18609  df-submnd 18658  df-mulg 18947  df-cntz 19196  df-cmn 19661  df-psmet 21253  df-xmet 21254  df-met 21255  df-bl 21256  df-mopn 21257  df-fbas 21258  df-fg 21259  df-cnfld 21262  df-top 22779  df-topon 22796  df-topsp 22818  df-bases 22831  df-cld 22904  df-ntr 22905  df-cls 22906  df-nei 22983  df-lp 23021  df-perf 23022  df-cn 23112  df-cnp 23113  df-haus 23200  df-tx 23447  df-hmeo 23640  df-fil 23731  df-fm 23823  df-flim 23824  df-flf 23825  df-xms 24206  df-ms 24207  df-tms 24208  df-cncf 24769  df-limc 25765  df-dv 25766  df-log 26463  df-ppi 27008

This theorem is referenced by:  chebbnd1lem3  27380