Theorem chebbnd1lem1 27805

Description: Lemma for chebbnd1 27808: show a lower bound on π(𝑥) at even integers using similar techniques to those used to prove bpos 27629. (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 27620, 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 27616 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 12433	. . . . . 6 ⊢ 4 ∈ ℕ
2		eluznn 13052	. . . . . . . 8 ⊢ ((4 ∈ ℕ ∧ 𝑁 ∈ (ℤ≥‘4)) → 𝑁 ∈ ℕ)
3	1, 2	mpan 703	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ ℕ)
4	3	nnnn0d 12674	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ ℕ0)
5		nnexpcl 14224	. . . . . 6 ⊢ ((4 ∈ ℕ ∧ 𝑁 ∈ ℕ0) → (4↑𝑁) ∈ ℕ)
6	1, 4, 5	sylancr 599	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → (4↑𝑁) ∈ ℕ)
7	6	nnrpd 13169	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → (4↑𝑁) ∈ ℝ+)
8	3	nnrpd 13169	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ ℝ+)
9	7, 8	rpdivcld 13188	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((4↑𝑁) / 𝑁) ∈ ℝ+)
10	9	relogcld 26960	. 2 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((4↑𝑁) / 𝑁)) ∈ ℝ)
11		fzctr 13781	. . . . . 6 ⊢ (𝑁 ∈ ℕ0 → 𝑁 ∈ (0...(2 · 𝑁)))
12	4, 11	syl 18	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ (0...(2 · 𝑁)))
13		bccl2 14474	. . . . 5 ⊢ (𝑁 ∈ (0...(2 · 𝑁)) → ((2 · 𝑁)C𝑁) ∈ ℕ)
14	12, 13	syl 18	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((2 · 𝑁)C𝑁) ∈ ℕ)
15	14	nnrpd 13169	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((2 · 𝑁)C𝑁) ∈ ℝ+)
16	15	relogcld 26960	. 2 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((2 · 𝑁)C𝑁)) ∈ ℝ)
17		2z 12735	. . . . . . 7 ⊢ 2 ∈ ℤ
18		eluzelz 12982	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ ℤ)
19		zmulcl 12752	. . . . . . 7 ⊢ ((2 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (2 · 𝑁) ∈ ℤ)
20	17, 18, 19	sylancr 599	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 · 𝑁) ∈ ℤ)
21	20	zred 12810	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 · 𝑁) ∈ ℝ)
22		ppicl 27467	. . . . 5 ⊢ ((2 · 𝑁) ∈ ℝ → (π‘(2 · 𝑁)) ∈ ℕ0)
23	21, 22	syl 18	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘(2 · 𝑁)) ∈ ℕ0)
24	23	nn0red 12675	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘(2 · 𝑁)) ∈ ℝ)
25		2nn 12423	. . . . . 6 ⊢ 2 ∈ ℕ
26		nnmulcl 12366	. . . . . 6 ⊢ ((2 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 · 𝑁) ∈ ℕ)
27	25, 3, 26	sylancr 599	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 · 𝑁) ∈ ℕ)
28	27	nnrpd 13169	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 · 𝑁) ∈ ℝ+)
29	28	relogcld 26960	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘(2 · 𝑁)) ∈ ℝ)
30	24, 29	remulcld 11346	. 2 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁))) ∈ ℝ)
31		bclbnd 27616	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((4↑𝑁) / 𝑁) < ((2 · 𝑁)C𝑁))
32		logltb 26937	. . . 4 ⊢ ((((4↑𝑁) / 𝑁) ∈ ℝ+ ∧ ((2 · 𝑁)C𝑁) ∈ ℝ+) → (((4↑𝑁) / 𝑁) < ((2 · 𝑁)C𝑁) ↔ (log‘((4↑𝑁) / 𝑁)) < (log‘((2 · 𝑁)C𝑁))))
33	9, 15, 32	syl2anc 596	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → (((4↑𝑁) / 𝑁) < ((2 · 𝑁)C𝑁) ↔ (log‘((4↑𝑁) / 𝑁)) < (log‘((2 · 𝑁)C𝑁))))
34	31, 33	mpbid 235	. 2 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((4↑𝑁) / 𝑁)) < (log‘((2 · 𝑁)C𝑁)))
35		chebbnd1lem1.1	. . . . . . . 8 ⊢ 𝐾 = if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁))
36	27, 14	ifcld 4528	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ≥‘4) → if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ∈ ℕ)
37	35, 36	eqeltrid 2864	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝐾 ∈ ℕ)
38	37	nnred 12357	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝐾 ∈ ℝ)
39		ppicl 27467	. . . . . 6 ⊢ (𝐾 ∈ ℝ → (π‘𝐾) ∈ ℕ0)
40	38, 39	syl 18	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘𝐾) ∈ ℕ0)
41	40	nn0red 12675	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘𝐾) ∈ ℝ)
42	41, 29	remulcld 11346	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((π‘𝐾) · (log‘(2 · 𝑁))) ∈ ℝ)
43		fzfid 14123	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → (1...𝐾) ∈ Fin)
44		inss1 4132	. . . . . 6 ⊢ ((1...𝐾) ∩ ℙ) ⊆ (1...𝐾)
45		ssfi 9196	. . . . . 6 ⊢ (((1...𝐾) ∈ Fin ∧ ((1...𝐾) ∩ ℙ) ⊆ (1...𝐾)) → ((1...𝐾) ∩ ℙ) ∈ Fin)
46	43, 44, 45	sylancl 598	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((1...𝐾) ∩ ℙ) ∈ Fin)
47	37	nnzd 12726	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝐾 ∈ ℤ)
48	14	nnzd 12726	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((2 · 𝑁)C𝑁) ∈ ℤ)
49	14	nnred 12357	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((2 · 𝑁)C𝑁) ∈ ℝ)
50		min2 13327	. . . . . . . . . . . 12 ⊢ (((2 · 𝑁) ∈ ℝ ∧ ((2 · 𝑁)C𝑁) ∈ ℝ) → if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ≤ ((2 · 𝑁)C𝑁))
51	21, 49, 50	syl2anc 596	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ≥‘4) → if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ≤ ((2 · 𝑁)C𝑁))
52	35, 51	eqbrtrid 5139	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝐾 ≤ ((2 · 𝑁)C𝑁))
53		eluz2 12978	. . . . . . . . . 10 ⊢ (((2 · 𝑁)C𝑁) ∈ (ℤ≥‘𝐾) ↔ (𝐾 ∈ ℤ ∧ ((2 · 𝑁)C𝑁) ∈ ℤ ∧ 𝐾 ≤ ((2 · 𝑁)C𝑁)))
54	47, 48, 52, 53	syl3anbrc 1362	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((2 · 𝑁)C𝑁) ∈ (ℤ≥‘𝐾))
55		fzss2 13705	. . . . . . . . 9 ⊢ (((2 · 𝑁)C𝑁) ∈ (ℤ≥‘𝐾) → (1...𝐾) ⊆ (1...((2 · 𝑁)C𝑁)))
56	54, 55	syl 18	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ≥‘4) → (1...𝐾) ⊆ (1...((2 · 𝑁)C𝑁)))
57	56	ssrind 4139	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((1...𝐾) ∩ ℙ) ⊆ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ))
58	57	sselda 3909	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ))
59		simpr 490	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ))
60	59	elin1d 4100	. . . . . . . . . 10 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → 𝑘 ∈ (1...((2 · 𝑁)C𝑁)))
61		elfznn 13694	. . . . . . . . . 10 ⊢ (𝑘 ∈ (1...((2 · 𝑁)C𝑁)) → 𝑘 ∈ ℕ)
62	60, 61	syl 18	. . . . . . . . 9 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → 𝑘 ∈ ℕ)
63	59	elin2d 4101	. . . . . . . . . 10 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → 𝑘 ∈ ℙ)
64	14	adantr 486	. . . . . . . . . 10 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → ((2 · 𝑁)C𝑁) ∈ ℕ)
65	63, 64	pccld 17037	. . . . . . . . 9 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ0)
66	62, 65	nnexpcld 14396	. . . . . . . 8 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℕ)
67	66	nnrpd 13169	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ+)
68	67	relogcld 26960	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ∈ ℝ)
69	58, 68	syldan 603	. . . . 5 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ∈ ℝ)
70	29	adantr 486	. . . . 5 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (log‘(2 · 𝑁)) ∈ ℝ)
71		elinel2 4098	. . . . . . . 8 ⊢ (𝑘 ∈ ((1...𝐾) ∩ ℙ) → 𝑘 ∈ ℙ)
72		bposlem1 27620	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑘 ∈ ℙ) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁))
73	3, 71, 72	syl2an 608	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁))
74	58, 67	syldan 603	. . . . . . . 8 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ+)
75	74	reeflogd 26961	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (exp‘(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))) = (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))
76	28	adantr 486	. . . . . . . 8 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (2 · 𝑁) ∈ ℝ+)
77	76	reeflogd 26961	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (exp‘(log‘(2 · 𝑁))) = (2 · 𝑁))
78	73, 75, 77	3brtr4d 5136	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (exp‘(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))) ≤ (exp‘(log‘(2 · 𝑁))))
79		efle 16295	. . . . . . 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 596	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → ((log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ≤ (log‘(2 · 𝑁)) ↔ (exp‘(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))) ≤ (exp‘(log‘(2 · 𝑁)))))
81	78, 80	mpbird 260	. . . . 5 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ≤ (log‘(2 · 𝑁)))
82	46, 69, 70, 81	fsumle 15975	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ≤ Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(2 · 𝑁)))
83	68	recnd 11344	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ∈ ℂ)
84	58, 83	syldan 603	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...𝐾) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) ∈ ℂ)
85		eldifn 4067	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) → ¬ 𝑘 ∈ ((1...𝐾) ∩ ℙ))
86	85	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → ¬ 𝑘 ∈ ((1...𝐾) ∩ ℙ))
87		simpr 490	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)))
88	87	eldifad 4050	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ))
89	88	elin1d 4100	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ (1...((2 · 𝑁)C𝑁)))
90	89, 61	syl 18	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ ℕ)
91	90	adantrr 730	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ ℕ)
92	91	nnred 12357	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ ℝ)
93	88, 66	syldan 603	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℕ)
94	93	nnred 12357	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ)
95	94	adantrr 730	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ)
96	21	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (2 · 𝑁) ∈ ℝ)
97	91	nncnd 12358	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ ℂ)
98	97	exp1d 14291	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘↑1) = 𝑘)
99	91	nnge1d 12393	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 1 ≤ 𝑘)
100		simprr 785	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)
101		nnuz 13011	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ℕ = (ℤ≥‘1)
102	100, 101	eleqtrdi 2870	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ (ℤ≥‘1))
103	92, 99, 102	leexp2ad 14405	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘↑1) ≤ (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))
104	98, 103	eqbrtrrd 5128	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ≤ (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))))
105	3	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑁 ∈ ℕ)
106	88	elin2d 4101	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ ℙ)
107	106	adantrr 730	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ ℙ)
108	105, 107, 72	syl2anc 596	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁))
109	92, 95, 96, 104, 108	letrd 11474	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ≤ (2 · 𝑁))
110		elfzle2 13668	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ (1...((2 · 𝑁)C𝑁)) → 𝑘 ≤ ((2 · 𝑁)C𝑁))
111	89, 110	syl 18	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ≤ ((2 · 𝑁)C𝑁))
112	111	adantrr 730	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ≤ ((2 · 𝑁)C𝑁))
113	49	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → ((2 · 𝑁)C𝑁) ∈ ℝ)
114		lemin 13329	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℝ ∧ (2 · 𝑁) ∈ ℝ ∧ ((2 · 𝑁)C𝑁) ∈ ℝ) → (𝑘 ≤ if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ↔ (𝑘 ≤ (2 · 𝑁) ∧ 𝑘 ≤ ((2 · 𝑁)C𝑁))))
115	92, 96, 113, 114	syl3anc 1398	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘 ≤ if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ↔ (𝑘 ≤ (2 · 𝑁) ∧ 𝑘 ≤ ((2 · 𝑁)C𝑁))))
116	109, 112, 115	mpbir2and 726	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ≤ if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)))
117	116, 35	breqtrrdi 5146	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ≤ 𝐾)
118	37	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝐾 ∈ ℕ)
119	118	nnzd 12726	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝐾 ∈ ℤ)
120		fznn 13733	. . . . . . . . . . . . . . . 16 ⊢ (𝐾 ∈ ℤ → (𝑘 ∈ (1...𝐾) ↔ (𝑘 ∈ ℕ ∧ 𝑘 ≤ 𝐾)))
121	119, 120	syl 18	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → (𝑘 ∈ (1...𝐾) ↔ (𝑘 ∈ ℕ ∧ 𝑘 ≤ 𝐾)))
122	91, 117, 121	mpbir2and 726	. . . . . . . . . . . . . 14 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ (1...𝐾))
123	122, 107	elind 4096	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ (𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ)) ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)) → 𝑘 ∈ ((1...𝐾) ∩ ℙ))
124	123	expr 462	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → ((𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ → 𝑘 ∈ ((1...𝐾) ∩ ℙ)))
125	86, 124	mtod 201	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → ¬ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ)
126	88, 65	syldan 603	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ0)
127		elnn0 12615	. . . . . . . . . . . . 13 ⊢ ((𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ0 ↔ ((𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ ∨ (𝑘 pCnt ((2 · 𝑁)C𝑁)) = 0))
128	126, 127	sylib 221	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → ((𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ ∨ (𝑘 pCnt ((2 · 𝑁)C𝑁)) = 0))
129	128	ord 878	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (¬ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ → (𝑘 pCnt ((2 · 𝑁)C𝑁)) = 0))
130	125, 129	mpd 16	. . . . . . . . . 10 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) = 0)
131	130	oveq2d 7440	. . . . . . . . 9 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) = (𝑘↑0))
132	90	nncnd 12358	. . . . . . . . . 10 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → 𝑘 ∈ ℂ)
133	132	exp0d 14290	. . . . . . . . 9 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘↑0) = 1)
134	131, 133	eqtrd 2795	. . . . . . . 8 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁))) = 1)
135	134	fveq2d 6894	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = (log‘1))
136		log1 26922	. . . . . . 7 ⊢ (log‘1) = 0
137	135, 136	eqtrdi 2811	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ (((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∖ ((1...𝐾) ∩ ℙ))) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = 0)
138		fzfid 14123	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → (1...((2 · 𝑁)C𝑁)) ∈ Fin)
139		inss1 4132	. . . . . . 7 ⊢ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ⊆ (1...((2 · 𝑁)C𝑁))
140		ssfi 9196	. . . . . . 7 ⊢ (((1...((2 · 𝑁)C𝑁)) ∈ Fin ∧ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ⊆ (1...((2 · 𝑁)C𝑁))) → ((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∈ Fin)
141	138, 139, 140	sylancl 598	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((1...((2 · 𝑁)C𝑁)) ∩ ℙ) ∈ Fin)
142	57, 84, 137, 141	fsumss 15900	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = Σ𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))))
143	62	nnrpd 13169	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → 𝑘 ∈ ℝ+)
144	65	nn0zd 12725	. . . . . . 7 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℤ)
145		relogexp 26933	. . . . . . 7 ⊢ ((𝑘 ∈ ℝ+ ∧ (𝑘 pCnt ((2 · 𝑁)C𝑁)) ∈ ℤ) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = ((𝑘 pCnt ((2 · 𝑁)C𝑁)) · (log‘𝑘)))
146	143, 144, 145	syl2anc 596	. . . . . 6 ⊢ ((𝑁 ∈ (ℤ≥‘4) ∧ 𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)) → (log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = ((𝑘 pCnt ((2 · 𝑁)C𝑁)) · (log‘𝑘)))
147	146	sumeq2dv 15878	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = Σ𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)((𝑘 pCnt ((2 · 𝑁)C𝑁)) · (log‘𝑘)))
148		pclogsum 27551	. . . . . 6 ⊢ (((2 · 𝑁)C𝑁) ∈ ℕ → Σ𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)((𝑘 pCnt ((2 · 𝑁)C𝑁)) · (log‘𝑘)) = (log‘((2 · 𝑁)C𝑁)))
149	14, 148	syl 18	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...((2 · 𝑁)C𝑁)) ∩ ℙ)((𝑘 pCnt ((2 · 𝑁)C𝑁)) · (log‘𝑘)) = (log‘((2 · 𝑁)C𝑁)))
150	142, 147, 149	3eqtrd 2799	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(𝑘↑(𝑘 pCnt ((2 · 𝑁)C𝑁)))) = (log‘((2 · 𝑁)C𝑁)))
151	29	recnd 11344	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘(2 · 𝑁)) ∈ ℂ)
152		fsumconst 15965	. . . . . 6 ⊢ ((((1...𝐾) ∩ ℙ) ∈ Fin ∧ (log‘(2 · 𝑁)) ∈ ℂ) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(2 · 𝑁)) = ((♯‘((1...𝐾) ∩ ℙ)) · (log‘(2 · 𝑁))))
153	46, 151, 152	syl2anc 596	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(2 · 𝑁)) = ((♯‘((1...𝐾) ∩ ℙ)) · (log‘(2 · 𝑁))))
154		2eluzge1 13016	. . . . . . 7 ⊢ 2 ∈ (ℤ≥‘1)
155		ppival2g 27465	. . . . . . 7 ⊢ ((𝐾 ∈ ℤ ∧ 2 ∈ (ℤ≥‘1)) → (π‘𝐾) = (♯‘((1...𝐾) ∩ ℙ)))
156	47, 154, 155	sylancl 598	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘𝐾) = (♯‘((1...𝐾) ∩ ℙ)))
157	156	oveq1d 7439	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((π‘𝐾) · (log‘(2 · 𝑁))) = ((♯‘((1...𝐾) ∩ ℙ)) · (log‘(2 · 𝑁))))
158	153, 157	eqtr4d 2798	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → Σ𝑘 ∈ ((1...𝐾) ∩ ℙ)(log‘(2 · 𝑁)) = ((π‘𝐾) · (log‘(2 · 𝑁))))
159	82, 150, 158	3brtr3d 5135	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((2 · 𝑁)C𝑁)) ≤ ((π‘𝐾) · (log‘(2 · 𝑁))))
160		min1 13326	. . . . . . 7 ⊢ (((2 · 𝑁) ∈ ℝ ∧ ((2 · 𝑁)C𝑁) ∈ ℝ) → if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ≤ (2 · 𝑁))
161	21, 49, 160	syl2anc 596	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → if((2 · 𝑁) ≤ ((2 · 𝑁)C𝑁), (2 · 𝑁), ((2 · 𝑁)C𝑁)) ≤ (2 · 𝑁))
162	35, 161	eqbrtrid 5139	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝐾 ≤ (2 · 𝑁))
163		ppiwordi 27498	. . . . 5 ⊢ ((𝐾 ∈ ℝ ∧ (2 · 𝑁) ∈ ℝ ∧ 𝐾 ≤ (2 · 𝑁)) → (π‘𝐾) ≤ (π‘(2 · 𝑁)))
164	38, 21, 162, 163	syl3anc 1398	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → (π‘𝐾) ≤ (π‘(2 · 𝑁)))
165		1red 11316	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 1 ∈ ℝ)
166		2re 12424	. . . . . . . 8 ⊢ 2 ∈ ℝ
167	166	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 2 ∈ ℝ)
168		1lt2 12522	. . . . . . . 8 ⊢ 1 < 2
169	168	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 1 < 2)
170		2t1e2 12512	. . . . . . . 8 ⊢ (2 · 1) = 2
171	3	nnge1d 12393	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ≥‘4) → 1 ≤ 𝑁)
172		eluzelre 12983	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ≥‘4) → 𝑁 ∈ ℝ)
173		2pos 12454	. . . . . . . . . . . 12 ⊢ 0 < 2
174	166, 173	pm3.2i 476	. . . . . . . . . . 11 ⊢ (2 ∈ ℝ ∧ 0 < 2)
175	174	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 ∈ ℝ ∧ 0 < 2))
176		lemul2 12177	. . . . . . . . . 10 ⊢ ((1 ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → (1 ≤ 𝑁 ↔ (2 · 1) ≤ (2 · 𝑁)))
177	165, 172, 175, 176	syl3anc 1398	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ≥‘4) → (1 ≤ 𝑁 ↔ (2 · 1) ≤ (2 · 𝑁)))
178	171, 177	mpbid 235	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ≥‘4) → (2 · 1) ≤ (2 · 𝑁))
179	170, 178	eqbrtrrid 5140	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ≥‘4) → 2 ≤ (2 · 𝑁))
180	165, 167, 21, 169, 179	ltletrd 11477	. . . . . 6 ⊢ (𝑁 ∈ (ℤ≥‘4) → 1 < (2 · 𝑁))
181	21, 180	rplogcld 26966	. . . . 5 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘(2 · 𝑁)) ∈ ℝ+)
182	41, 24, 181	lemul1d 13214	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((π‘𝐾) ≤ (π‘(2 · 𝑁)) ↔ ((π‘𝐾) · (log‘(2 · 𝑁))) ≤ ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁)))))
183	164, 182	mpbid 235	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘4) → ((π‘𝐾) · (log‘(2 · 𝑁))) ≤ ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁))))
184	16, 42, 30, 159, 183	letrd 11474	. 2 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((2 · 𝑁)C𝑁)) ≤ ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁))))
185	10, 16, 30, 34, 184	ltletrd 11477	1 ⊢ (𝑁 ∈ (ℤ≥‘4) → (log‘((4↑𝑁) / 𝑁)) < ((π‘(2 · 𝑁)) · (log‘(2 · 𝑁))))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   = wceq 1569   ∈ wcel 2144   ⊆ wss 3896   ∖ cdif 4044   ∩ cin 4088  ifcif 4481   class class class wbr 5102  ‘cfv 6543  (class class class)co 7424  Fincfn 8981  ℂcc 11205  ℝcr 11206  0cc0 11207  1c1 11208   · cmul 11212   < clt 11350   ≤ cle 11351   / cdiv 11980  ℕcn 12342  2c2 12404  4c4 12406  ℕ₀cn0 12613  ℤcz 12700  ℤ_≥cuz 12972  ℝ⁺crp 13127  ...cfz 13646  ↑cexp 14211  Ccbc 14453  ♯chash 14481  Σcsu 15862  expce 16236  ℙcprime 16855   pCnt cpc 17023  logclog 26891  πcppi 27430

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5327  ax-pr 5391  ax-un 7755  ax-inf2 9649  ax-cnex 11263  ax-resscn 11264  ax-1cn 11265  ax-icn 11266  ax-addcl 11267  ax-addrcl 11268  ax-mulcl 11269  ax-mulrcl 11270  ax-mulcom 11271  ax-addass 11272  ax-mulass 11273  ax-distr 11274  ax-i2m1 11275  ax-1ne0 11276  ax-1rid 11277  ax-rnegex 11278  ax-rrecex 11279  ax-cnre 11280  ax-pre-lttri 11281  ax-pre-lttrn 11282  ax-pre-ltadd 11283  ax-pre-mulgt0 11284  ax-pre-sup 11285  ax-addf 11286

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4835  df-uni 4867  df-int 4907  df-iun 4952  df-iin 4953  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6307  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6497  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7381  df-ov 7427  df-oprab 7428  df-mpo 7429  df-of 7697  df-om 7882  df-1st 8005  df-2nd 8006  df-supp 8185  df-frecs 8307  df-wrecs 8338  df-recs 8387  df-rdg 8426  df-1o 8484  df-2o 8485  df-oadd 8488  df-er 8725  df-map 8857  df-pm 8858  df-ixp 8934  df-en 8982  df-dom 8983  df-sdom 8984  df-fin 8985  df-fsupp 9362  df-fi 9410  df-sup 9441  df-inf 9442  df-oi 9511  df-card 10027  df-pnf 11352  df-mnf 11353  df-xr 11354  df-ltxr 11355  df-le 11356  df-sub 11550  df-neg 11551  df-div 11981  df-nn 12343  df-2 12412  df-3 12413  df-4 12414  df-5 12415  df-6 12416  df-7 12417  df-8 12418  df-9 12419  df-n0 12614  df-xnn0 12687  df-z 12701  df-dec 12822  df-uz 12973  df-q 13083  df-rp 13128  df-xneg 13248  df-xadd 13249  df-xmul 13250  df-ioo 13487  df-ioc 13488  df-ico 13489  df-icc 13490  df-fz 13647  df-fzo 13796  df-fl 13939  df-mod 14017  df-seq 14152  df-exp 14212  df-fac 14425  df-bc 14454  df-hash 14482  df-shft 15229  df-cj 15275  df-re 15276  df-im 15277  df-sqrt 15411  df-abs 15412  df-limsup 15647  df-clim 15664  df-rlim 15665  df-sum 15863  df-ef 16242  df-sin 16244  df-cos 16245  df-pi 16247  df-dvds 16432  df-gcd 16674  df-prm 16856  df-pc 17024  df-struct 17334  df-sets 17351  df-slot 17369  df-ndx 17381  df-base 17397  df-ress 17418  df-plusg 17450  df-mulr 17451  df-starv 17452  df-sca 17453  df-vsca 17454  df-ip 17455  df-tset 17456  df-ple 17457  df-ds 17459  df-unif 17460  df-hom 17461  df-cco 17462  df-rest 17602  df-topn 17603  df-0g 17621  df-gsum 17622  df-topgen 17623  df-pt 17624  df-prds 17627  df-xrs 17683  df-qtop 17688  df-imas 17689  df-xps 17691  df-mre 17765  df-mrc 17766  df-acs 17768  df-mgm 18825  df-sgrp 18917  df-mnd 18933  df-submnd 18988  df-mulg 19287  df-cntz 19540  df-cmn 20005  df-psmet 21679  df-xmet 21680  df-met 21681  df-bl 21682  df-mopn 21683  df-fbas 21684  df-fg 21685  df-cnfld 21688  df-top 23221  df-topon 23238  df-topsp 23260  df-bases 23273  df-cld 23346  df-ntr 23347  df-cls 23348  df-nei 23425  df-lp 23463  df-perf 23464  df-cn 23554  df-cnp 23555  df-haus 23642  df-tx 23890  df-hmeo 24083  df-fil 24174  df-fm 24266  df-flim 24267  df-flf 24268  df-xms 24648  df-ms 24649  df-tms 24650  df-cncf 25208  df-limc 26195  df-dv 26196  df-log 26893  df-ppi 27436

This theorem is used by:  chebbnd1lem3  27807