pntlemk - Metamath Proof Explorer

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

Theorem pntlemk 27926

Description: Lemma for pnt 27934. Evaluate the naive part of the estimate. (Contributed by Mario Carneiro, 14-Apr-2016.)

**Hypotheses**
Ref	Expression
pntlem1.r	⊢ 𝑅 = (𝑎 ∈ ℝ⁺ ↦ ((ψ‘𝑎) − 𝑎))
pntlem1.a	⊢ (𝜑 → 𝐴 ∈ ℝ⁺)
pntlem1.b	⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
pntlem1.l	⊢ (𝜑 → 𝐿 ∈ (0(,)1))
pntlem1.d	⊢ 𝐷 = (𝐴 + 1)
pntlem1.f	⊢ 𝐹 = ((1 − (1 / 𝐷)) · ((𝐿 / (;32 · 𝐵)) / (𝐷↑2)))
pntlem1.u	⊢ (𝜑 → 𝑈 ∈ ℝ⁺)
pntlem1.u2	⊢ (𝜑 → 𝑈 ≤ 𝐴)
pntlem1.e	⊢ 𝐸 = (𝑈 / 𝐷)
pntlem1.k	⊢ 𝐾 = (exp‘(𝐵 / 𝐸))
pntlem1.y	⊢ (𝜑 → (𝑌 ∈ ℝ⁺ ∧ 1 ≤ 𝑌))
pntlem1.x	⊢ (𝜑 → (𝑋 ∈ ℝ⁺ ∧ 𝑌 < 𝑋))
pntlem1.c	⊢ (𝜑 → 𝐶 ∈ ℝ⁺)
pntlem1.w	⊢ 𝑊 = (((𝑌 + (4 / (𝐿 · 𝐸)))↑2) + (((𝑋 · (𝐾↑2))↑4) + (exp‘(((;32 · 𝐵) / ((𝑈 − 𝐸) · (𝐿 · (𝐸↑2)))) · ((𝑈 · 3) + 𝐶)))))
pntlem1.z	⊢ (𝜑 → 𝑍 ∈ (𝑊[,)+∞))
pntlem1.m	⊢ 𝑀 = ((⌊‘((log‘𝑋) / (log‘𝐾))) + 1)
pntlem1.n	⊢ 𝑁 = (⌊‘(((log‘𝑍) / (log‘𝐾)) / 2))
pntlem1.U	⊢ (𝜑 → ∀𝑧 ∈ (𝑌[,)+∞)(abs‘((𝑅‘𝑧) / 𝑧)) ≤ 𝑈)
pntlem1.K	⊢ (𝜑 → ∀𝑦 ∈ (𝑋(,)+∞)∃𝑧 ∈ ℝ⁺ ((𝑦 < 𝑧 ∧ ((1 + (𝐿 · 𝐸)) · 𝑧) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑧[,]((1 + (𝐿 · 𝐸)) · 𝑧))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))

**Assertion**
Ref	Expression
pntlemk	⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛))) ≤ ((𝑈 · ((log‘𝑍) + 3)) · (log‘𝑍)))

Distinct variable groups: 𝑧,𝐶 𝑦,𝑛,𝑧,𝑢,𝐿 𝑛,𝐾,𝑦,𝑧 𝑛,𝑀,𝑧 𝜑,𝑛 𝑛,𝑁,𝑧 𝑅,𝑛,𝑢,𝑦,𝑧 𝑈,𝑛,𝑧 𝑛,𝑊,𝑧 𝑛,𝑋,𝑦,𝑧 𝑛,𝑌,𝑧 𝑛,𝑎,𝑢,𝑦,𝑧,𝐸 𝑛,𝑍,𝑢,𝑧 Allowed substitution hints: 𝜑(𝑦, 𝑧, 𝑢, 𝑎) 𝐴(𝑦, 𝑧, 𝑢, 𝑛, 𝑎) 𝐵(𝑦, 𝑧, 𝑢, 𝑛, 𝑎) 𝐶(𝑦, 𝑢, 𝑛, 𝑎) 𝐷(𝑦, 𝑧, 𝑢, 𝑛, 𝑎) 𝑅(𝑎) 𝑈(𝑦, 𝑢, 𝑎) 𝐹(𝑦, 𝑧, 𝑢, 𝑛, 𝑎) 𝐾(𝑢, 𝑎) 𝐿(𝑎) 𝑀(𝑦, 𝑢, 𝑎) 𝑁(𝑦, 𝑢, 𝑎) 𝑊(𝑦, 𝑢, 𝑎) 𝑋(𝑢, 𝑎) 𝑌(𝑦, 𝑢, 𝑎) 𝑍(𝑦, 𝑎)

**Proof of Theorem pntlemk**
Step	Hyp	Ref	Expression
1		2re 12410	. . . . 5 ⊢ 2 ∈ ℝ
2		fzfid 14109	. . . . . 6 ⊢ (𝜑 → (1...(⌊‘(𝑍 / 𝑌))) ∈ Fin)
3		elfznn 13680	. . . . . . . . . 10 ⊢ (𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌))) → 𝑛 ∈ ℕ)
4	3	adantl 487	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → 𝑛 ∈ ℕ)
5	4	nnrpd 13155	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → 𝑛 ∈ ℝ⁺)
6	5	relogcld 26944	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → (log‘𝑛) ∈ ℝ)
7	6, 4	nndivred 12385	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → ((log‘𝑛) / 𝑛) ∈ ℝ)
8	2, 7	fsumrecl 15893	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ∈ ℝ)
9		remulcl 11278	. . . . 5 ⊢ ((2 ∈ ℝ ∧ Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ∈ ℝ) → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ∈ ℝ)
10	1, 8, 9	sylancr 599	. . . 4 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ∈ ℝ)
11		pntlem1.r	. . . . . . . . 9 ⊢ 𝑅 = (𝑎 ∈ ℝ⁺ ↦ ((ψ‘𝑎) − 𝑎))
12		pntlem1.a	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℝ⁺)
13		pntlem1.b	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
14		pntlem1.l	. . . . . . . . 9 ⊢ (𝜑 → 𝐿 ∈ (0(,)1))
15		pntlem1.d	. . . . . . . . 9 ⊢ 𝐷 = (𝐴 + 1)
16		pntlem1.f	. . . . . . . . 9 ⊢ 𝐹 = ((1 − (1 / 𝐷)) · ((𝐿 / (;32 · 𝐵)) / (𝐷↑2)))
17		pntlem1.u	. . . . . . . . 9 ⊢ (𝜑 → 𝑈 ∈ ℝ⁺)
18		pntlem1.u2	. . . . . . . . 9 ⊢ (𝜑 → 𝑈 ≤ 𝐴)
19		pntlem1.e	. . . . . . . . 9 ⊢ 𝐸 = (𝑈 / 𝐷)
20		pntlem1.k	. . . . . . . . 9 ⊢ 𝐾 = (exp‘(𝐵 / 𝐸))
21		pntlem1.y	. . . . . . . . 9 ⊢ (𝜑 → (𝑌 ∈ ℝ⁺ ∧ 1 ≤ 𝑌))
22		pntlem1.x	. . . . . . . . 9 ⊢ (𝜑 → (𝑋 ∈ ℝ⁺ ∧ 𝑌 < 𝑋))
23		pntlem1.c	. . . . . . . . 9 ⊢ (𝜑 → 𝐶 ∈ ℝ⁺)
24		pntlem1.w	. . . . . . . . 9 ⊢ 𝑊 = (((𝑌 + (4 / (𝐿 · 𝐸)))↑2) + (((𝑋 · (𝐾↑2))↑4) + (exp‘(((;32 · 𝐵) / ((𝑈 − 𝐸) · (𝐿 · (𝐸↑2)))) · ((𝑈 · 3) + 𝐶)))))
25		pntlem1.z	. . . . . . . . 9 ⊢ (𝜑 → 𝑍 ∈ (𝑊[,)+∞))
26	11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25	pntlemb 27917	. . . . . . . 8 ⊢ (𝜑 → (𝑍 ∈ ℝ⁺ ∧ (1 < 𝑍 ∧ e ≤ (√‘𝑍) ∧ (√‘𝑍) ≤ (𝑍 / 𝑌)) ∧ ((4 / (𝐿 · 𝐸)) ≤ (√‘𝑍) ∧ (((log‘𝑋) / (log‘𝐾)) + 2) ≤ (((log‘𝑍) / (log‘𝐾)) / 4) ∧ ((𝑈 · 3) + 𝐶) ≤ (((𝑈 − 𝐸) · ((𝐿 · (𝐸↑2)) / (;32 · 𝐵))) · (log‘𝑍)))))
27	26	simp1d 1160	. . . . . . 7 ⊢ (𝜑 → 𝑍 ∈ ℝ⁺)
28	27	relogcld 26944	. . . . . 6 ⊢ (𝜑 → (log‘𝑍) ∈ ℝ)
29		peano2re 11476	. . . . . 6 ⊢ ((log‘𝑍) ∈ ℝ → ((log‘𝑍) + 1) ∈ ℝ)
30	28, 29	syl 18	. . . . 5 ⊢ (𝜑 → ((log‘𝑍) + 1) ∈ ℝ)
31	30	resqcld 14261	. . . 4 ⊢ (𝜑 → (((log‘𝑍) + 1)↑2) ∈ ℝ)
32		3re 12416	. . . . . 6 ⊢ 3 ∈ ℝ
33		readdcl 11276	. . . . . 6 ⊢ (((log‘𝑍) ∈ ℝ ∧ 3 ∈ ℝ) → ((log‘𝑍) + 3) ∈ ℝ)
34	28, 32, 33	sylancl 598	. . . . 5 ⊢ (𝜑 → ((log‘𝑍) + 3) ∈ ℝ)
35	34, 28	remulcld 11332	. . . 4 ⊢ (𝜑 → (((log‘𝑍) + 3) · (log‘𝑍)) ∈ ℝ)
36	27	rpred 13157	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑍 ∈ ℝ)
37	21	simpld 500	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑌 ∈ ℝ⁺)
38	36, 37	rerpdivcld 13188	. . . . . . . . . 10 ⊢ (𝜑 → (𝑍 / 𝑌) ∈ ℝ)
39		1red 11302	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ∈ ℝ)
40	27	rpsqrtcld 15572	. . . . . . . . . . . 12 ⊢ (𝜑 → (√‘𝑍) ∈ ℝ⁺)
41	40	rpred 13157	. . . . . . . . . . 11 ⊢ (𝜑 → (√‘𝑍) ∈ ℝ)
42		ere 16248	. . . . . . . . . . . . 13 ⊢ e ∈ ℝ
43	42	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → e ∈ ℝ)
44		1re 11301	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℝ
45		1lt2 12508	. . . . . . . . . . . . . . 15 ⊢ 1 < 2
46		egt2lt3 16367	. . . . . . . . . . . . . . . 16 ⊢ (2 < e ∧ e < 3)
47	46	simpli 489	. . . . . . . . . . . . . . 15 ⊢ 2 < e
48	44, 1, 42	lttri 11429	. . . . . . . . . . . . . . 15 ⊢ ((1 < 2 ∧ 2 < e) → 1 < e)
49	45, 47, 48	mp2an 705	. . . . . . . . . . . . . 14 ⊢ 1 < e
50	44, 42, 49	ltleii 11426	. . . . . . . . . . . . 13 ⊢ 1 ≤ e
51	50	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ≤ e)
52	26	simp2d 1161	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 < 𝑍 ∧ e ≤ (√‘𝑍) ∧ (√‘𝑍) ≤ (𝑍 / 𝑌)))
53	52	simp2d 1161	. . . . . . . . . . . 12 ⊢ (𝜑 → e ≤ (√‘𝑍))
54	39, 43, 41, 51, 53	letrd 11460	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ≤ (√‘𝑍))
55	52	simp3d 1162	. . . . . . . . . . 11 ⊢ (𝜑 → (√‘𝑍) ≤ (𝑍 / 𝑌))
56	39, 41, 38, 54, 55	letrd 11460	. . . . . . . . . 10 ⊢ (𝜑 → 1 ≤ (𝑍 / 𝑌))
57		flge1nn 13954	. . . . . . . . . 10 ⊢ (((𝑍 / 𝑌) ∈ ℝ ∧ 1 ≤ (𝑍 / 𝑌)) → (⌊‘(𝑍 / 𝑌)) ∈ ℕ)
58	38, 56, 57	syl2anc 596	. . . . . . . . 9 ⊢ (𝜑 → (⌊‘(𝑍 / 𝑌)) ∈ ℕ)
59	58	nnrpd 13155	. . . . . . . 8 ⊢ (𝜑 → (⌊‘(𝑍 / 𝑌)) ∈ ℝ⁺)
60	59	relogcld 26944	. . . . . . 7 ⊢ (𝜑 → (log‘(⌊‘(𝑍 / 𝑌))) ∈ ℝ)
61	60, 39	readdcld 11331	. . . . . 6 ⊢ (𝜑 → ((log‘(⌊‘(𝑍 / 𝑌))) + 1) ∈ ℝ)
62	61	resqcld 14261	. . . . 5 ⊢ (𝜑 → (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) ∈ ℝ)
63		logdivbnd 27876	. . . . . . 7 ⊢ ((⌊‘(𝑍 / 𝑌)) ∈ ℕ → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ≤ ((((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) / 2))
64	58, 63	syl 18	. . . . . 6 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ≤ ((((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) / 2))
65	1	a1i 11	. . . . . . 7 ⊢ (𝜑 → 2 ∈ ℝ)
66		2pos 12440	. . . . . . . 8 ⊢ 0 < 2
67	66	a1i 11	. . . . . . 7 ⊢ (𝜑 → 0 < 2)
68		lemuldiv2 12191	. . . . . . 7 ⊢ ((Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ∈ ℝ ∧ (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) ↔ Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ≤ ((((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) / 2)))
69	8, 62, 65, 67, 68	syl112anc 1401	. . . . . 6 ⊢ (𝜑 → ((2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) ↔ Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ≤ ((((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) / 2)))
70	64, 69	mpbird 260	. . . . 5 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2))
71		reflcl 13929	. . . . . . . . . 10 ⊢ ((𝑍 / 𝑌) ∈ ℝ → (⌊‘(𝑍 / 𝑌)) ∈ ℝ)
72	38, 71	syl 18	. . . . . . . . 9 ⊢ (𝜑 → (⌊‘(𝑍 / 𝑌)) ∈ ℝ)
73		flle 13932	. . . . . . . . . 10 ⊢ ((𝑍 / 𝑌) ∈ ℝ → (⌊‘(𝑍 / 𝑌)) ≤ (𝑍 / 𝑌))
74	38, 73	syl 18	. . . . . . . . 9 ⊢ (𝜑 → (⌊‘(𝑍 / 𝑌)) ≤ (𝑍 / 𝑌))
75	21	simprd 501	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ≤ 𝑌)
76		1rp 13117	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℝ⁺
77	76	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℝ⁺)
78	77, 37, 27	lediv2d 13181	. . . . . . . . . . 11 ⊢ (𝜑 → (1 ≤ 𝑌 ↔ (𝑍 / 𝑌) ≤ (𝑍 / 1)))
79	75, 78	mpbid 235	. . . . . . . . . 10 ⊢ (𝜑 → (𝑍 / 𝑌) ≤ (𝑍 / 1))
80	36	recnd 11330	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑍 ∈ ℂ)
81	80	div1d 12078	. . . . . . . . . 10 ⊢ (𝜑 → (𝑍 / 1) = 𝑍)
82	79, 81	breqtrd 5131	. . . . . . . . 9 ⊢ (𝜑 → (𝑍 / 𝑌) ≤ 𝑍)
83	72, 38, 36, 74, 82	letrd 11460	. . . . . . . 8 ⊢ (𝜑 → (⌊‘(𝑍 / 𝑌)) ≤ 𝑍)
84	59, 27	logled 26948	. . . . . . . 8 ⊢ (𝜑 → ((⌊‘(𝑍 / 𝑌)) ≤ 𝑍 ↔ (log‘(⌊‘(𝑍 / 𝑌))) ≤ (log‘𝑍)))
85	83, 84	mpbid 235	. . . . . . 7 ⊢ (𝜑 → (log‘(⌊‘(𝑍 / 𝑌))) ≤ (log‘𝑍))
86	60, 28, 39, 85	leadd1dd 11923	. . . . . 6 ⊢ (𝜑 → ((log‘(⌊‘(𝑍 / 𝑌))) + 1) ≤ ((log‘𝑍) + 1))
87		0red 11304	. . . . . . . 8 ⊢ (𝜑 → 0 ∈ ℝ)
88		log1 26906	. . . . . . . . 9 ⊢ (log‘1) = 0
89	58	nnge1d 12379	. . . . . . . . . 10 ⊢ (𝜑 → 1 ≤ (⌊‘(𝑍 / 𝑌)))
90		logleb 26924	. . . . . . . . . . 11 ⊢ ((1 ∈ ℝ⁺ ∧ (⌊‘(𝑍 / 𝑌)) ∈ ℝ⁺) → (1 ≤ (⌊‘(𝑍 / 𝑌)) ↔ (log‘1) ≤ (log‘(⌊‘(𝑍 / 𝑌)))))
91	76, 59, 90	sylancr 599	. . . . . . . . . 10 ⊢ (𝜑 → (1 ≤ (⌊‘(𝑍 / 𝑌)) ↔ (log‘1) ≤ (log‘(⌊‘(𝑍 / 𝑌)))))
92	89, 91	mpbid 235	. . . . . . . . 9 ⊢ (𝜑 → (log‘1) ≤ (log‘(⌊‘(𝑍 / 𝑌))))
93	88, 92	eqbrtrrid 5141	. . . . . . . 8 ⊢ (𝜑 → 0 ≤ (log‘(⌊‘(𝑍 / 𝑌))))
94	60	lep1d 12241	. . . . . . . 8 ⊢ (𝜑 → (log‘(⌊‘(𝑍 / 𝑌))) ≤ ((log‘(⌊‘(𝑍 / 𝑌))) + 1))
95	87, 60, 61, 93, 94	letrd 11460	. . . . . . 7 ⊢ (𝜑 → 0 ≤ ((log‘(⌊‘(𝑍 / 𝑌))) + 1))
96	87, 61, 30, 95, 86	letrd 11460	. . . . . . 7 ⊢ (𝜑 → 0 ≤ ((log‘𝑍) + 1))
97	61, 30, 95, 96	le2sqd 14394	. . . . . 6 ⊢ (𝜑 → (((log‘(⌊‘(𝑍 / 𝑌))) + 1) ≤ ((log‘𝑍) + 1) ↔ (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) ≤ (((log‘𝑍) + 1)↑2)))
98	86, 97	mpbid 235	. . . . 5 ⊢ (𝜑 → (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) ≤ (((log‘𝑍) + 1)↑2))
99	10, 62, 31, 70, 98	letrd 11460	. . . 4 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘𝑍) + 1)↑2))
100	28	resqcld 14261	. . . . . . 7 ⊢ (𝜑 → ((log‘𝑍)↑2) ∈ ℝ)
101	65, 28	remulcld 11332	. . . . . . 7 ⊢ (𝜑 → (2 · (log‘𝑍)) ∈ ℝ)
102	100, 101	readdcld 11331	. . . . . 6 ⊢ (𝜑 → (((log‘𝑍)↑2) + (2 · (log‘𝑍))) ∈ ℝ)
103		loge 26907	. . . . . . 7 ⊢ (log‘e) = 1
104	40	rpge0d 13161	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ≤ (√‘𝑍))
105	41, 41, 104, 54	lemulge12d 12248	. . . . . . . . . 10 ⊢ (𝜑 → (√‘𝑍) ≤ ((√‘𝑍) · (√‘𝑍)))
106	27	rprege0d 13164	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑍 ∈ ℝ ∧ 0 ≤ 𝑍))
107		remsqsqrt 15416	. . . . . . . . . . 11 ⊢ ((𝑍 ∈ ℝ ∧ 0 ≤ 𝑍) → ((√‘𝑍) · (√‘𝑍)) = 𝑍)
108	106, 107	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → ((√‘𝑍) · (√‘𝑍)) = 𝑍)
109	105, 108	breqtrd 5131	. . . . . . . . 9 ⊢ (𝜑 → (√‘𝑍) ≤ 𝑍)
110	43, 41, 36, 53, 109	letrd 11460	. . . . . . . 8 ⊢ (𝜑 → e ≤ 𝑍)
111		epr 16369	. . . . . . . . 9 ⊢ e ∈ ℝ⁺
112		logleb 26924	. . . . . . . . 9 ⊢ ((e ∈ ℝ⁺ ∧ 𝑍 ∈ ℝ⁺) → (e ≤ 𝑍 ↔ (log‘e) ≤ (log‘𝑍)))
113	111, 27, 112	sylancr 599	. . . . . . . 8 ⊢ (𝜑 → (e ≤ 𝑍 ↔ (log‘e) ≤ (log‘𝑍)))
114	110, 113	mpbid 235	. . . . . . 7 ⊢ (𝜑 → (log‘e) ≤ (log‘𝑍))
115	103, 114	eqbrtrrid 5141	. . . . . 6 ⊢ (𝜑 → 1 ≤ (log‘𝑍))
116	39, 28, 102, 115	leadd2dd 11924	. . . . 5 ⊢ (𝜑 → ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + 1) ≤ ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + (log‘𝑍)))
117	28	recnd 11330	. . . . . 6 ⊢ (𝜑 → (log‘𝑍) ∈ ℂ)
118		binom21 14356	. . . . . 6 ⊢ ((log‘𝑍) ∈ ℂ → (((log‘𝑍) + 1)↑2) = ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + 1))
119	117, 118	syl 18	. . . . 5 ⊢ (𝜑 → (((log‘𝑍) + 1)↑2) = ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + 1))
120	117	sqvald 14279	. . . . . . 7 ⊢ (𝜑 → ((log‘𝑍)↑2) = ((log‘𝑍) · (log‘𝑍)))
121		df-3 12399	. . . . . . . . . 10 ⊢ 3 = (2 + 1)
122	121	oveq1i 7428	. . . . . . . . 9 ⊢ (3 · (log‘𝑍)) = ((2 + 1) · (log‘𝑍))
123		2cnd 12414	. . . . . . . . . 10 ⊢ (𝜑 → 2 ∈ ℂ)
124		1cnd 11295	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℂ)
125	123, 124, 117	adddird 11327	. . . . . . . . 9 ⊢ (𝜑 → ((2 + 1) · (log‘𝑍)) = ((2 · (log‘𝑍)) + (1 · (log‘𝑍))))
126	122, 125	eqtrid 2808	. . . . . . . 8 ⊢ (𝜑 → (3 · (log‘𝑍)) = ((2 · (log‘𝑍)) + (1 · (log‘𝑍))))
127	117	mullidd 11320	. . . . . . . . 9 ⊢ (𝜑 → (1 · (log‘𝑍)) = (log‘𝑍))
128	127	oveq2d 7434	. . . . . . . 8 ⊢ (𝜑 → ((2 · (log‘𝑍)) + (1 · (log‘𝑍))) = ((2 · (log‘𝑍)) + (log‘𝑍)))
129	126, 128	eqtr2d 2797	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝑍)) + (log‘𝑍)) = (3 · (log‘𝑍)))
130	120, 129	oveq12d 7436	. . . . . 6 ⊢ (𝜑 → (((log‘𝑍)↑2) + ((2 · (log‘𝑍)) + (log‘𝑍))) = (((log‘𝑍) · (log‘𝑍)) + (3 · (log‘𝑍))))
131	117	sqcld 14280	. . . . . . 7 ⊢ (𝜑 → ((log‘𝑍)↑2) ∈ ℂ)
132		2cn 12411	. . . . . . . 8 ⊢ 2 ∈ ℂ
133		mulcl 11277	. . . . . . . 8 ⊢ ((2 ∈ ℂ ∧ (log‘𝑍) ∈ ℂ) → (2 · (log‘𝑍)) ∈ ℂ)
134	132, 117, 133	sylancr 599	. . . . . . 7 ⊢ (𝜑 → (2 · (log‘𝑍)) ∈ ℂ)
135	131, 134, 117	addassd 11324	. . . . . 6 ⊢ (𝜑 → ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + (log‘𝑍)) = (((log‘𝑍)↑2) + ((2 · (log‘𝑍)) + (log‘𝑍))))
136		3cn 12417	. . . . . . . 8 ⊢ 3 ∈ ℂ
137	136	a1i 11	. . . . . . 7 ⊢ (𝜑 → 3 ∈ ℂ)
138	117, 137, 117	adddird 11327	. . . . . 6 ⊢ (𝜑 → (((log‘𝑍) + 3) · (log‘𝑍)) = (((log‘𝑍) · (log‘𝑍)) + (3 · (log‘𝑍))))
139	130, 135, 138	3eqtr4rd 2807	. . . . 5 ⊢ (𝜑 → (((log‘𝑍) + 3) · (log‘𝑍)) = ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + (log‘𝑍)))
140	116, 119, 139	3brtr4d 5137	. . . 4 ⊢ (𝜑 → (((log‘𝑍) + 1)↑2) ≤ (((log‘𝑍) + 3) · (log‘𝑍)))
141	10, 31, 35, 99, 140	letrd 11460	. . 3 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘𝑍) + 3) · (log‘𝑍)))
142	10, 35, 17	lemul2d 13201	. . 3 ⊢ (𝜑 → ((2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘𝑍) + 3) · (log‘𝑍)) ↔ (𝑈 · (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))) ≤ (𝑈 · (((log‘𝑍) + 3) · (log‘𝑍)))))
143	141, 142	mpbid 235	. 2 ⊢ (𝜑 → (𝑈 · (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))) ≤ (𝑈 · (((log‘𝑍) + 3) · (log‘𝑍))))
144	17	rpred 13157	. . . . . . . . 9 ⊢ (𝜑 → 𝑈 ∈ ℝ)
145	144	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → 𝑈 ∈ ℝ)
146	145	recnd 11330	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → 𝑈 ∈ ℂ)
147	6	recnd 11330	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → (log‘𝑛) ∈ ℂ)
148	5	rpcnne0d 13166	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0))
149		div23 11986	. . . . . . . 8 ⊢ ((𝑈 ∈ ℂ ∧ (log‘𝑛) ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0)) → ((𝑈 · (log‘𝑛)) / 𝑛) = ((𝑈 / 𝑛) · (log‘𝑛)))
150		divass 11985	. . . . . . . 8 ⊢ ((𝑈 ∈ ℂ ∧ (log‘𝑛) ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0)) → ((𝑈 · (log‘𝑛)) / 𝑛) = (𝑈 · ((log‘𝑛) / 𝑛)))
151	149, 150	eqtr3d 2798	. . . . . . 7 ⊢ ((𝑈 ∈ ℂ ∧ (log‘𝑛) ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0)) → ((𝑈 / 𝑛) · (log‘𝑛)) = (𝑈 · ((log‘𝑛) / 𝑛)))
152	146, 147, 148, 151	syl3anc 1398	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → ((𝑈 / 𝑛) · (log‘𝑛)) = (𝑈 · ((log‘𝑛) / 𝑛)))
153	152	sumeq2dv 15862	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛)) = Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))(𝑈 · ((log‘𝑛) / 𝑛)))
154	144	recnd 11330	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ ℂ)
155	7	recnd 11330	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → ((log‘𝑛) / 𝑛) ∈ ℂ)
156	2, 154, 155	fsummulc2 15943	. . . . 5 ⊢ (𝜑 → (𝑈 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) = Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))(𝑈 · ((log‘𝑛) / 𝑛)))
157	153, 156	eqtr4d 2799	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛)) = (𝑈 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)))
158	157	oveq2d 7434	. . 3 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛))) = (2 · (𝑈 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))))
159	8	recnd 11330	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ∈ ℂ)
160	123, 154, 159	mul12d 11512	. . 3 ⊢ (𝜑 → (2 · (𝑈 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))) = (𝑈 · (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))))
161	158, 160	eqtrd 2796	. 2 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛))) = (𝑈 · (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))))
162	34	recnd 11330	. . 3 ⊢ (𝜑 → ((log‘𝑍) + 3) ∈ ℂ)
163	154, 162, 117	mulassd 11325	. 2 ⊢ (𝜑 → ((𝑈 · ((log‘𝑍) + 3)) · (log‘𝑍)) = (𝑈 · (((log‘𝑍) + 3) · (log‘𝑍))))
164	143, 161, 163	3brtr4d 5137	1 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛))) ≤ ((𝑈 · ((log‘𝑍) + 3)) · (log‘𝑍)))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1570 ∈ wcel 2145 ≠ wne 2956 ∀wral 3077 ∃wrex 3087 class class class wbr 5103 ↦ cmpt 5186 ‘cfv 6537 (class class class)co 7418 ℂcc 11191 ℝcr 11192 0cc0 11193 1c1 11194 + caddc 11196 · cmul 11198 +∞cpnf 11333 < clt 11336 ≤ cle 11337 − cmin 11534 / cdiv 11966 ℕcn 12328 2c2 12390 3c3 12391 4c4 12392 cdc 12807 ℝ⁺crp 13113 (,)cioo 13469 [,)cico 13471 [,]cicc 13472 ...cfz 13632 ⌊cfl 13923 ↑cexp 14197 √csqrt 15393 abscabs 15394 Σcsu 15846 expce 16220 eceu 16221 logclog 26875 ψcchp 27413

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 7749 ax-inf2 9635 ax-cnex 11249 ax-resscn 11250 ax-1cn 11251 ax-icn 11252 ax-addcl 11253 ax-addrcl 11254 ax-mulcl 11255 ax-mulrcl 11256 ax-mulcom 11257 ax-addass 11258 ax-mulass 11259 ax-distr 11260 ax-i2m1 11261 ax-1ne0 11262 ax-1rid 11263 ax-rnegex 11264 ax-rrecex 11265 ax-cnre 11266 ax-pre-lttri 11267 ax-pre-lttrn 11268 ax-pre-ltadd 11269 ax-pre-mulgt0 11270 ax-pre-sup 11271 ax-addf 11272

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-tp 4589 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-iin 4954 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 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-isom 6546 df-riota 7375 df-ov 7421 df-oprab 7422 df-mpo 7423 df-of 7691 df-om 7876 df-1st 7999 df-2nd 8000 df-supp 8171 df-frecs 8292 df-wrecs 8323 df-recs 8372 df-rdg 8411 df-1o 8469 df-2o 8470 df-oadd 8473 df-er 8710 df-map 8842 df-pm 8843 df-ixp 8919 df-en 8967 df-dom 8968 df-sdom 8969 df-fin 8970 df-fsupp 9347 df-fi 9396 df-sup 9427 df-inf 9428 df-oi 9497 df-card 10013 df-pnf 11338 df-mnf 11339 df-xr 11340 df-ltxr 11341 df-le 11342 df-sub 11536 df-neg 11537 df-div 11967 df-nn 12329 df-2 12398 df-3 12399 df-4 12400 df-5 12401 df-6 12402 df-7 12403 df-8 12404 df-9 12405 df-n0 12600 df-xnn0 12673 df-z 12687 df-dec 12808 df-uz 12959 df-q 13069 df-rp 13114 df-xneg 13234 df-xadd 13235 df-xmul 13236 df-ioo 13473 df-ioc 13474 df-ico 13475 df-icc 13476 df-fz 13633 df-fzo 13782 df-fl 13925 df-mod 14003 df-seq 14138 df-exp 14198 df-fac 14411 df-bc 14440 df-hash 14468 df-shft 15213 df-cj 15259 df-re 15260 df-im 15261 df-sqrt 15395 df-abs 15396 df-limsup 15631 df-clim 15648 df-rlim 15649 df-sum 15847 df-ef 16226 df-e 16227 df-sin 16228 df-cos 16229 df-tan 16230 df-pi 16231 df-dvds 16416 df-struct 17318 df-sets 17335 df-slot 17353 df-ndx 17365 df-base 17381 df-ress 17402 df-plusg 17434 df-mulr 17435 df-starv 17436 df-sca 17437 df-vsca 17438 df-ip 17439 df-tset 17440 df-ple 17441 df-ds 17443 df-unif 17444 df-hom 17445 df-cco 17446 df-rest 17586 df-topn 17587 df-0g 17605 df-gsum 17606 df-topgen 17607 df-pt 17608 df-prds 17611 df-xrs 17667 df-qtop 17672 df-imas 17673 df-xps 17675 df-mre 17749 df-mrc 17750 df-acs 17752 df-mgm 18809 df-sgrp 18901 df-mnd 18917 df-submnd 18972 df-mulg 19271 df-cntz 19524 df-cmn 19989 df-psmet 21663 df-xmet 21664 df-met 21665 df-bl 21666 df-mopn 21667 df-fbas 21668 df-fg 21669 df-cnfld 21672 df-top 23205 df-topon 23222 df-topsp 23244 df-bases 23257 df-cld 23330 df-ntr 23331 df-cls 23332 df-nei 23409 df-lp 23447 df-perf 23448 df-cn 23538 df-cnp 23539 df-haus 23626 df-cmp 23698 df-tx 23874 df-hmeo 24067 df-fil 24158 df-fm 24250 df-flim 24251 df-flf 24252 df-xms 24632 df-ms 24633 df-tms 24634 df-cncf 25192 df-limc 26179 df-dv 26180 df-ulm 26697 df-log 26877 df-atan 27188 df-em 27313

This theorem is used by: pntlemo 27927

W3C validator