chtublem - Metamath Proof Explorer

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

Theorem chtublem 24736

Description: Lemma for chtub 24737. (Contributed by Mario Carneiro, 13-Mar-2014.)

**Assertion**
Ref	Expression
chtublem	⊢ (𝑁 ∈ ℕ → (θ‘((2 · 𝑁) − 1)) ≤ ((θ‘𝑁) + ((log‘4) · (𝑁 − 1))))

Proof of Theorem chtublem Dummy variables 𝑘 𝑛 𝑝 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		2nn 11062	. . . . . 6 ⊢ 2 ∈ ℕ
2		nnmulcl 10920	. . . . . 6 ⊢ ((2 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 · 𝑁) ∈ ℕ)
3	1, 2	mpan 702	. . . . 5 ⊢ (𝑁 ∈ ℕ → (2 · 𝑁) ∈ ℕ)
4	3	nnred 10912	. . . 4 ⊢ (𝑁 ∈ ℕ → (2 · 𝑁) ∈ ℝ)
5		peano2rem 10227	. . . 4 ⊢ ((2 · 𝑁) ∈ ℝ → ((2 · 𝑁) − 1) ∈ ℝ)
6	4, 5	syl 17	. . 3 ⊢ (𝑁 ∈ ℕ → ((2 · 𝑁) − 1) ∈ ℝ)
7		chtcl 24635	. . 3 ⊢ (((2 · 𝑁) − 1) ∈ ℝ → (θ‘((2 · 𝑁) − 1)) ∈ ℝ)
8	6, 7	syl 17	. 2 ⊢ (𝑁 ∈ ℕ → (θ‘((2 · 𝑁) − 1)) ∈ ℝ)
9		nnre 10904	. . . 4 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℝ)
10		chtcl 24635	. . . 4 ⊢ (𝑁 ∈ ℝ → (θ‘𝑁) ∈ ℝ)
11	9, 10	syl 17	. . 3 ⊢ (𝑁 ∈ ℕ → (θ‘𝑁) ∈ ℝ)
12		nnnn0 11176	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℕ₀)
13		2m1e1 11012	. . . . . . . . . . 11 ⊢ (2 − 1) = 1
14	13	oveq2i 6560	. . . . . . . . . 10 ⊢ ((2 · 𝑁) − (2 − 1)) = ((2 · 𝑁) − 1)
15	3	nncnd 10913	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (2 · 𝑁) ∈ ℂ)
16		2cn 10968	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℂ
17		ax-1cn 9873	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℂ
18		subsub 10190	. . . . . . . . . . . . 13 ⊢ (((2 · 𝑁) ∈ ℂ ∧ 2 ∈ ℂ ∧ 1 ∈ ℂ) → ((2 · 𝑁) − (2 − 1)) = (((2 · 𝑁) − 2) + 1))
19	16, 17, 18	mp3an23 1408	. . . . . . . . . . . 12 ⊢ ((2 · 𝑁) ∈ ℂ → ((2 · 𝑁) − (2 − 1)) = (((2 · 𝑁) − 2) + 1))
20	15, 19	syl 17	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → ((2 · 𝑁) − (2 − 1)) = (((2 · 𝑁) − 2) + 1))
21		nncn 10905	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℂ)
22		subdi 10342	. . . . . . . . . . . . . . 15 ⊢ ((2 ∈ ℂ ∧ 𝑁 ∈ ℂ ∧ 1 ∈ ℂ) → (2 · (𝑁 − 1)) = ((2 · 𝑁) − (2 · 1)))
23	16, 17, 22	mp3an13 1407	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ ℂ → (2 · (𝑁 − 1)) = ((2 · 𝑁) − (2 · 1)))
24	21, 23	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → (2 · (𝑁 − 1)) = ((2 · 𝑁) − (2 · 1)))
25		2t1e2 11053	. . . . . . . . . . . . . 14 ⊢ (2 · 1) = 2
26	25	oveq2i 6560	. . . . . . . . . . . . 13 ⊢ ((2 · 𝑁) − (2 · 1)) = ((2 · 𝑁) − 2)
27	24, 26	syl6eq 2660	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (2 · (𝑁 − 1)) = ((2 · 𝑁) − 2))
28	27	oveq1d 6564	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → ((2 · (𝑁 − 1)) + 1) = (((2 · 𝑁) − 2) + 1))
29	20, 28	eqtr4d 2647	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → ((2 · 𝑁) − (2 − 1)) = ((2 · (𝑁 − 1)) + 1))
30	14, 29	syl5eqr 2658	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → ((2 · 𝑁) − 1) = ((2 · (𝑁 − 1)) + 1))
31		2nn0 11186	. . . . . . . . . . 11 ⊢ 2 ∈ ℕ₀
32		nnm1nn0 11211	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ₀)
33		nn0mulcl 11206	. . . . . . . . . . 11 ⊢ ((2 ∈ ℕ₀ ∧ (𝑁 − 1) ∈ ℕ₀) → (2 · (𝑁 − 1)) ∈ ℕ₀)
34	31, 32, 33	sylancr 694	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → (2 · (𝑁 − 1)) ∈ ℕ₀)
35		nn0p1nn 11209	. . . . . . . . . 10 ⊢ ((2 · (𝑁 − 1)) ∈ ℕ₀ → ((2 · (𝑁 − 1)) + 1) ∈ ℕ)
36	34, 35	syl 17	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → ((2 · (𝑁 − 1)) + 1) ∈ ℕ)
37	30, 36	eqeltrd 2688	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → ((2 · 𝑁) − 1) ∈ ℕ)
38		nnnn0 11176	. . . . . . . 8 ⊢ (((2 · 𝑁) − 1) ∈ ℕ → ((2 · 𝑁) − 1) ∈ ℕ₀)
39	37, 38	syl 17	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → ((2 · 𝑁) − 1) ∈ ℕ₀)
40		1re 9918	. . . . . . . . . . 11 ⊢ 1 ∈ ℝ
41	40	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 1 ∈ ℝ)
42		nnge1 10923	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 1 ≤ 𝑁)
43	41, 9, 9, 42	leadd2dd 10521	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (𝑁 + 1) ≤ (𝑁 + 𝑁))
44	21	2timesd 11152	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (2 · 𝑁) = (𝑁 + 𝑁))
45	43, 44	breqtrrd 4611	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → (𝑁 + 1) ≤ (2 · 𝑁))
46		leaddsub 10383	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℝ ∧ 1 ∈ ℝ ∧ (2 · 𝑁) ∈ ℝ) → ((𝑁 + 1) ≤ (2 · 𝑁) ↔ 𝑁 ≤ ((2 · 𝑁) − 1)))
47	9, 41, 4, 46	syl3anc 1318	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → ((𝑁 + 1) ≤ (2 · 𝑁) ↔ 𝑁 ≤ ((2 · 𝑁) − 1)))
48	45, 47	mpbid 221	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 𝑁 ≤ ((2 · 𝑁) − 1))
49		elfz2nn0 12300	. . . . . . 7 ⊢ (𝑁 ∈ (0...((2 · 𝑁) − 1)) ↔ (𝑁 ∈ ℕ₀ ∧ ((2 · 𝑁) − 1) ∈ ℕ₀ ∧ 𝑁 ≤ ((2 · 𝑁) − 1)))
50	12, 39, 48, 49	syl3anbrc 1239	. . . . . 6 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ (0...((2 · 𝑁) − 1)))
51		bccl2 12972	. . . . . 6 ⊢ (𝑁 ∈ (0...((2 · 𝑁) − 1)) → (((2 · 𝑁) − 1)C𝑁) ∈ ℕ)
52	50, 51	syl 17	. . . . 5 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) ∈ ℕ)
53	52	nnrpd 11746	. . . 4 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) ∈ ℝ⁺)
54	53	relogcld 24173	. . 3 ⊢ (𝑁 ∈ ℕ → (log‘(((2 · 𝑁) − 1)C𝑁)) ∈ ℝ)
55	11, 54	readdcld 9948	. 2 ⊢ (𝑁 ∈ ℕ → ((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁))) ∈ ℝ)
56		4re 10974	. . . . . 6 ⊢ 4 ∈ ℝ
57		4pos 10993	. . . . . 6 ⊢ 0 < 4
58	56, 57	elrpii 11711	. . . . 5 ⊢ 4 ∈ ℝ⁺
59		relogcl 24126	. . . . 5 ⊢ (4 ∈ ℝ⁺ → (log‘4) ∈ ℝ)
60	58, 59	ax-mp 5	. . . 4 ⊢ (log‘4) ∈ ℝ
61	32	nn0red 11229	. . . 4 ⊢ (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℝ)
62		remulcl 9900	. . . 4 ⊢ (((log‘4) ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ) → ((log‘4) · (𝑁 − 1)) ∈ ℝ)
63	60, 61, 62	sylancr 694	. . 3 ⊢ (𝑁 ∈ ℕ → ((log‘4) · (𝑁 − 1)) ∈ ℝ)
64	11, 63	readdcld 9948	. 2 ⊢ (𝑁 ∈ ℕ → ((θ‘𝑁) + ((log‘4) · (𝑁 − 1))) ∈ ℝ)
65		iftrue 4042	. . . . . . . . . . . 12 ⊢ (𝑝 ≤ ((2 · 𝑁) − 1) → if(𝑝 ≤ ((2 · 𝑁) − 1), 1, 0) = 1)
66	65	adantl 481	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ≤ ((2 · 𝑁) − 1)) → if(𝑝 ≤ ((2 · 𝑁) − 1), 1, 0) = 1)
67		simpr 476	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℙ)
68	52	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (((2 · 𝑁) − 1)C𝑁) ∈ ℕ)
69	67, 68	pccld 15393	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)) ∈ ℕ₀)
70		nn0addge1 11216	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℝ ∧ (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)) ∈ ℕ₀) → 1 ≤ (1 + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
71	40, 69, 70	sylancr 694	. . . . . . . . . . . . . 14 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → 1 ≤ (1 + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
72		iftrue 4042	. . . . . . . . . . . . . . . 16 ⊢ (𝑝 ≤ 𝑁 → if(𝑝 ≤ 𝑁, 1, 0) = 1)
73	72	oveq1d 6564	. . . . . . . . . . . . . . 15 ⊢ (𝑝 ≤ 𝑁 → (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) = (1 + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
74	73	breq2d 4595	. . . . . . . . . . . . . 14 ⊢ (𝑝 ≤ 𝑁 → (1 ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) ↔ 1 ≤ (1 + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)))))
75	71, 74	syl5ibrcom 236	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 ≤ 𝑁 → 1 ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)))))
76	75	adantr 480	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ≤ ((2 · 𝑁) − 1)) → (𝑝 ≤ 𝑁 → 1 ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)))))
77		prmnn 15226	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℕ)
78	77	ad2antlr 759	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → 𝑝 ∈ ℕ)
79		simprl 790	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → 𝑝 ≤ ((2 · 𝑁) − 1))
80		prmz 15227	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℤ)
81	37	nnzd 11357	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑁 ∈ ℕ → ((2 · 𝑁) − 1) ∈ ℤ)
82		eluz 11577	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑝 ∈ ℤ ∧ ((2 · 𝑁) − 1) ∈ ℤ) → (((2 · 𝑁) − 1) ∈ (ℤ_≥‘𝑝) ↔ 𝑝 ≤ ((2 · 𝑁) − 1)))
83	80, 81, 82	syl2anr 494	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (((2 · 𝑁) − 1) ∈ (ℤ_≥‘𝑝) ↔ 𝑝 ≤ ((2 · 𝑁) − 1)))
84	83	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (((2 · 𝑁) − 1) ∈ (ℤ_≥‘𝑝) ↔ 𝑝 ≤ ((2 · 𝑁) − 1)))
85	79, 84	mpbird 246	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ((2 · 𝑁) − 1) ∈ (ℤ_≥‘𝑝))
86		dvdsfac 14886	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑝 ∈ ℕ ∧ ((2 · 𝑁) − 1) ∈ (ℤ_≥‘𝑝)) → 𝑝 ∥ (!‘((2 · 𝑁) − 1)))
87	78, 85, 86	syl2anc 691	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → 𝑝 ∥ (!‘((2 · 𝑁) − 1)))
88		id 22	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℙ)
89		faccl 12932	. . . . . . . . . . . . . . . . . . 19 ⊢ (((2 · 𝑁) − 1) ∈ ℕ₀ → (!‘((2 · 𝑁) − 1)) ∈ ℕ)
90	39, 89	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑁 ∈ ℕ → (!‘((2 · 𝑁) − 1)) ∈ ℕ)
91		pcelnn 15412	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑝 ∈ ℙ ∧ (!‘((2 · 𝑁) − 1)) ∈ ℕ) → ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) ∈ ℕ ↔ 𝑝 ∥ (!‘((2 · 𝑁) − 1))))
92	88, 90, 91	syl2anr 494	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) ∈ ℕ ↔ 𝑝 ∥ (!‘((2 · 𝑁) − 1))))
93	92	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) ∈ ℕ ↔ 𝑝 ∥ (!‘((2 · 𝑁) − 1))))
94	87, 93	mpbird 246	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (𝑝 pCnt (!‘((2 · 𝑁) − 1))) ∈ ℕ)
95	94	nnge1d 10940	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → 1 ≤ (𝑝 pCnt (!‘((2 · 𝑁) − 1))))
96		iffalse 4045	. . . . . . . . . . . . . . . . 17 ⊢ (¬ 𝑝 ≤ 𝑁 → if(𝑝 ≤ 𝑁, 1, 0) = 0)
97	96	oveq1d 6564	. . . . . . . . . . . . . . . 16 ⊢ (¬ 𝑝 ≤ 𝑁 → (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) = (0 + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
98	97	ad2antll 761	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) = (0 + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
99	69	nn0cnd 11230	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)) ∈ ℂ)
100	99	addid2d 10116	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (0 + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) = (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)))
101	100	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (0 + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) = (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)))
102		bcval2 12954	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑁 ∈ (0...((2 · 𝑁) − 1)) → (((2 · 𝑁) − 1)C𝑁) = ((!‘((2 · 𝑁) − 1)) / ((!‘(((2 · 𝑁) − 1) − 𝑁)) · (!‘𝑁))))
103	50, 102	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) = ((!‘((2 · 𝑁) − 1)) / ((!‘(((2 · 𝑁) − 1) − 𝑁)) · (!‘𝑁))))
104	44	oveq1d 6564	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑁 ∈ ℕ → ((2 · 𝑁) − 1) = ((𝑁 + 𝑁) − 1))
105	17	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑁 ∈ ℕ → 1 ∈ ℂ)
106	21, 21, 105	addsubassd 10291	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑁 ∈ ℕ → ((𝑁 + 𝑁) − 1) = (𝑁 + (𝑁 − 1)))
107	104, 106	eqtrd 2644	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑁 ∈ ℕ → ((2 · 𝑁) − 1) = (𝑁 + (𝑁 − 1)))
108	107	oveq1d 6564	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1) − 𝑁) = ((𝑁 + (𝑁 − 1)) − 𝑁))
109	32	nn0cnd 11230	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℂ)
110	21, 109	pncan2d 10273	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑁 ∈ ℕ → ((𝑁 + (𝑁 − 1)) − 𝑁) = (𝑁 − 1))
111	108, 110	eqtrd 2644	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1) − 𝑁) = (𝑁 − 1))
112	111	fveq2d 6107	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑁 ∈ ℕ → (!‘(((2 · 𝑁) − 1) − 𝑁)) = (!‘(𝑁 − 1)))
113	112	oveq1d 6564	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑁 ∈ ℕ → ((!‘(((2 · 𝑁) − 1) − 𝑁)) · (!‘𝑁)) = ((!‘(𝑁 − 1)) · (!‘𝑁)))
114	113	oveq2d 6565	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑁 ∈ ℕ → ((!‘((2 · 𝑁) − 1)) / ((!‘(((2 · 𝑁) − 1) − 𝑁)) · (!‘𝑁))) = ((!‘((2 · 𝑁) − 1)) / ((!‘(𝑁 − 1)) · (!‘𝑁))))
115	103, 114	eqtrd 2644	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) = ((!‘((2 · 𝑁) − 1)) / ((!‘(𝑁 − 1)) · (!‘𝑁))))
116	115	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (((2 · 𝑁) − 1)C𝑁) = ((!‘((2 · 𝑁) − 1)) / ((!‘(𝑁 − 1)) · (!‘𝑁))))
117	116	oveq2d 6565	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)) = (𝑝 pCnt ((!‘((2 · 𝑁) − 1)) / ((!‘(𝑁 − 1)) · (!‘𝑁)))))
118		nnz 11276	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((!‘((2 · 𝑁) − 1)) ∈ ℕ → (!‘((2 · 𝑁) − 1)) ∈ ℤ)
119		nnne0 10930	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((!‘((2 · 𝑁) − 1)) ∈ ℕ → (!‘((2 · 𝑁) − 1)) ≠ 0)
120	118, 119	jca 553	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((!‘((2 · 𝑁) − 1)) ∈ ℕ → ((!‘((2 · 𝑁) − 1)) ∈ ℤ ∧ (!‘((2 · 𝑁) − 1)) ≠ 0))
121	90, 120	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑁 ∈ ℕ → ((!‘((2 · 𝑁) − 1)) ∈ ℤ ∧ (!‘((2 · 𝑁) − 1)) ≠ 0))
122	121	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((!‘((2 · 𝑁) − 1)) ∈ ℤ ∧ (!‘((2 · 𝑁) − 1)) ≠ 0))
123		faccl 12932	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑁 − 1) ∈ ℕ₀ → (!‘(𝑁 − 1)) ∈ ℕ)
124	32, 123	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑁 ∈ ℕ → (!‘(𝑁 − 1)) ∈ ℕ)
125		faccl 12932	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑁 ∈ ℕ₀ → (!‘𝑁) ∈ ℕ)
126	12, 125	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑁 ∈ ℕ → (!‘𝑁) ∈ ℕ)
127	124, 126	nnmulcld 10945	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑁 ∈ ℕ → ((!‘(𝑁 − 1)) · (!‘𝑁)) ∈ ℕ)
128	127	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((!‘(𝑁 − 1)) · (!‘𝑁)) ∈ ℕ)
129		pcdiv 15395	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑝 ∈ ℙ ∧ ((!‘((2 · 𝑁) − 1)) ∈ ℤ ∧ (!‘((2 · 𝑁) − 1)) ≠ 0) ∧ ((!‘(𝑁 − 1)) · (!‘𝑁)) ∈ ℕ) → (𝑝 pCnt ((!‘((2 · 𝑁) − 1)) / ((!‘(𝑁 − 1)) · (!‘𝑁)))) = ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) − (𝑝 pCnt ((!‘(𝑁 − 1)) · (!‘𝑁)))))
130	67, 122, 128, 129	syl3anc 1318	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((!‘((2 · 𝑁) − 1)) / ((!‘(𝑁 − 1)) · (!‘𝑁)))) = ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) − (𝑝 pCnt ((!‘(𝑁 − 1)) · (!‘𝑁)))))
131		nnz 11276	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((!‘(𝑁 − 1)) ∈ ℕ → (!‘(𝑁 − 1)) ∈ ℤ)
132		nnne0 10930	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((!‘(𝑁 − 1)) ∈ ℕ → (!‘(𝑁 − 1)) ≠ 0)
133	131, 132	jca 553	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((!‘(𝑁 − 1)) ∈ ℕ → ((!‘(𝑁 − 1)) ∈ ℤ ∧ (!‘(𝑁 − 1)) ≠ 0))
134	124, 133	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑁 ∈ ℕ → ((!‘(𝑁 − 1)) ∈ ℤ ∧ (!‘(𝑁 − 1)) ≠ 0))
135	134	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((!‘(𝑁 − 1)) ∈ ℤ ∧ (!‘(𝑁 − 1)) ≠ 0))
136		nnz 11276	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((!‘𝑁) ∈ ℕ → (!‘𝑁) ∈ ℤ)
137		nnne0 10930	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((!‘𝑁) ∈ ℕ → (!‘𝑁) ≠ 0)
138	136, 137	jca 553	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((!‘𝑁) ∈ ℕ → ((!‘𝑁) ∈ ℤ ∧ (!‘𝑁) ≠ 0))
139	126, 138	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑁 ∈ ℕ → ((!‘𝑁) ∈ ℤ ∧ (!‘𝑁) ≠ 0))
140	139	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((!‘𝑁) ∈ ℤ ∧ (!‘𝑁) ≠ 0))
141		pcmul 15394	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑝 ∈ ℙ ∧ ((!‘(𝑁 − 1)) ∈ ℤ ∧ (!‘(𝑁 − 1)) ≠ 0) ∧ ((!‘𝑁) ∈ ℤ ∧ (!‘𝑁) ≠ 0)) → (𝑝 pCnt ((!‘(𝑁 − 1)) · (!‘𝑁))) = ((𝑝 pCnt (!‘(𝑁 − 1))) + (𝑝 pCnt (!‘𝑁))))
142	67, 135, 140, 141	syl3anc 1318	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((!‘(𝑁 − 1)) · (!‘𝑁))) = ((𝑝 pCnt (!‘(𝑁 − 1))) + (𝑝 pCnt (!‘𝑁))))
143	142	oveq2d 6565	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) − (𝑝 pCnt ((!‘(𝑁 − 1)) · (!‘𝑁)))) = ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) − ((𝑝 pCnt (!‘(𝑁 − 1))) + (𝑝 pCnt (!‘𝑁)))))
144	117, 130, 143	3eqtrd 2648	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)) = ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) − ((𝑝 pCnt (!‘(𝑁 − 1))) + (𝑝 pCnt (!‘𝑁)))))
145	144	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)) = ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) − ((𝑝 pCnt (!‘(𝑁 − 1))) + (𝑝 pCnt (!‘𝑁)))))
146		simprr 792	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ¬ 𝑝 ≤ 𝑁)
147		prmfac1 15269	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑁 ∈ ℕ₀ ∧ 𝑝 ∈ ℙ ∧ 𝑝 ∥ (!‘𝑁)) → 𝑝 ≤ 𝑁)
148	147	3expia 1259	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑁 ∈ ℕ₀ ∧ 𝑝 ∈ ℙ) → (𝑝 ∥ (!‘𝑁) → 𝑝 ≤ 𝑁))
149	12, 148	sylan 487	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 ∥ (!‘𝑁) → 𝑝 ≤ 𝑁))
150	149	adantr 480	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (𝑝 ∥ (!‘𝑁) → 𝑝 ≤ 𝑁))
151	146, 150	mtod 188	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ¬ 𝑝 ∥ (!‘𝑁))
152	80	adantl 481	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℤ)
153	135	simpld 474	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (!‘(𝑁 − 1)) ∈ ℤ)
154		nnz 11276	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
155	154	adantr 480	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → 𝑁 ∈ ℤ)
156		dvdsmultr1 14857	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑝 ∈ ℤ ∧ (!‘(𝑁 − 1)) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑝 ∥ (!‘(𝑁 − 1)) → 𝑝 ∥ ((!‘(𝑁 − 1)) · 𝑁)))
157	152, 153, 155, 156	syl3anc 1318	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 ∥ (!‘(𝑁 − 1)) → 𝑝 ∥ ((!‘(𝑁 − 1)) · 𝑁)))
158		facnn2 12931	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑁 ∈ ℕ → (!‘𝑁) = ((!‘(𝑁 − 1)) · 𝑁))
159	158	adantr 480	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (!‘𝑁) = ((!‘(𝑁 − 1)) · 𝑁))
160	159	breq2d 4595	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 ∥ (!‘𝑁) ↔ 𝑝 ∥ ((!‘(𝑁 − 1)) · 𝑁)))
161	157, 160	sylibrd 248	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 ∥ (!‘(𝑁 − 1)) → 𝑝 ∥ (!‘𝑁)))
162	161	adantr 480	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (𝑝 ∥ (!‘(𝑁 − 1)) → 𝑝 ∥ (!‘𝑁)))
163	151, 162	mtod 188	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ¬ 𝑝 ∥ (!‘(𝑁 − 1)))
164		pceq0 15413	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑝 ∈ ℙ ∧ (!‘(𝑁 − 1)) ∈ ℕ) → ((𝑝 pCnt (!‘(𝑁 − 1))) = 0 ↔ ¬ 𝑝 ∥ (!‘(𝑁 − 1))))
165	88, 124, 164	syl2anr 494	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt (!‘(𝑁 − 1))) = 0 ↔ ¬ 𝑝 ∥ (!‘(𝑁 − 1))))
166	165	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ((𝑝 pCnt (!‘(𝑁 − 1))) = 0 ↔ ¬ 𝑝 ∥ (!‘(𝑁 − 1))))
167	163, 166	mpbird 246	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (𝑝 pCnt (!‘(𝑁 − 1))) = 0)
168		pceq0 15413	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑝 ∈ ℙ ∧ (!‘𝑁) ∈ ℕ) → ((𝑝 pCnt (!‘𝑁)) = 0 ↔ ¬ 𝑝 ∥ (!‘𝑁)))
169	88, 126, 168	syl2anr 494	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt (!‘𝑁)) = 0 ↔ ¬ 𝑝 ∥ (!‘𝑁)))
170	169	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ((𝑝 pCnt (!‘𝑁)) = 0 ↔ ¬ 𝑝 ∥ (!‘𝑁)))
171	151, 170	mpbird 246	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (𝑝 pCnt (!‘𝑁)) = 0)
172	167, 171	oveq12d 6567	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ((𝑝 pCnt (!‘(𝑁 − 1))) + (𝑝 pCnt (!‘𝑁))) = (0 + 0))
173		00id 10090	. . . . . . . . . . . . . . . . . 18 ⊢ (0 + 0) = 0
174	172, 173	syl6eq 2660	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ((𝑝 pCnt (!‘(𝑁 − 1))) + (𝑝 pCnt (!‘𝑁))) = 0)
175	174	oveq2d 6565	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) − ((𝑝 pCnt (!‘(𝑁 − 1))) + (𝑝 pCnt (!‘𝑁)))) = ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) − 0))
176		pccl 15392	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑝 ∈ ℙ ∧ (!‘((2 · 𝑁) − 1)) ∈ ℕ) → (𝑝 pCnt (!‘((2 · 𝑁) − 1))) ∈ ℕ₀)
177	88, 90, 176	syl2anr 494	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (!‘((2 · 𝑁) − 1))) ∈ ℕ₀)
178	177	nn0cnd 11230	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (!‘((2 · 𝑁) − 1))) ∈ ℂ)
179	178	subid1d 10260	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) − 0) = (𝑝 pCnt (!‘((2 · 𝑁) − 1))))
180	179	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → ((𝑝 pCnt (!‘((2 · 𝑁) − 1))) − 0) = (𝑝 pCnt (!‘((2 · 𝑁) − 1))))
181	145, 175, 180	3eqtrd 2648	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)) = (𝑝 pCnt (!‘((2 · 𝑁) − 1))))
182	98, 101, 181	3eqtrd 2648	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) = (𝑝 pCnt (!‘((2 · 𝑁) − 1))))
183	95, 182	breqtrrd 4611	. . . . . . . . . . . . 13 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ ((2 · 𝑁) − 1) ∧ ¬ 𝑝 ≤ 𝑁)) → 1 ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
184	183	expr 641	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ≤ ((2 · 𝑁) − 1)) → (¬ 𝑝 ≤ 𝑁 → 1 ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)))))
185	76, 184	pm2.61d 169	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ≤ ((2 · 𝑁) − 1)) → 1 ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
186	66, 185	eqbrtrd 4605	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ≤ ((2 · 𝑁) − 1)) → if(𝑝 ≤ ((2 · 𝑁) − 1), 1, 0) ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
187	186	ex 449	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 ≤ ((2 · 𝑁) − 1) → if(𝑝 ≤ ((2 · 𝑁) − 1), 1, 0) ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)))))
188		1nn0 11185	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℕ₀
189		0nn0 11184	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℕ₀
190	188, 189	keepel 4105	. . . . . . . . . . . 12 ⊢ if(𝑝 ≤ 𝑁, 1, 0) ∈ ℕ₀
191		nn0addcl 11205	. . . . . . . . . . . 12 ⊢ ((if(𝑝 ≤ 𝑁, 1, 0) ∈ ℕ₀ ∧ (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)) ∈ ℕ₀) → (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) ∈ ℕ₀)
192	190, 69, 191	sylancr 694	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) ∈ ℕ₀)
193	192	nn0ge0d 11231	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → 0 ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
194		iffalse 4045	. . . . . . . . . . 11 ⊢ (¬ 𝑝 ≤ ((2 · 𝑁) − 1) → if(𝑝 ≤ ((2 · 𝑁) − 1), 1, 0) = 0)
195	194	breq1d 4593	. . . . . . . . . 10 ⊢ (¬ 𝑝 ≤ ((2 · 𝑁) − 1) → (if(𝑝 ≤ ((2 · 𝑁) − 1), 1, 0) ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) ↔ 0 ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)))))
196	193, 195	syl5ibrcom 236	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (¬ 𝑝 ≤ ((2 · 𝑁) − 1) → if(𝑝 ≤ ((2 · 𝑁) − 1), 1, 0) ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁)))))
197	187, 196	pm2.61d 169	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → if(𝑝 ≤ ((2 · 𝑁) − 1), 1, 0) ≤ (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
198		eqid 2610	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1))
199	198	prmorcht 24704	. . . . . . . . . . . 12 ⊢ (((2 · 𝑁) − 1) ∈ ℕ → (exp‘(θ‘((2 · 𝑁) − 1))) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘((2 · 𝑁) − 1)))
200	37, 199	syl 17	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → (exp‘(θ‘((2 · 𝑁) − 1))) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘((2 · 𝑁) − 1)))
201	200	oveq2d 6565	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → (𝑝 pCnt (exp‘(θ‘((2 · 𝑁) − 1)))) = (𝑝 pCnt (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘((2 · 𝑁) − 1))))
202	201	adantr 480	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (exp‘(θ‘((2 · 𝑁) − 1)))) = (𝑝 pCnt (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘((2 · 𝑁) − 1))))
203		nncn 10905	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
204	203	exp1d 12865	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ ℕ → (𝑛↑1) = 𝑛)
205	204	ifeq1d 4054	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ → if(𝑛 ∈ ℙ, (𝑛↑1), 1) = if(𝑛 ∈ ℙ, 𝑛, 1))
206	205	mpteq2ia 4668	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑1), 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1))
207	206	eqcomi 2619	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑1), 1))
208	188	a1i 11	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) ∧ 𝑛 ∈ ℙ) → 1 ∈ ℕ₀)
209	208	ralrimiva 2949	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ∀𝑛 ∈ ℙ 1 ∈ ℕ₀)
210	37	adantr 480	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((2 · 𝑁) − 1) ∈ ℕ)
211		eqidd 2611	. . . . . . . . . 10 ⊢ (𝑛 = 𝑝 → 1 = 1)
212	207, 209, 210, 67, 211	pcmpt 15434	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘((2 · 𝑁) − 1))) = if(𝑝 ≤ ((2 · 𝑁) − 1), 1, 0))
213	202, 212	eqtrd 2644	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (exp‘(θ‘((2 · 𝑁) − 1)))) = if(𝑝 ≤ ((2 · 𝑁) − 1), 1, 0))
214		efchtcl 24637	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℝ → (exp‘(θ‘𝑁)) ∈ ℕ)
215	9, 214	syl 17	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (exp‘(θ‘𝑁)) ∈ ℕ)
216	215	adantr 480	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (exp‘(θ‘𝑁)) ∈ ℕ)
217		nnz 11276	. . . . . . . . . . . 12 ⊢ ((exp‘(θ‘𝑁)) ∈ ℕ → (exp‘(θ‘𝑁)) ∈ ℤ)
218		nnne0 10930	. . . . . . . . . . . 12 ⊢ ((exp‘(θ‘𝑁)) ∈ ℕ → (exp‘(θ‘𝑁)) ≠ 0)
219	217, 218	jca 553	. . . . . . . . . . 11 ⊢ ((exp‘(θ‘𝑁)) ∈ ℕ → ((exp‘(θ‘𝑁)) ∈ ℤ ∧ (exp‘(θ‘𝑁)) ≠ 0))
220	216, 219	syl 17	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((exp‘(θ‘𝑁)) ∈ ℤ ∧ (exp‘(θ‘𝑁)) ≠ 0))
221		nnz 11276	. . . . . . . . . . . 12 ⊢ ((((2 · 𝑁) − 1)C𝑁) ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) ∈ ℤ)
222		nnne0 10930	. . . . . . . . . . . 12 ⊢ ((((2 · 𝑁) − 1)C𝑁) ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) ≠ 0)
223	221, 222	jca 553	. . . . . . . . . . 11 ⊢ ((((2 · 𝑁) − 1)C𝑁) ∈ ℕ → ((((2 · 𝑁) − 1)C𝑁) ∈ ℤ ∧ (((2 · 𝑁) − 1)C𝑁) ≠ 0))
224	68, 223	syl 17	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((((2 · 𝑁) − 1)C𝑁) ∈ ℤ ∧ (((2 · 𝑁) − 1)C𝑁) ≠ 0))
225		pcmul 15394	. . . . . . . . . 10 ⊢ ((𝑝 ∈ ℙ ∧ ((exp‘(θ‘𝑁)) ∈ ℤ ∧ (exp‘(θ‘𝑁)) ≠ 0) ∧ ((((2 · 𝑁) − 1)C𝑁) ∈ ℤ ∧ (((2 · 𝑁) − 1)C𝑁) ≠ 0)) → (𝑝 pCnt ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁))) = ((𝑝 pCnt (exp‘(θ‘𝑁))) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
226	67, 220, 224, 225	syl3anc 1318	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁))) = ((𝑝 pCnt (exp‘(θ‘𝑁))) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
227	198	prmorcht 24704	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → (exp‘(θ‘𝑁)) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑁))
228	227	oveq2d 6565	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (𝑝 pCnt (exp‘(θ‘𝑁))) = (𝑝 pCnt (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑁)))
229	228	adantr 480	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (exp‘(θ‘𝑁))) = (𝑝 pCnt (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑁)))
230		simpl 472	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → 𝑁 ∈ ℕ)
231	207, 209, 230, 67, 211	pcmpt 15434	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑁)) = if(𝑝 ≤ 𝑁, 1, 0))
232	229, 231	eqtrd 2644	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (exp‘(θ‘𝑁))) = if(𝑝 ≤ 𝑁, 1, 0))
233	232	oveq1d 6564	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt (exp‘(θ‘𝑁))) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))) = (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
234	226, 233	eqtrd 2644	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁))) = (if(𝑝 ≤ 𝑁, 1, 0) + (𝑝 pCnt (((2 · 𝑁) − 1)C𝑁))))
235	197, 213, 234	3brtr4d 4615	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (exp‘(θ‘((2 · 𝑁) − 1)))) ≤ (𝑝 pCnt ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁))))
236	235	ralrimiva 2949	. . . . . 6 ⊢ (𝑁 ∈ ℕ → ∀𝑝 ∈ ℙ (𝑝 pCnt (exp‘(θ‘((2 · 𝑁) − 1)))) ≤ (𝑝 pCnt ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁))))
237		efchtcl 24637	. . . . . . . . 9 ⊢ (((2 · 𝑁) − 1) ∈ ℝ → (exp‘(θ‘((2 · 𝑁) − 1))) ∈ ℕ)
238	6, 237	syl 17	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → (exp‘(θ‘((2 · 𝑁) − 1))) ∈ ℕ)
239	238	nnzd 11357	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → (exp‘(θ‘((2 · 𝑁) − 1))) ∈ ℤ)
240	215, 52	nnmulcld 10945	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)) ∈ ℕ)
241	240	nnzd 11357	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)) ∈ ℤ)
242		pc2dvds 15421	. . . . . . 7 ⊢ (((exp‘(θ‘((2 · 𝑁) − 1))) ∈ ℤ ∧ ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)) ∈ ℤ) → ((exp‘(θ‘((2 · 𝑁) − 1))) ∥ ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt (exp‘(θ‘((2 · 𝑁) − 1)))) ≤ (𝑝 pCnt ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)))))
243	239, 241, 242	syl2anc 691	. . . . . 6 ⊢ (𝑁 ∈ ℕ → ((exp‘(θ‘((2 · 𝑁) − 1))) ∥ ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt (exp‘(θ‘((2 · 𝑁) − 1)))) ≤ (𝑝 pCnt ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)))))
244	236, 243	mpbird 246	. . . . 5 ⊢ (𝑁 ∈ ℕ → (exp‘(θ‘((2 · 𝑁) − 1))) ∥ ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)))
245		dvdsle 14870	. . . . . 6 ⊢ (((exp‘(θ‘((2 · 𝑁) − 1))) ∈ ℤ ∧ ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)) ∈ ℕ) → ((exp‘(θ‘((2 · 𝑁) − 1))) ∥ ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)) → (exp‘(θ‘((2 · 𝑁) − 1))) ≤ ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁))))
246	239, 240, 245	syl2anc 691	. . . . 5 ⊢ (𝑁 ∈ ℕ → ((exp‘(θ‘((2 · 𝑁) − 1))) ∥ ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)) → (exp‘(θ‘((2 · 𝑁) − 1))) ≤ ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁))))
247	244, 246	mpd 15	. . . 4 ⊢ (𝑁 ∈ ℕ → (exp‘(θ‘((2 · 𝑁) − 1))) ≤ ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)))
248	11	recnd 9947	. . . . . 6 ⊢ (𝑁 ∈ ℕ → (θ‘𝑁) ∈ ℂ)
249	54	recnd 9947	. . . . . 6 ⊢ (𝑁 ∈ ℕ → (log‘(((2 · 𝑁) − 1)C𝑁)) ∈ ℂ)
250		efadd 14663	. . . . . 6 ⊢ (((θ‘𝑁) ∈ ℂ ∧ (log‘(((2 · 𝑁) − 1)C𝑁)) ∈ ℂ) → (exp‘((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁)))) = ((exp‘(θ‘𝑁)) · (exp‘(log‘(((2 · 𝑁) − 1)C𝑁)))))
251	248, 249, 250	syl2anc 691	. . . . 5 ⊢ (𝑁 ∈ ℕ → (exp‘((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁)))) = ((exp‘(θ‘𝑁)) · (exp‘(log‘(((2 · 𝑁) − 1)C𝑁)))))
252	53	reeflogd 24174	. . . . . 6 ⊢ (𝑁 ∈ ℕ → (exp‘(log‘(((2 · 𝑁) − 1)C𝑁))) = (((2 · 𝑁) − 1)C𝑁))
253	252	oveq2d 6565	. . . . 5 ⊢ (𝑁 ∈ ℕ → ((exp‘(θ‘𝑁)) · (exp‘(log‘(((2 · 𝑁) − 1)C𝑁)))) = ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)))
254	251, 253	eqtrd 2644	. . . 4 ⊢ (𝑁 ∈ ℕ → (exp‘((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁)))) = ((exp‘(θ‘𝑁)) · (((2 · 𝑁) − 1)C𝑁)))
255	247, 254	breqtrrd 4611	. . 3 ⊢ (𝑁 ∈ ℕ → (exp‘(θ‘((2 · 𝑁) − 1))) ≤ (exp‘((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁)))))
256		efle 14687	. . . 4 ⊢ (((θ‘((2 · 𝑁) − 1)) ∈ ℝ ∧ ((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁))) ∈ ℝ) → ((θ‘((2 · 𝑁) − 1)) ≤ ((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁))) ↔ (exp‘(θ‘((2 · 𝑁) − 1))) ≤ (exp‘((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁))))))
257	8, 55, 256	syl2anc 691	. . 3 ⊢ (𝑁 ∈ ℕ → ((θ‘((2 · 𝑁) − 1)) ≤ ((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁))) ↔ (exp‘(θ‘((2 · 𝑁) − 1))) ≤ (exp‘((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁))))))
258	255, 257	mpbird 246	. 2 ⊢ (𝑁 ∈ ℕ → (θ‘((2 · 𝑁) − 1)) ≤ ((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁))))
259		fzfid 12634	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (0...((2 · 𝑁) − 1)) ∈ Fin)
260		elfzelz 12213	. . . . . . . . . . 11 ⊢ (𝑘 ∈ (0...((2 · 𝑁) − 1)) → 𝑘 ∈ ℤ)
261		bccl 12971	. . . . . . . . . . 11 ⊢ ((((2 · 𝑁) − 1) ∈ ℕ₀ ∧ 𝑘 ∈ ℤ) → (((2 · 𝑁) − 1)C𝑘) ∈ ℕ₀)
262	39, 260, 261	syl2an 493	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑘 ∈ (0...((2 · 𝑁) − 1))) → (((2 · 𝑁) − 1)C𝑘) ∈ ℕ₀)
263	262	nn0red 11229	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑘 ∈ (0...((2 · 𝑁) − 1))) → (((2 · 𝑁) − 1)C𝑘) ∈ ℝ)
264	262	nn0ge0d 11231	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑘 ∈ (0...((2 · 𝑁) − 1))) → 0 ≤ (((2 · 𝑁) − 1)C𝑘))
265		nn0uz 11598	. . . . . . . . . . . 12 ⊢ ℕ₀ = (ℤ_≥‘0)
266	32, 265	syl6eleq 2698	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → (𝑁 − 1) ∈ (ℤ_≥‘0))
267		fzss1 12251	. . . . . . . . . . 11 ⊢ ((𝑁 − 1) ∈ (ℤ_≥‘0) → ((𝑁 − 1)...𝑁) ⊆ (0...𝑁))
268	266, 267	syl 17	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → ((𝑁 − 1)...𝑁) ⊆ (0...𝑁))
269		eluz 11577	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ ℤ ∧ ((2 · 𝑁) − 1) ∈ ℤ) → (((2 · 𝑁) − 1) ∈ (ℤ_≥‘𝑁) ↔ 𝑁 ≤ ((2 · 𝑁) − 1)))
270	154, 81, 269	syl2anc 691	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1) ∈ (ℤ_≥‘𝑁) ↔ 𝑁 ≤ ((2 · 𝑁) − 1)))
271	48, 270	mpbird 246	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → ((2 · 𝑁) − 1) ∈ (ℤ_≥‘𝑁))
272		fzss2 12252	. . . . . . . . . . 11 ⊢ (((2 · 𝑁) − 1) ∈ (ℤ_≥‘𝑁) → (0...𝑁) ⊆ (0...((2 · 𝑁) − 1)))
273	271, 272	syl 17	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → (0...𝑁) ⊆ (0...((2 · 𝑁) − 1)))
274	268, 273	sstrd 3578	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → ((𝑁 − 1)...𝑁) ⊆ (0...((2 · 𝑁) − 1)))
275	259, 263, 264, 274	fsumless 14369	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → Σ𝑘 ∈ ((𝑁 − 1)...𝑁)(((2 · 𝑁) − 1)C𝑘) ≤ Σ𝑘 ∈ (0...((2 · 𝑁) − 1))(((2 · 𝑁) − 1)C𝑘))
276	32	nn0zd 11356	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℤ)
277		bccmpl 12958	. . . . . . . . . . . . . . 15 ⊢ ((((2 · 𝑁) − 1) ∈ ℕ₀ ∧ 𝑁 ∈ ℤ) → (((2 · 𝑁) − 1)C𝑁) = (((2 · 𝑁) − 1)C(((2 · 𝑁) − 1) − 𝑁)))
278	39, 154, 277	syl2anc 691	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) = (((2 · 𝑁) − 1)C(((2 · 𝑁) − 1) − 𝑁)))
279	111	oveq2d 6565	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C(((2 · 𝑁) − 1) − 𝑁)) = (((2 · 𝑁) − 1)C(𝑁 − 1)))
280	278, 279	eqtrd 2644	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) = (((2 · 𝑁) − 1)C(𝑁 − 1)))
281	52	nncnd 10913	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) ∈ ℂ)
282	280, 281	eqeltrrd 2689	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C(𝑁 − 1)) ∈ ℂ)
283		oveq2 6557	. . . . . . . . . . . . 13 ⊢ (𝑘 = (𝑁 − 1) → (((2 · 𝑁) − 1)C𝑘) = (((2 · 𝑁) − 1)C(𝑁 − 1)))
284	283	fsum1 14320	. . . . . . . . . . . 12 ⊢ (((𝑁 − 1) ∈ ℤ ∧ (((2 · 𝑁) − 1)C(𝑁 − 1)) ∈ ℂ) → Σ𝑘 ∈ ((𝑁 − 1)...(𝑁 − 1))(((2 · 𝑁) − 1)C𝑘) = (((2 · 𝑁) − 1)C(𝑁 − 1)))
285	276, 282, 284	syl2anc 691	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → Σ𝑘 ∈ ((𝑁 − 1)...(𝑁 − 1))(((2 · 𝑁) − 1)C𝑘) = (((2 · 𝑁) − 1)C(𝑁 − 1)))
286	285, 280	eqtr4d 2647	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → Σ𝑘 ∈ ((𝑁 − 1)...(𝑁 − 1))(((2 · 𝑁) − 1)C𝑘) = (((2 · 𝑁) − 1)C𝑁))
287	286	oveq1d 6564	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (Σ𝑘 ∈ ((𝑁 − 1)...(𝑁 − 1))(((2 · 𝑁) − 1)C𝑘) + (((2 · 𝑁) − 1)C𝑁)) = ((((2 · 𝑁) − 1)C𝑁) + (((2 · 𝑁) − 1)C𝑁)))
288	21, 105	npcand 10275	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → ((𝑁 − 1) + 1) = 𝑁)
289		uzid 11578	. . . . . . . . . . . . 13 ⊢ ((𝑁 − 1) ∈ ℤ → (𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)))
290	276, 289	syl 17	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)))
291		peano2uz 11617	. . . . . . . . . . . 12 ⊢ ((𝑁 − 1) ∈ (ℤ_≥‘(𝑁 − 1)) → ((𝑁 − 1) + 1) ∈ (ℤ_≥‘(𝑁 − 1)))
292	290, 291	syl 17	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → ((𝑁 − 1) + 1) ∈ (ℤ_≥‘(𝑁 − 1)))
293	288, 292	eqeltrrd 2689	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ (ℤ_≥‘(𝑁 − 1)))
294	274	sselda 3568	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑘 ∈ ((𝑁 − 1)...𝑁)) → 𝑘 ∈ (0...((2 · 𝑁) − 1)))
295	262	nn0cnd 11230	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑘 ∈ (0...((2 · 𝑁) − 1))) → (((2 · 𝑁) − 1)C𝑘) ∈ ℂ)
296	294, 295	syldan 486	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑘 ∈ ((𝑁 − 1)...𝑁)) → (((2 · 𝑁) − 1)C𝑘) ∈ ℂ)
297		oveq2 6557	. . . . . . . . . 10 ⊢ (𝑘 = 𝑁 → (((2 · 𝑁) − 1)C𝑘) = (((2 · 𝑁) − 1)C𝑁))
298	293, 296, 297	fsumm1 14324	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → Σ𝑘 ∈ ((𝑁 − 1)...𝑁)(((2 · 𝑁) − 1)C𝑘) = (Σ𝑘 ∈ ((𝑁 − 1)...(𝑁 − 1))(((2 · 𝑁) − 1)C𝑘) + (((2 · 𝑁) − 1)C𝑁)))
299	281	2timesd 11152	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (2 · (((2 · 𝑁) − 1)C𝑁)) = ((((2 · 𝑁) − 1)C𝑁) + (((2 · 𝑁) − 1)C𝑁)))
300	287, 298, 299	3eqtr4rd 2655	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → (2 · (((2 · 𝑁) − 1)C𝑁)) = Σ𝑘 ∈ ((𝑁 − 1)...𝑁)(((2 · 𝑁) − 1)C𝑘))
301		binom11 14403	. . . . . . . . 9 ⊢ (((2 · 𝑁) − 1) ∈ ℕ₀ → (2↑((2 · 𝑁) − 1)) = Σ𝑘 ∈ (0...((2 · 𝑁) − 1))(((2 · 𝑁) − 1)C𝑘))
302	39, 301	syl 17	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → (2↑((2 · 𝑁) − 1)) = Σ𝑘 ∈ (0...((2 · 𝑁) − 1))(((2 · 𝑁) − 1)C𝑘))
303	275, 300, 302	3brtr4d 4615	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → (2 · (((2 · 𝑁) − 1)C𝑁)) ≤ (2↑((2 · 𝑁) − 1)))
304		mulcom 9901	. . . . . . . 8 ⊢ ((2 ∈ ℂ ∧ (((2 · 𝑁) − 1)C𝑁) ∈ ℂ) → (2 · (((2 · 𝑁) − 1)C𝑁)) = ((((2 · 𝑁) − 1)C𝑁) · 2))
305	16, 281, 304	sylancr 694	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → (2 · (((2 · 𝑁) − 1)C𝑁)) = ((((2 · 𝑁) − 1)C𝑁) · 2))
306	30	oveq2d 6565	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → (2↑((2 · 𝑁) − 1)) = (2↑((2 · (𝑁 − 1)) + 1)))
307		expp1 12729	. . . . . . . . 9 ⊢ ((2 ∈ ℂ ∧ (2 · (𝑁 − 1)) ∈ ℕ₀) → (2↑((2 · (𝑁 − 1)) + 1)) = ((2↑(2 · (𝑁 − 1))) · 2))
308	16, 34, 307	sylancr 694	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → (2↑((2 · (𝑁 − 1)) + 1)) = ((2↑(2 · (𝑁 − 1))) · 2))
309	16	a1i 11	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → 2 ∈ ℂ)
310	31	a1i 11	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → 2 ∈ ℕ₀)
311	309, 32, 310	expmuld 12873	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → (2↑(2 · (𝑁 − 1))) = ((2↑2)↑(𝑁 − 1)))
312		sq2 12822	. . . . . . . . . . 11 ⊢ (2↑2) = 4
313	312	oveq1i 6559	. . . . . . . . . 10 ⊢ ((2↑2)↑(𝑁 − 1)) = (4↑(𝑁 − 1))
314	311, 313	syl6eq 2660	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (2↑(2 · (𝑁 − 1))) = (4↑(𝑁 − 1)))
315	314	oveq1d 6564	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → ((2↑(2 · (𝑁 − 1))) · 2) = ((4↑(𝑁 − 1)) · 2))
316	306, 308, 315	3eqtrd 2648	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → (2↑((2 · 𝑁) − 1)) = ((4↑(𝑁 − 1)) · 2))
317	303, 305, 316	3brtr3d 4614	. . . . . 6 ⊢ (𝑁 ∈ ℕ → ((((2 · 𝑁) − 1)C𝑁) · 2) ≤ ((4↑(𝑁 − 1)) · 2))
318	52	nnred 10912	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) ∈ ℝ)
319		reexpcl 12739	. . . . . . . 8 ⊢ ((4 ∈ ℝ ∧ (𝑁 − 1) ∈ ℕ₀) → (4↑(𝑁 − 1)) ∈ ℝ)
320	56, 32, 319	sylancr 694	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → (4↑(𝑁 − 1)) ∈ ℝ)
321		2re 10967	. . . . . . . . 9 ⊢ 2 ∈ ℝ
322		2pos 10989	. . . . . . . . 9 ⊢ 0 < 2
323	321, 322	pm3.2i 470	. . . . . . . 8 ⊢ (2 ∈ ℝ ∧ 0 < 2)
324	323	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → (2 ∈ ℝ ∧ 0 < 2))
325		lemul1 10754	. . . . . . 7 ⊢ (((((2 · 𝑁) − 1)C𝑁) ∈ ℝ ∧ (4↑(𝑁 − 1)) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((((2 · 𝑁) − 1)C𝑁) ≤ (4↑(𝑁 − 1)) ↔ ((((2 · 𝑁) − 1)C𝑁) · 2) ≤ ((4↑(𝑁 − 1)) · 2)))
326	318, 320, 324, 325	syl3anc 1318	. . . . . 6 ⊢ (𝑁 ∈ ℕ → ((((2 · 𝑁) − 1)C𝑁) ≤ (4↑(𝑁 − 1)) ↔ ((((2 · 𝑁) − 1)C𝑁) · 2) ≤ ((4↑(𝑁 − 1)) · 2)))
327	317, 326	mpbird 246	. . . . 5 ⊢ (𝑁 ∈ ℕ → (((2 · 𝑁) − 1)C𝑁) ≤ (4↑(𝑁 − 1)))
328	60	recni 9931	. . . . . . . 8 ⊢ (log‘4) ∈ ℂ
329		mulcom 9901	. . . . . . . 8 ⊢ (((log‘4) ∈ ℂ ∧ (𝑁 − 1) ∈ ℂ) → ((log‘4) · (𝑁 − 1)) = ((𝑁 − 1) · (log‘4)))
330	328, 109, 329	sylancr 694	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → ((log‘4) · (𝑁 − 1)) = ((𝑁 − 1) · (log‘4)))
331	330	fveq2d 6107	. . . . . 6 ⊢ (𝑁 ∈ ℕ → (exp‘((log‘4) · (𝑁 − 1))) = (exp‘((𝑁 − 1) · (log‘4))))
332		reexplog 24145	. . . . . . 7 ⊢ ((4 ∈ ℝ⁺ ∧ (𝑁 − 1) ∈ ℤ) → (4↑(𝑁 − 1)) = (exp‘((𝑁 − 1) · (log‘4))))
333	58, 276, 332	sylancr 694	. . . . . 6 ⊢ (𝑁 ∈ ℕ → (4↑(𝑁 − 1)) = (exp‘((𝑁 − 1) · (log‘4))))
334	331, 333	eqtr4d 2647	. . . . 5 ⊢ (𝑁 ∈ ℕ → (exp‘((log‘4) · (𝑁 − 1))) = (4↑(𝑁 − 1)))
335	327, 252, 334	3brtr4d 4615	. . . 4 ⊢ (𝑁 ∈ ℕ → (exp‘(log‘(((2 · 𝑁) − 1)C𝑁))) ≤ (exp‘((log‘4) · (𝑁 − 1))))
336		efle 14687	. . . . 5 ⊢ (((log‘(((2 · 𝑁) − 1)C𝑁)) ∈ ℝ ∧ ((log‘4) · (𝑁 − 1)) ∈ ℝ) → ((log‘(((2 · 𝑁) − 1)C𝑁)) ≤ ((log‘4) · (𝑁 − 1)) ↔ (exp‘(log‘(((2 · 𝑁) − 1)C𝑁))) ≤ (exp‘((log‘4) · (𝑁 − 1)))))
337	54, 63, 336	syl2anc 691	. . . 4 ⊢ (𝑁 ∈ ℕ → ((log‘(((2 · 𝑁) − 1)C𝑁)) ≤ ((log‘4) · (𝑁 − 1)) ↔ (exp‘(log‘(((2 · 𝑁) − 1)C𝑁))) ≤ (exp‘((log‘4) · (𝑁 − 1)))))
338	335, 337	mpbird 246	. . 3 ⊢ (𝑁 ∈ ℕ → (log‘(((2 · 𝑁) − 1)C𝑁)) ≤ ((log‘4) · (𝑁 − 1)))
339	54, 63, 11, 338	leadd2dd 10521	. 2 ⊢ (𝑁 ∈ ℕ → ((θ‘𝑁) + (log‘(((2 · 𝑁) − 1)C𝑁))) ≤ ((θ‘𝑁) + ((log‘4) · (𝑁 − 1))))
340	8, 55, 64, 258, 339	letrd 10073	1 ⊢ (𝑁 ∈ ℕ → (θ‘((2 · 𝑁) − 1)) ≤ ((θ‘𝑁) + ((log‘4) · (𝑁 − 1))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 195 ∧ wa 383 = wceq 1475 ∈ wcel 1977 ≠ wne 2780 ∀wral 2896 ⊆ wss 3540 ifcif 4036 class class class wbr 4583 ↦ cmpt 4643 ‘cfv 5804 (class class class)co 6549 ℂcc 9813 ℝcr 9814 0cc0 9815 1c1 9816 + caddc 9818 · cmul 9820 < clt 9953 ≤ cle 9954 − cmin 10145 / cdiv 10563 ℕcn 10897 2c2 10947 4c4 10949 ℕ₀cn0 11169 ℤcz 11254 ℤ_≥cuz 11563 ℝ⁺crp 11708 ...cfz 12197 seqcseq 12663 ↑cexp 12722 !cfa 12922 Ccbc 12951 Σcsu 14264 expce 14631 ∥ cdvds 14821 ℙcprime 15223 pCnt cpc 15379 logclog 24105 θccht 24617

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1713 ax-4 1728 ax-5 1827 ax-6 1875 ax-7 1922 ax-8 1979 ax-9 1986 ax-10 2006 ax-11 2021 ax-12 2034 ax-13 2234 ax-ext 2590 ax-rep 4699 ax-sep 4709 ax-nul 4717 ax-pow 4769 ax-pr 4833 ax-un 6847 ax-inf2 8421 ax-cnex 9871 ax-resscn 9872 ax-1cn 9873 ax-icn 9874 ax-addcl 9875 ax-addrcl 9876 ax-mulcl 9877 ax-mulrcl 9878 ax-mulcom 9879 ax-addass 9880 ax-mulass 9881 ax-distr 9882 ax-i2m1 9883 ax-1ne0 9884 ax-1rid 9885 ax-rnegex 9886 ax-rrecex 9887 ax-cnre 9888 ax-pre-lttri 9889 ax-pre-lttrn 9890 ax-pre-ltadd 9891 ax-pre-mulgt0 9892 ax-pre-sup 9893 ax-addf 9894 ax-mulf 9895

This theorem depends on definitions: df-bi 196 df-or 384 df-an 385 df-3or 1032 df-3an 1033 df-tru 1478 df-fal 1481 df-ex 1696 df-nf 1701 df-sb 1868 df-eu 2462 df-mo 2463 df-clab 2597 df-cleq 2603 df-clel 2606 df-nfc 2740 df-ne 2782 df-nel 2783 df-ral 2901 df-rex 2902 df-reu 2903 df-rmo 2904 df-rab 2905 df-v 3175 df-sbc 3403 df-csb 3500 df-dif 3543 df-un 3545 df-in 3547 df-ss 3554 df-pss 3556 df-nul 3875 df-if 4037 df-pw 4110 df-sn 4126 df-pr 4128 df-tp 4130 df-op 4132 df-uni 4373 df-int 4411 df-iun 4457 df-iin 4458 df-br 4584 df-opab 4644 df-mpt 4645 df-tr 4681 df-eprel 4949 df-id 4953 df-po 4959 df-so 4960 df-fr 4997 df-se 4998 df-we 4999 df-xp 5044 df-rel 5045 df-cnv 5046 df-co 5047 df-dm 5048 df-rn 5049 df-res 5050 df-ima 5051 df-pred 5597 df-ord 5643 df-on 5644 df-lim 5645 df-suc 5646 df-iota 5768 df-fun 5806 df-fn 5807 df-f 5808 df-f1 5809 df-fo 5810 df-f1o 5811 df-fv 5812 df-isom 5813 df-riota 6511 df-ov 6552 df-oprab 6553 df-mpt2 6554 df-of 6795 df-om 6958 df-1st 7059 df-2nd 7060 df-supp 7183 df-wrecs 7294 df-recs 7355 df-rdg 7393 df-1o 7447 df-2o 7448 df-oadd 7451 df-er 7629 df-map 7746 df-pm 7747 df-ixp 7795 df-en 7842 df-dom 7843 df-sdom 7844 df-fin 7845 df-fsupp 8159 df-fi 8200 df-sup 8231 df-inf 8232 df-oi 8298 df-card 8648 df-cda 8873 df-pnf 9955 df-mnf 9956 df-xr 9957 df-ltxr 9958 df-le 9959 df-sub 10147 df-neg 10148 df-div 10564 df-nn 10898 df-2 10956 df-3 10957 df-4 10958 df-5 10959 df-6 10960 df-7 10961 df-8 10962 df-9 10963 df-n0 11170 df-z 11255 df-dec 11370 df-uz 11564 df-q 11665 df-rp 11709 df-xneg 11822 df-xadd 11823 df-xmul 11824 df-ioo 12050 df-ioc 12051 df-ico 12052 df-icc 12053 df-fz 12198 df-fzo 12335 df-fl 12455 df-mod 12531 df-seq 12664 df-exp 12723 df-fac 12923 df-bc 12952 df-hash 12980 df-shft 13655 df-cj 13687 df-re 13688 df-im 13689 df-sqrt 13823 df-abs 13824 df-limsup 14050 df-clim 14067 df-rlim 14068 df-sum 14265 df-ef 14637 df-sin 14639 df-cos 14640 df-pi 14642 df-dvds 14822 df-gcd 15055 df-prm 15224 df-pc 15380 df-struct 15697 df-ndx 15698 df-slot 15699 df-base 15700 df-sets 15701 df-ress 15702 df-plusg 15781 df-mulr 15782 df-starv 15783 df-sca 15784 df-vsca 15785 df-ip 15786 df-tset 15787 df-ple 15788 df-ds 15791 df-unif 15792 df-hom 15793 df-cco 15794 df-rest 15906 df-topn 15907 df-0g 15925 df-gsum 15926 df-topgen 15927 df-pt 15928 df-prds 15931 df-xrs 15985 df-qtop 15990 df-imas 15991 df-xps 15993 df-mre 16069 df-mrc 16070 df-acs 16072 df-mgm 17065 df-sgrp 17107 df-mnd 17118 df-submnd 17159 df-mulg 17364 df-cntz 17573 df-cmn 18018 df-psmet 19559 df-xmet 19560 df-met 19561 df-bl 19562 df-mopn 19563 df-fbas 19564 df-fg 19565 df-cnfld 19568 df-top 20521 df-bases 20522 df-topon 20523 df-topsp 20524 df-cld 20633 df-ntr 20634 df-cls 20635 df-nei 20712 df-lp 20750 df-perf 20751 df-cn 20841 df-cnp 20842 df-haus 20929 df-tx 21175 df-hmeo 21368 df-fil 21460 df-fm 21552 df-flim 21553 df-flf 21554 df-xms 21935 df-ms 21936 df-tms 21937 df-cncf 22489 df-limc 23436 df-dv 23437 df-log 24107 df-cht 24623

This theorem is referenced by: chtub 24737

W3C validator