bposlem2 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > bposlem2		Structured version Visualization version GIF version

Theorem bposlem2 27612

Description: There are no odd primes in the range (2𝑁 / 3, 𝑁] dividing the 𝑁-th central binomial coefficient. (Contributed by Mario Carneiro, 12-Mar-2014.)

**Hypotheses**
Ref	Expression
bposlem2.1	⊢ (𝜑 → 𝑁 ∈ ℕ)
bposlem2.2	⊢ (𝜑 → 𝑃 ∈ ℙ)
bposlem2.3	⊢ (𝜑 → 2 < 𝑃)
bposlem2.4	⊢ (𝜑 → ((2 · 𝑁) / 3) < 𝑃)
bposlem2.5	⊢ (𝜑 → 𝑃 ≤ 𝑁)

**Assertion**
Ref	Expression
bposlem2	⊢ (𝜑 → (𝑃 pCnt ((2 · 𝑁)C𝑁)) = 0)

Proof of Theorem bposlem2 Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		bposlem2.1	. . 3 ⊢ (𝜑 → 𝑁 ∈ ℕ)
2		bposlem2.2	. . 3 ⊢ (𝜑 → 𝑃 ∈ ℙ)
3		pcbcctr 27603	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝑃 ∈ ℙ) → (𝑃 pCnt ((2 · 𝑁)C𝑁)) = Σ𝑘 ∈ (1...(2 · 𝑁))((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) − (2 · (⌊‘(𝑁 / (𝑃↑𝑘))))))
4	1, 2, 3	syl2anc 596	. 2 ⊢ (𝜑 → (𝑃 pCnt ((2 · 𝑁)C𝑁)) = Σ𝑘 ∈ (1...(2 · 𝑁))((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) − (2 · (⌊‘(𝑁 / (𝑃↑𝑘))))))
5		elfznn 13687	. . . . . 6 ⊢ (𝑘 ∈ (1...(2 · 𝑁)) → 𝑘 ∈ ℕ)
6		elnn1uz2 13052	. . . . . 6 ⊢ (𝑘 ∈ ℕ ↔ (𝑘 = 1 ∨ 𝑘 ∈ (ℤ_≥‘2)))
7	5, 6	sylib 221	. . . . 5 ⊢ (𝑘 ∈ (1...(2 · 𝑁)) → (𝑘 = 1 ∨ 𝑘 ∈ (ℤ_≥‘2)))
8		oveq2 7428	. . . . . . . . . . . 12 ⊢ (𝑘 = 1 → (𝑃↑𝑘) = (𝑃↑1))
9		prmnn 16849	. . . . . . . . . . . . . . 15 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
10	2, 9	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑃 ∈ ℕ)
11	10	nncnd 12351	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑃 ∈ ℂ)
12	11	exp1d 14284	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑃↑1) = 𝑃)
13	8, 12	sylan9eqr 2818	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 = 1) → (𝑃↑𝑘) = 𝑃)
14	13	oveq2d 7436	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 = 1) → ((2 · 𝑁) / (𝑃↑𝑘)) = ((2 · 𝑁) / 𝑃))
15	14	fveq2d 6889	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 = 1) → (⌊‘((2 · 𝑁) / (𝑃↑𝑘))) = (⌊‘((2 · 𝑁) / 𝑃)))
16		2t1e2 12505	. . . . . . . . . . . . 13 ⊢ (2 · 1) = 2
17	11	mullidd 11327	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (1 · 𝑃) = 𝑃)
18		bposlem2.5	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑃 ≤ 𝑁)
19	17, 18	eqbrtrd 5127	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (1 · 𝑃) ≤ 𝑁)
20		1red 11309	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 1 ∈ ℝ)
21	1	nnred 12350	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ ℝ)
22	10	nnred 12350	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑃 ∈ ℝ)
23	10	nngt0d 12387	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 0 < 𝑃)
24		lemuldiv 12197	. . . . . . . . . . . . . . . 16 ⊢ ((1 ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ (𝑃 ∈ ℝ ∧ 0 < 𝑃)) → ((1 · 𝑃) ≤ 𝑁 ↔ 1 ≤ (𝑁 / 𝑃)))
25	20, 21, 22, 23, 24	syl112anc 1401	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((1 · 𝑃) ≤ 𝑁 ↔ 1 ≤ (𝑁 / 𝑃)))
26	19, 25	mpbid 235	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ≤ (𝑁 / 𝑃))
27	21, 10	nndivred 12392	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑁 / 𝑃) ∈ ℝ)
28		1re 11308	. . . . . . . . . . . . . . . 16 ⊢ 1 ∈ ℝ
29		2re 12417	. . . . . . . . . . . . . . . . 17 ⊢ 2 ∈ ℝ
30		2pos 12447	. . . . . . . . . . . . . . . . 17 ⊢ 0 < 2
31	29, 30	pm3.2i 476	. . . . . . . . . . . . . . . 16 ⊢ (2 ∈ ℝ ∧ 0 < 2)
32		lemul2 12170	. . . . . . . . . . . . . . . 16 ⊢ ((1 ∈ ℝ ∧ (𝑁 / 𝑃) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → (1 ≤ (𝑁 / 𝑃) ↔ (2 · 1) ≤ (2 · (𝑁 / 𝑃))))
33	28, 31, 32	mp3an13 1481	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 / 𝑃) ∈ ℝ → (1 ≤ (𝑁 / 𝑃) ↔ (2 · 1) ≤ (2 · (𝑁 / 𝑃))))
34	27, 33	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 ≤ (𝑁 / 𝑃) ↔ (2 · 1) ≤ (2 · (𝑁 / 𝑃))))
35	26, 34	mpbid 235	. . . . . . . . . . . . 13 ⊢ (𝜑 → (2 · 1) ≤ (2 · (𝑁 / 𝑃)))
36	16, 35	eqbrtrrid 5141	. . . . . . . . . . . 12 ⊢ (𝜑 → 2 ≤ (2 · (𝑁 / 𝑃)))
37		2cnd 12421	. . . . . . . . . . . . 13 ⊢ (𝜑 → 2 ∈ ℂ)
38	1	nncnd 12351	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑁 ∈ ℂ)
39	10	nnne0d 12388	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑃 ≠ 0)
40	37, 38, 11, 39	divassd 12128	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · 𝑁) / 𝑃) = (2 · (𝑁 / 𝑃)))
41	36, 40	breqtrrd 5133	. . . . . . . . . . 11 ⊢ (𝜑 → 2 ≤ ((2 · 𝑁) / 𝑃))
42		bposlem2.4	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2 · 𝑁) / 3) < 𝑃)
43		2nn 12416	. . . . . . . . . . . . . . . 16 ⊢ 2 ∈ ℕ
44		nnmulcl 12359	. . . . . . . . . . . . . . . 16 ⊢ ((2 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 · 𝑁) ∈ ℕ)
45	43, 1, 44	sylancr 599	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2 · 𝑁) ∈ ℕ)
46	45	nnred 12350	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (2 · 𝑁) ∈ ℝ)
47		3re 12423	. . . . . . . . . . . . . . . 16 ⊢ 3 ∈ ℝ
48		3pos 12451	. . . . . . . . . . . . . . . 16 ⊢ 0 < 3
49	47, 48	pm3.2i 476	. . . . . . . . . . . . . . 15 ⊢ (3 ∈ ℝ ∧ 0 < 3)
50		ltdiv23 12208	. . . . . . . . . . . . . . 15 ⊢ (((2 · 𝑁) ∈ ℝ ∧ (3 ∈ ℝ ∧ 0 < 3) ∧ (𝑃 ∈ ℝ ∧ 0 < 𝑃)) → (((2 · 𝑁) / 3) < 𝑃 ↔ ((2 · 𝑁) / 𝑃) < 3))
51	49, 50	mp3an2 1478	. . . . . . . . . . . . . 14 ⊢ (((2 · 𝑁) ∈ ℝ ∧ (𝑃 ∈ ℝ ∧ 0 < 𝑃)) → (((2 · 𝑁) / 3) < 𝑃 ↔ ((2 · 𝑁) / 𝑃) < 3))
52	46, 22, 23, 51	syl12anc 850	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((2 · 𝑁) / 3) < 𝑃 ↔ ((2 · 𝑁) / 𝑃) < 3))
53	42, 52	mpbid 235	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · 𝑁) / 𝑃) < 3)
54		df-3 12406	. . . . . . . . . . . 12 ⊢ 3 = (2 + 1)
55	53, 54	breqtrdi 5146	. . . . . . . . . . 11 ⊢ (𝜑 → ((2 · 𝑁) / 𝑃) < (2 + 1))
56	46, 10	nndivred 12392	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · 𝑁) / 𝑃) ∈ ℝ)
57		2z 12728	. . . . . . . . . . . 12 ⊢ 2 ∈ ℤ
58		flbi 13956	. . . . . . . . . . . 12 ⊢ ((((2 · 𝑁) / 𝑃) ∈ ℝ ∧ 2 ∈ ℤ) → ((⌊‘((2 · 𝑁) / 𝑃)) = 2 ↔ (2 ≤ ((2 · 𝑁) / 𝑃) ∧ ((2 · 𝑁) / 𝑃) < (2 + 1))))
59	56, 57, 58	sylancl 598	. . . . . . . . . . 11 ⊢ (𝜑 → ((⌊‘((2 · 𝑁) / 𝑃)) = 2 ↔ (2 ≤ ((2 · 𝑁) / 𝑃) ∧ ((2 · 𝑁) / 𝑃) < (2 + 1))))
60	41, 55, 59	mpbir2and 726	. . . . . . . . . 10 ⊢ (𝜑 → (⌊‘((2 · 𝑁) / 𝑃)) = 2)
61	60	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 = 1) → (⌊‘((2 · 𝑁) / 𝑃)) = 2)
62	15, 61	eqtrd 2796	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 = 1) → (⌊‘((2 · 𝑁) / (𝑃↑𝑘))) = 2)
63	13	oveq2d 7436	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 = 1) → (𝑁 / (𝑃↑𝑘)) = (𝑁 / 𝑃))
64	63	fveq2d 6889	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 = 1) → (⌊‘(𝑁 / (𝑃↑𝑘))) = (⌊‘(𝑁 / 𝑃)))
65		remulcl 11285	. . . . . . . . . . . . . . . . . 18 ⊢ ((2 ∈ ℝ ∧ (𝑁 / 𝑃) ∈ ℝ) → (2 · (𝑁 / 𝑃)) ∈ ℝ)
66	29, 27, 65	sylancr 599	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2 · (𝑁 / 𝑃)) ∈ ℝ)
67	47	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 3 ∈ ℝ)
68		4re 12427	. . . . . . . . . . . . . . . . . 18 ⊢ 4 ∈ ℝ
69	68	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 4 ∈ ℝ)
70	40, 53	eqbrtrrd 5129	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2 · (𝑁 / 𝑃)) < 3)
71		3lt4 12519	. . . . . . . . . . . . . . . . . 18 ⊢ 3 < 4
72	71	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 3 < 4)
73	66, 67, 69, 70, 72	lttrd 11471	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2 · (𝑁 / 𝑃)) < 4)
74		2t2e4 12506	. . . . . . . . . . . . . . . 16 ⊢ (2 · 2) = 4
75	73, 74	breqtrrdi 5147	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2 · (𝑁 / 𝑃)) < (2 · 2))
76		ltmul2 12168	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁 / 𝑃) ∈ ℝ ∧ 2 ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((𝑁 / 𝑃) < 2 ↔ (2 · (𝑁 / 𝑃)) < (2 · 2)))
77	29, 31, 76	mp3an23 1482	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 / 𝑃) ∈ ℝ → ((𝑁 / 𝑃) < 2 ↔ (2 · (𝑁 / 𝑃)) < (2 · 2)))
78	27, 77	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝑁 / 𝑃) < 2 ↔ (2 · (𝑁 / 𝑃)) < (2 · 2)))
79	75, 78	mpbird 260	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑁 / 𝑃) < 2)
80		df-2 12405	. . . . . . . . . . . . . 14 ⊢ 2 = (1 + 1)
81	79, 80	breqtrdi 5146	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 / 𝑃) < (1 + 1))
82		1z 12726	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℤ
83		flbi 13956	. . . . . . . . . . . . . 14 ⊢ (((𝑁 / 𝑃) ∈ ℝ ∧ 1 ∈ ℤ) → ((⌊‘(𝑁 / 𝑃)) = 1 ↔ (1 ≤ (𝑁 / 𝑃) ∧ (𝑁 / 𝑃) < (1 + 1))))
84	27, 82, 83	sylancl 598	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((⌊‘(𝑁 / 𝑃)) = 1 ↔ (1 ≤ (𝑁 / 𝑃) ∧ (𝑁 / 𝑃) < (1 + 1))))
85	26, 81, 84	mpbir2and 726	. . . . . . . . . . . 12 ⊢ (𝜑 → (⌊‘(𝑁 / 𝑃)) = 1)
86	85	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 = 1) → (⌊‘(𝑁 / 𝑃)) = 1)
87	64, 86	eqtrd 2796	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 = 1) → (⌊‘(𝑁 / (𝑃↑𝑘))) = 1)
88	87	oveq2d 7436	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 = 1) → (2 · (⌊‘(𝑁 / (𝑃↑𝑘)))) = (2 · 1))
89	88, 16	eqtrdi 2812	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 = 1) → (2 · (⌊‘(𝑁 / (𝑃↑𝑘)))) = 2)
90	62, 89	oveq12d 7438	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 = 1) → ((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) − (2 · (⌊‘(𝑁 / (𝑃↑𝑘))))) = (2 − 2))
91		2cn 12418	. . . . . . . 8 ⊢ 2 ∈ ℂ
92	91	subidi 11629	. . . . . . 7 ⊢ (2 − 2) = 0
93	90, 92	eqtrdi 2812	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 = 1) → ((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) − (2 · (⌊‘(𝑁 / (𝑃↑𝑘))))) = 0)
94	45	nnrpd 13162	. . . . . . . . . . . 12 ⊢ (𝜑 → (2 · 𝑁) ∈ ℝ⁺)
95	94	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (2 · 𝑁) ∈ ℝ⁺)
96		eluzge2nn0 13019	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ (ℤ_≥‘2) → 𝑘 ∈ ℕ₀)
97		nnexpcl 14217	. . . . . . . . . . . . 13 ⊢ ((𝑃 ∈ ℕ ∧ 𝑘 ∈ ℕ₀) → (𝑃↑𝑘) ∈ ℕ)
98	10, 96, 97	syl2an 608	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑃↑𝑘) ∈ ℕ)
99	98	nnrpd 13162	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑃↑𝑘) ∈ ℝ⁺)
100	95, 99	rpdivcld 13181	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → ((2 · 𝑁) / (𝑃↑𝑘)) ∈ ℝ⁺)
101	100	rpge0d 13168	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 0 ≤ ((2 · 𝑁) / (𝑃↑𝑘)))
102	46	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (2 · 𝑁) ∈ ℝ)
103		remulcl 11285	. . . . . . . . . . . . . . 15 ⊢ ((3 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (3 · 𝑃) ∈ ℝ)
104	47, 22, 103	sylancr 599	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (3 · 𝑃) ∈ ℝ)
105	104	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (3 · 𝑃) ∈ ℝ)
106	98	nnred 12350	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑃↑𝑘) ∈ ℝ)
107		ltdivmul 12192	. . . . . . . . . . . . . . . . 17 ⊢ (((2 · 𝑁) ∈ ℝ ∧ 𝑃 ∈ ℝ ∧ (3 ∈ ℝ ∧ 0 < 3)) → (((2 · 𝑁) / 3) < 𝑃 ↔ (2 · 𝑁) < (3 · 𝑃)))
108	49, 107	mp3an3 1479	. . . . . . . . . . . . . . . 16 ⊢ (((2 · 𝑁) ∈ ℝ ∧ 𝑃 ∈ ℝ) → (((2 · 𝑁) / 3) < 𝑃 ↔ (2 · 𝑁) < (3 · 𝑃)))
109	46, 22, 108	syl2anc 596	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (((2 · 𝑁) / 3) < 𝑃 ↔ (2 · 𝑁) < (3 · 𝑃)))
110	42, 109	mpbid 235	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (2 · 𝑁) < (3 · 𝑃))
111	110	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (2 · 𝑁) < (3 · 𝑃))
112	22, 22	remulcld 11339	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑃 · 𝑃) ∈ ℝ)
113	112	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑃 · 𝑃) ∈ ℝ)
114		bposlem2.3	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 2 < 𝑃)
115		nnltp1le 12755	. . . . . . . . . . . . . . . . . . 19 ⊢ ((2 ∈ ℕ ∧ 𝑃 ∈ ℕ) → (2 < 𝑃 ↔ (2 + 1) ≤ 𝑃))
116	43, 10, 115	sylancr 599	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (2 < 𝑃 ↔ (2 + 1) ≤ 𝑃))
117	114, 116	mpbid 235	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2 + 1) ≤ 𝑃)
118	54, 117	eqbrtrid 5140	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 3 ≤ 𝑃)
119		lemul1 12169	. . . . . . . . . . . . . . . . . 18 ⊢ ((3 ∈ ℝ ∧ 𝑃 ∈ ℝ ∧ (𝑃 ∈ ℝ ∧ 0 < 𝑃)) → (3 ≤ 𝑃 ↔ (3 · 𝑃) ≤ (𝑃 · 𝑃)))
120	47, 119	mp3an1 1477	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑃 ∈ ℝ ∧ (𝑃 ∈ ℝ ∧ 0 < 𝑃)) → (3 ≤ 𝑃 ↔ (3 · 𝑃) ≤ (𝑃 · 𝑃)))
121	22, 22, 23, 120	syl12anc 850	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (3 ≤ 𝑃 ↔ (3 · 𝑃) ≤ (𝑃 · 𝑃)))
122	118, 121	mpbid 235	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (3 · 𝑃) ≤ (𝑃 · 𝑃))
123	122	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (3 · 𝑃) ≤ (𝑃 · 𝑃))
124	11	sqvald 14286	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑃↑2) = (𝑃 · 𝑃))
125	124	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑃↑2) = (𝑃 · 𝑃))
126	22	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 𝑃 ∈ ℝ)
127	10	nnge1d 12386	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 1 ≤ 𝑃)
128	127	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 1 ≤ 𝑃)
129		simpr 490	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 𝑘 ∈ (ℤ_≥‘2))
130	126, 128, 129	leexp2ad 14398	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑃↑2) ≤ (𝑃↑𝑘))
131	125, 130	eqbrtrrd 5129	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑃 · 𝑃) ≤ (𝑃↑𝑘))
132	105, 113, 106, 123, 131	letrd 11467	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (3 · 𝑃) ≤ (𝑃↑𝑘))
133	102, 105, 106, 111, 132	ltletrd 11470	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (2 · 𝑁) < (𝑃↑𝑘))
134	98	nncnd 12351	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑃↑𝑘) ∈ ℂ)
135	134	mulridd 11326	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → ((𝑃↑𝑘) · 1) = (𝑃↑𝑘))
136	133, 135	breqtrrd 5133	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (2 · 𝑁) < ((𝑃↑𝑘) · 1))
137		1red 11309	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 1 ∈ ℝ)
138	102, 137, 99	ltdivmuld 13215	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (((2 · 𝑁) / (𝑃↑𝑘)) < 1 ↔ (2 · 𝑁) < ((𝑃↑𝑘) · 1)))
139	136, 138	mpbird 260	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → ((2 · 𝑁) / (𝑃↑𝑘)) < 1)
140		1e0p1 12861	. . . . . . . . . 10 ⊢ 1 = (0 + 1)
141	139, 140	breqtrdi 5146	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → ((2 · 𝑁) / (𝑃↑𝑘)) < (0 + 1))
142	100	rpred 13164	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → ((2 · 𝑁) / (𝑃↑𝑘)) ∈ ℝ)
143		0z 12704	. . . . . . . . . 10 ⊢ 0 ∈ ℤ
144		flbi 13956	. . . . . . . . . 10 ⊢ ((((2 · 𝑁) / (𝑃↑𝑘)) ∈ ℝ ∧ 0 ∈ ℤ) → ((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) = 0 ↔ (0 ≤ ((2 · 𝑁) / (𝑃↑𝑘)) ∧ ((2 · 𝑁) / (𝑃↑𝑘)) < (0 + 1))))
145	142, 143, 144	sylancl 598	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → ((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) = 0 ↔ (0 ≤ ((2 · 𝑁) / (𝑃↑𝑘)) ∧ ((2 · 𝑁) / (𝑃↑𝑘)) < (0 + 1))))
146	101, 141, 145	mpbir2and 726	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (⌊‘((2 · 𝑁) / (𝑃↑𝑘))) = 0)
147	1	nnrpd 13162	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑁 ∈ ℝ⁺)
148	147	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 𝑁 ∈ ℝ⁺)
149	148, 99	rpdivcld 13181	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑁 / (𝑃↑𝑘)) ∈ ℝ⁺)
150	149	rpge0d 13168	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 0 ≤ (𝑁 / (𝑃↑𝑘)))
151	21	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 𝑁 ∈ ℝ)
152	21, 147	ltaddrpd 13197	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑁 < (𝑁 + 𝑁))
153	38	2timesd 12589	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2 · 𝑁) = (𝑁 + 𝑁))
154	152, 153	breqtrrd 5133	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 < (2 · 𝑁))
155	154	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 𝑁 < (2 · 𝑁))
156	151, 102, 106, 155, 133	lttrd 11471	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 𝑁 < (𝑃↑𝑘))
157	156, 135	breqtrrd 5133	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → 𝑁 < ((𝑃↑𝑘) · 1))
158	151, 137, 99	ltdivmuld 13215	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → ((𝑁 / (𝑃↑𝑘)) < 1 ↔ 𝑁 < ((𝑃↑𝑘) · 1)))
159	157, 158	mpbird 260	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑁 / (𝑃↑𝑘)) < 1)
160	159, 140	breqtrdi 5146	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑁 / (𝑃↑𝑘)) < (0 + 1))
161	149	rpred 13164	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (𝑁 / (𝑃↑𝑘)) ∈ ℝ)
162		flbi 13956	. . . . . . . . . . . 12 ⊢ (((𝑁 / (𝑃↑𝑘)) ∈ ℝ ∧ 0 ∈ ℤ) → ((⌊‘(𝑁 / (𝑃↑𝑘))) = 0 ↔ (0 ≤ (𝑁 / (𝑃↑𝑘)) ∧ (𝑁 / (𝑃↑𝑘)) < (0 + 1))))
163	161, 143, 162	sylancl 598	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → ((⌊‘(𝑁 / (𝑃↑𝑘))) = 0 ↔ (0 ≤ (𝑁 / (𝑃↑𝑘)) ∧ (𝑁 / (𝑃↑𝑘)) < (0 + 1))))
164	150, 160, 163	mpbir2and 726	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (⌊‘(𝑁 / (𝑃↑𝑘))) = 0)
165	164	oveq2d 7436	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (2 · (⌊‘(𝑁 / (𝑃↑𝑘)))) = (2 · 0))
166		2t0e0 12513	. . . . . . . . 9 ⊢ (2 · 0) = 0
167	165, 166	eqtrdi 2812	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → (2 · (⌊‘(𝑁 / (𝑃↑𝑘)))) = 0)
168	146, 167	oveq12d 7438	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → ((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) − (2 · (⌊‘(𝑁 / (𝑃↑𝑘))))) = (0 − 0))
169		0m0e0 12461	. . . . . . 7 ⊢ (0 − 0) = 0
170	168, 169	eqtrdi 2812	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ_≥‘2)) → ((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) − (2 · (⌊‘(𝑁 / (𝑃↑𝑘))))) = 0)
171	93, 170	jaodan 972	. . . . 5 ⊢ ((𝜑 ∧ (𝑘 = 1 ∨ 𝑘 ∈ (ℤ_≥‘2))) → ((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) − (2 · (⌊‘(𝑁 / (𝑃↑𝑘))))) = 0)
172	7, 171	sylan2 605	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(2 · 𝑁))) → ((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) − (2 · (⌊‘(𝑁 / (𝑃↑𝑘))))) = 0)
173	172	sumeq2dv 15869	. . 3 ⊢ (𝜑 → Σ𝑘 ∈ (1...(2 · 𝑁))((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) − (2 · (⌊‘(𝑁 / (𝑃↑𝑘))))) = Σ𝑘 ∈ (1...(2 · 𝑁))0)
174		fzfid 14116	. . . 4 ⊢ (𝜑 → (1...(2 · 𝑁)) ∈ Fin)
175		sumz 15888	. . . . 5 ⊢ (((1...(2 · 𝑁)) ⊆ (ℤ_≥‘1) ∨ (1...(2 · 𝑁)) ∈ Fin) → Σ𝑘 ∈ (1...(2 · 𝑁))0 = 0)
176	175	olcs 890	. . . 4 ⊢ ((1...(2 · 𝑁)) ∈ Fin → Σ𝑘 ∈ (1...(2 · 𝑁))0 = 0)
177	174, 176	syl 18	. . 3 ⊢ (𝜑 → Σ𝑘 ∈ (1...(2 · 𝑁))0 = 0)
178	173, 177	eqtrd 2796	. 2 ⊢ (𝜑 → Σ𝑘 ∈ (1...(2 · 𝑁))((⌊‘((2 · 𝑁) / (𝑃↑𝑘))) − (2 · (⌊‘(𝑁 / (𝑃↑𝑘))))) = 0)
179	4, 178	eqtrd 2796	1 ⊢ (𝜑 → (𝑃 pCnt ((2 · 𝑁)C𝑁)) = 0)

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∨ wo 861 = wceq 1570 ∈ wcel 2145 ⊆ wss 3899 class class class wbr 5103 ‘cfv 6538 (class class class)co 7420 Fincfn 8973 ℝcr 11199 0cc0 11200 1c1 11201 + caddc 11203 · cmul 11205 < clt 11343 ≤ cle 11344 − cmin 11541 / cdiv 11973 ℕcn 12335 2c2 12397 3c3 12398 4c4 12399 ℕ₀cn0 12606 ℤcz 12693 ℤ_≥cuz 12965 ℝ⁺crp 13120 ...cfz 13639 ⌊cfl 13930 ↑cexp 14204 Ccbc 14446 Σcsu 15853 ℙcprime 16846 pCnt cpc 17014

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2733 ax-rep 5232 ax-sep 5249 ax-nul 5260 ax-pow 5327 ax-pr 5391 ax-un 7751 ax-inf2 9642 ax-cnex 11256 ax-resscn 11257 ax-1cn 11258 ax-icn 11259 ax-addcl 11260 ax-addrcl 11261 ax-mulcl 11262 ax-mulrcl 11263 ax-mulcom 11264 ax-addass 11265 ax-mulass 11266 ax-distr 11267 ax-i2m1 11268 ax-1ne0 11269 ax-1rid 11270 ax-rnegex 11271 ax-rrecex 11272 ax-cnre 11273 ax-pre-lttri 11274 ax-pre-lttrn 11275 ax-pre-ltadd 11276 ax-pre-mulgt0 11277 ax-pre-sup 11278

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3063 df-ral 3078 df-rex 3088 df-rmo 3366 df-reu 3367 df-rab 3414 df-v 3453 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 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 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6540 df-fn 6541 df-f 6542 df-f1 6543 df-fo 6544 df-f1o 6545 df-fv 6546 df-isom 6547 df-riota 7377 df-ov 7423 df-oprab 7424 df-mpo 7425 df-om 7878 df-1st 8001 df-2nd 8002 df-frecs 8299 df-wrecs 8330 df-recs 8379 df-rdg 8418 df-1o 8476 df-2o 8477 df-er 8717 df-en 8974 df-dom 8975 df-sdom 8976 df-fin 8977 df-sup 9434 df-inf 9435 df-oi 9504 df-card 10020 df-pnf 11345 df-mnf 11346 df-xr 11347 df-ltxr 11348 df-le 11349 df-sub 11543 df-neg 11544 df-div 11974 df-nn 12336 df-2 12405 df-3 12406 df-4 12407 df-n0 12607 df-z 12694 df-uz 12966 df-q 13076 df-rp 13121 df-fz 13640 df-fzo 13789 df-fl 13932 df-mod 14010 df-seq 14145 df-exp 14205 df-fac 14418 df-bc 14447 df-hash 14475 df-cj 15266 df-re 15267 df-im 15268 df-sqrt 15402 df-abs 15403 df-clim 15655 df-sum 15854 df-dvds 16423 df-gcd 16665 df-prm 16847 df-pc 17015

This theorem is used by: bposlem3 27613

W3C validator