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 25295

Description: Lemma for pnt 25303. 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 11090	. . . . 5 ⊢ 2 ∈ ℝ
2		fzfid 12772	. . . . . 6 ⊢ (𝜑 → (1...(⌊‘(𝑍 / 𝑌))) ∈ Fin)
3		elfznn 12370	. . . . . . . . . 10 ⊢ (𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌))) → 𝑛 ∈ ℕ)
4	3	adantl 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → 𝑛 ∈ ℕ)
5	4	nnrpd 11870	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → 𝑛 ∈ ℝ⁺)
6	5	relogcld 24369	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → (log‘𝑛) ∈ ℝ)
7	6, 4	nndivred 11069	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → ((log‘𝑛) / 𝑛) ∈ ℝ)
8	2, 7	fsumrecl 14465	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ∈ ℝ)
9		remulcl 10021	. . . . 5 ⊢ ((2 ∈ ℝ ∧ Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ∈ ℝ) → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ∈ ℝ)
10	1, 8, 9	sylancr 695	. . . 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 25286	. . . . . . . 8 ⊢ (𝜑 → (𝑍 ∈ ℝ⁺ ∧ (1 < 𝑍 ∧ e ≤ (√‘𝑍) ∧ (√‘𝑍) ≤ (𝑍 / 𝑌)) ∧ ((4 / (𝐿 · 𝐸)) ≤ (√‘𝑍) ∧ (((log‘𝑋) / (log‘𝐾)) + 2) ≤ (((log‘𝑍) / (log‘𝐾)) / 4) ∧ ((𝑈 · 3) + 𝐶) ≤ (((𝑈 − 𝐸) · ((𝐿 · (𝐸↑2)) / (;32 · 𝐵))) · (log‘𝑍)))))
27	26	simp1d 1073	. . . . . . 7 ⊢ (𝜑 → 𝑍 ∈ ℝ⁺)
28	27	relogcld 24369	. . . . . 6 ⊢ (𝜑 → (log‘𝑍) ∈ ℝ)
29		peano2re 10209	. . . . . 6 ⊢ ((log‘𝑍) ∈ ℝ → ((log‘𝑍) + 1) ∈ ℝ)
30	28, 29	syl 17	. . . . 5 ⊢ (𝜑 → ((log‘𝑍) + 1) ∈ ℝ)
31	30	resqcld 13035	. . . 4 ⊢ (𝜑 → (((log‘𝑍) + 1)↑2) ∈ ℝ)
32		3re 11094	. . . . . 6 ⊢ 3 ∈ ℝ
33		readdcl 10019	. . . . . 6 ⊢ (((log‘𝑍) ∈ ℝ ∧ 3 ∈ ℝ) → ((log‘𝑍) + 3) ∈ ℝ)
34	28, 32, 33	sylancl 694	. . . . 5 ⊢ (𝜑 → ((log‘𝑍) + 3) ∈ ℝ)
35	34, 28	remulcld 10070	. . . 4 ⊢ (𝜑 → (((log‘𝑍) + 3) · (log‘𝑍)) ∈ ℝ)
36	27	rpred 11872	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑍 ∈ ℝ)
37	21	simpld 475	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑌 ∈ ℝ⁺)
38	36, 37	rerpdivcld 11903	. . . . . . . . . 10 ⊢ (𝜑 → (𝑍 / 𝑌) ∈ ℝ)
39		1red 10055	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ∈ ℝ)
40	27	rpsqrtcld 14150	. . . . . . . . . . . 12 ⊢ (𝜑 → (√‘𝑍) ∈ ℝ⁺)
41	40	rpred 11872	. . . . . . . . . . 11 ⊢ (𝜑 → (√‘𝑍) ∈ ℝ)
42		ere 14819	. . . . . . . . . . . . 13 ⊢ e ∈ ℝ
43	42	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → e ∈ ℝ)
44		1re 10039	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℝ
45		1lt2 11194	. . . . . . . . . . . . . . 15 ⊢ 1 < 2
46		egt2lt3 14934	. . . . . . . . . . . . . . . 16 ⊢ (2 < e ∧ e < 3)
47	46	simpli 474	. . . . . . . . . . . . . . 15 ⊢ 2 < e
48	44, 1, 42	lttri 10163	. . . . . . . . . . . . . . 15 ⊢ ((1 < 2 ∧ 2 < e) → 1 < e)
49	45, 47, 48	mp2an 708	. . . . . . . . . . . . . 14 ⊢ 1 < e
50	44, 42, 49	ltleii 10160	. . . . . . . . . . . . 13 ⊢ 1 ≤ e
51	50	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ≤ e)
52	26	simp2d 1074	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 < 𝑍 ∧ e ≤ (√‘𝑍) ∧ (√‘𝑍) ≤ (𝑍 / 𝑌)))
53	52	simp2d 1074	. . . . . . . . . . . 12 ⊢ (𝜑 → e ≤ (√‘𝑍))
54	39, 43, 41, 51, 53	letrd 10194	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ≤ (√‘𝑍))
55	52	simp3d 1075	. . . . . . . . . . 11 ⊢ (𝜑 → (√‘𝑍) ≤ (𝑍 / 𝑌))
56	39, 41, 38, 54, 55	letrd 10194	. . . . . . . . . 10 ⊢ (𝜑 → 1 ≤ (𝑍 / 𝑌))
57		flge1nn 12622	. . . . . . . . . 10 ⊢ (((𝑍 / 𝑌) ∈ ℝ ∧ 1 ≤ (𝑍 / 𝑌)) → (⌊‘(𝑍 / 𝑌)) ∈ ℕ)
58	38, 56, 57	syl2anc 693	. . . . . . . . 9 ⊢ (𝜑 → (⌊‘(𝑍 / 𝑌)) ∈ ℕ)
59	58	nnrpd 11870	. . . . . . . 8 ⊢ (𝜑 → (⌊‘(𝑍 / 𝑌)) ∈ ℝ⁺)
60	59	relogcld 24369	. . . . . . 7 ⊢ (𝜑 → (log‘(⌊‘(𝑍 / 𝑌))) ∈ ℝ)
61	60, 39	readdcld 10069	. . . . . 6 ⊢ (𝜑 → ((log‘(⌊‘(𝑍 / 𝑌))) + 1) ∈ ℝ)
62	61	resqcld 13035	. . . . 5 ⊢ (𝜑 → (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) ∈ ℝ)
63		logdivbnd 25245	. . . . . . 7 ⊢ ((⌊‘(𝑍 / 𝑌)) ∈ ℕ → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ≤ ((((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) / 2))
64	58, 63	syl 17	. . . . . 6 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ≤ ((((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) / 2))
65	1	a1i 11	. . . . . . 7 ⊢ (𝜑 → 2 ∈ ℝ)
66		2pos 11112	. . . . . . . 8 ⊢ 0 < 2
67	66	a1i 11	. . . . . . 7 ⊢ (𝜑 → 0 < 2)
68		lemuldiv2 10904	. . . . . . 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 1330	. . . . . 6 ⊢ (𝜑 → ((2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) ↔ Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ≤ ((((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) / 2)))
70	64, 69	mpbird 247	. . . . 5 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2))
71		reflcl 12597	. . . . . . . . . 10 ⊢ ((𝑍 / 𝑌) ∈ ℝ → (⌊‘(𝑍 / 𝑌)) ∈ ℝ)
72	38, 71	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (⌊‘(𝑍 / 𝑌)) ∈ ℝ)
73		flle 12600	. . . . . . . . . 10 ⊢ ((𝑍 / 𝑌) ∈ ℝ → (⌊‘(𝑍 / 𝑌)) ≤ (𝑍 / 𝑌))
74	38, 73	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (⌊‘(𝑍 / 𝑌)) ≤ (𝑍 / 𝑌))
75	21	simprd 479	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ≤ 𝑌)
76		1rp 11836	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℝ⁺
77	76	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℝ⁺)
78	77, 37, 27	lediv2d 11896	. . . . . . . . . . 11 ⊢ (𝜑 → (1 ≤ 𝑌 ↔ (𝑍 / 𝑌) ≤ (𝑍 / 1)))
79	75, 78	mpbid 222	. . . . . . . . . 10 ⊢ (𝜑 → (𝑍 / 𝑌) ≤ (𝑍 / 1))
80	36	recnd 10068	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑍 ∈ ℂ)
81	80	div1d 10793	. . . . . . . . . 10 ⊢ (𝜑 → (𝑍 / 1) = 𝑍)
82	79, 81	breqtrd 4679	. . . . . . . . 9 ⊢ (𝜑 → (𝑍 / 𝑌) ≤ 𝑍)
83	72, 38, 36, 74, 82	letrd 10194	. . . . . . . 8 ⊢ (𝜑 → (⌊‘(𝑍 / 𝑌)) ≤ 𝑍)
84	59, 27	logled 24373	. . . . . . . 8 ⊢ (𝜑 → ((⌊‘(𝑍 / 𝑌)) ≤ 𝑍 ↔ (log‘(⌊‘(𝑍 / 𝑌))) ≤ (log‘𝑍)))
85	83, 84	mpbid 222	. . . . . . 7 ⊢ (𝜑 → (log‘(⌊‘(𝑍 / 𝑌))) ≤ (log‘𝑍))
86	60, 28, 39, 85	leadd1dd 10641	. . . . . 6 ⊢ (𝜑 → ((log‘(⌊‘(𝑍 / 𝑌))) + 1) ≤ ((log‘𝑍) + 1))
87		0red 10041	. . . . . . . 8 ⊢ (𝜑 → 0 ∈ ℝ)
88		log1 24332	. . . . . . . . 9 ⊢ (log‘1) = 0
89	58	nnge1d 11063	. . . . . . . . . 10 ⊢ (𝜑 → 1 ≤ (⌊‘(𝑍 / 𝑌)))
90		logleb 24349	. . . . . . . . . . 11 ⊢ ((1 ∈ ℝ⁺ ∧ (⌊‘(𝑍 / 𝑌)) ∈ ℝ⁺) → (1 ≤ (⌊‘(𝑍 / 𝑌)) ↔ (log‘1) ≤ (log‘(⌊‘(𝑍 / 𝑌)))))
91	76, 59, 90	sylancr 695	. . . . . . . . . 10 ⊢ (𝜑 → (1 ≤ (⌊‘(𝑍 / 𝑌)) ↔ (log‘1) ≤ (log‘(⌊‘(𝑍 / 𝑌)))))
92	89, 91	mpbid 222	. . . . . . . . 9 ⊢ (𝜑 → (log‘1) ≤ (log‘(⌊‘(𝑍 / 𝑌))))
93	88, 92	syl5eqbrr 4689	. . . . . . . 8 ⊢ (𝜑 → 0 ≤ (log‘(⌊‘(𝑍 / 𝑌))))
94	60	lep1d 10955	. . . . . . . 8 ⊢ (𝜑 → (log‘(⌊‘(𝑍 / 𝑌))) ≤ ((log‘(⌊‘(𝑍 / 𝑌))) + 1))
95	87, 60, 61, 93, 94	letrd 10194	. . . . . . 7 ⊢ (𝜑 → 0 ≤ ((log‘(⌊‘(𝑍 / 𝑌))) + 1))
96	87, 61, 30, 95, 86	letrd 10194	. . . . . . 7 ⊢ (𝜑 → 0 ≤ ((log‘𝑍) + 1))
97	61, 30, 95, 96	le2sqd 13044	. . . . . 6 ⊢ (𝜑 → (((log‘(⌊‘(𝑍 / 𝑌))) + 1) ≤ ((log‘𝑍) + 1) ↔ (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) ≤ (((log‘𝑍) + 1)↑2)))
98	86, 97	mpbid 222	. . . . 5 ⊢ (𝜑 → (((log‘(⌊‘(𝑍 / 𝑌))) + 1)↑2) ≤ (((log‘𝑍) + 1)↑2))
99	10, 62, 31, 70, 98	letrd 10194	. . . 4 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘𝑍) + 1)↑2))
100	28	resqcld 13035	. . . . . . 7 ⊢ (𝜑 → ((log‘𝑍)↑2) ∈ ℝ)
101	65, 28	remulcld 10070	. . . . . . 7 ⊢ (𝜑 → (2 · (log‘𝑍)) ∈ ℝ)
102	100, 101	readdcld 10069	. . . . . 6 ⊢ (𝜑 → (((log‘𝑍)↑2) + (2 · (log‘𝑍))) ∈ ℝ)
103		loge 24333	. . . . . . 7 ⊢ (log‘e) = 1
104	40	rpge0d 11876	. . . . . . . . . . 11 ⊢ (𝜑 → 0 ≤ (√‘𝑍))
105	41, 41, 104, 54	lemulge12d 10962	. . . . . . . . . 10 ⊢ (𝜑 → (√‘𝑍) ≤ ((√‘𝑍) · (√‘𝑍)))
106	27	rprege0d 11879	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑍 ∈ ℝ ∧ 0 ≤ 𝑍))
107		remsqsqrt 13997	. . . . . . . . . . 11 ⊢ ((𝑍 ∈ ℝ ∧ 0 ≤ 𝑍) → ((√‘𝑍) · (√‘𝑍)) = 𝑍)
108	106, 107	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ((√‘𝑍) · (√‘𝑍)) = 𝑍)
109	105, 108	breqtrd 4679	. . . . . . . . 9 ⊢ (𝜑 → (√‘𝑍) ≤ 𝑍)
110	43, 41, 36, 53, 109	letrd 10194	. . . . . . . 8 ⊢ (𝜑 → e ≤ 𝑍)
111		epr 14936	. . . . . . . . 9 ⊢ e ∈ ℝ⁺
112		logleb 24349	. . . . . . . . 9 ⊢ ((e ∈ ℝ⁺ ∧ 𝑍 ∈ ℝ⁺) → (e ≤ 𝑍 ↔ (log‘e) ≤ (log‘𝑍)))
113	111, 27, 112	sylancr 695	. . . . . . . 8 ⊢ (𝜑 → (e ≤ 𝑍 ↔ (log‘e) ≤ (log‘𝑍)))
114	110, 113	mpbid 222	. . . . . . 7 ⊢ (𝜑 → (log‘e) ≤ (log‘𝑍))
115	103, 114	syl5eqbrr 4689	. . . . . 6 ⊢ (𝜑 → 1 ≤ (log‘𝑍))
116	39, 28, 102, 115	leadd2dd 10642	. . . . 5 ⊢ (𝜑 → ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + 1) ≤ ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + (log‘𝑍)))
117	28	recnd 10068	. . . . . 6 ⊢ (𝜑 → (log‘𝑍) ∈ ℂ)
118		binom21 12980	. . . . . 6 ⊢ ((log‘𝑍) ∈ ℂ → (((log‘𝑍) + 1)↑2) = ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + 1))
119	117, 118	syl 17	. . . . 5 ⊢ (𝜑 → (((log‘𝑍) + 1)↑2) = ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + 1))
120	117	sqvald 13005	. . . . . . 7 ⊢ (𝜑 → ((log‘𝑍)↑2) = ((log‘𝑍) · (log‘𝑍)))
121		df-3 11080	. . . . . . . . . 10 ⊢ 3 = (2 + 1)
122	121	oveq1i 6660	. . . . . . . . 9 ⊢ (3 · (log‘𝑍)) = ((2 + 1) · (log‘𝑍))
123		2cnd 11093	. . . . . . . . . 10 ⊢ (𝜑 → 2 ∈ ℂ)
124		1cnd 10056	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℂ)
125	123, 124, 117	adddird 10065	. . . . . . . . 9 ⊢ (𝜑 → ((2 + 1) · (log‘𝑍)) = ((2 · (log‘𝑍)) + (1 · (log‘𝑍))))
126	122, 125	syl5eq 2668	. . . . . . . 8 ⊢ (𝜑 → (3 · (log‘𝑍)) = ((2 · (log‘𝑍)) + (1 · (log‘𝑍))))
127	117	mulid2d 10058	. . . . . . . . 9 ⊢ (𝜑 → (1 · (log‘𝑍)) = (log‘𝑍))
128	127	oveq2d 6666	. . . . . . . 8 ⊢ (𝜑 → ((2 · (log‘𝑍)) + (1 · (log‘𝑍))) = ((2 · (log‘𝑍)) + (log‘𝑍)))
129	126, 128	eqtr2d 2657	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝑍)) + (log‘𝑍)) = (3 · (log‘𝑍)))
130	120, 129	oveq12d 6668	. . . . . 6 ⊢ (𝜑 → (((log‘𝑍)↑2) + ((2 · (log‘𝑍)) + (log‘𝑍))) = (((log‘𝑍) · (log‘𝑍)) + (3 · (log‘𝑍))))
131	117	sqcld 13006	. . . . . . 7 ⊢ (𝜑 → ((log‘𝑍)↑2) ∈ ℂ)
132		2cn 11091	. . . . . . . 8 ⊢ 2 ∈ ℂ
133		mulcl 10020	. . . . . . . 8 ⊢ ((2 ∈ ℂ ∧ (log‘𝑍) ∈ ℂ) → (2 · (log‘𝑍)) ∈ ℂ)
134	132, 117, 133	sylancr 695	. . . . . . 7 ⊢ (𝜑 → (2 · (log‘𝑍)) ∈ ℂ)
135	131, 134, 117	addassd 10062	. . . . . 6 ⊢ (𝜑 → ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + (log‘𝑍)) = (((log‘𝑍)↑2) + ((2 · (log‘𝑍)) + (log‘𝑍))))
136		3cn 11095	. . . . . . . 8 ⊢ 3 ∈ ℂ
137	136	a1i 11	. . . . . . 7 ⊢ (𝜑 → 3 ∈ ℂ)
138	117, 137, 117	adddird 10065	. . . . . 6 ⊢ (𝜑 → (((log‘𝑍) + 3) · (log‘𝑍)) = (((log‘𝑍) · (log‘𝑍)) + (3 · (log‘𝑍))))
139	130, 135, 138	3eqtr4rd 2667	. . . . 5 ⊢ (𝜑 → (((log‘𝑍) + 3) · (log‘𝑍)) = ((((log‘𝑍)↑2) + (2 · (log‘𝑍))) + (log‘𝑍)))
140	116, 119, 139	3brtr4d 4685	. . . 4 ⊢ (𝜑 → (((log‘𝑍) + 1)↑2) ≤ (((log‘𝑍) + 3) · (log‘𝑍)))
141	10, 31, 35, 99, 140	letrd 10194	. . 3 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘𝑍) + 3) · (log‘𝑍)))
142	10, 35, 17	lemul2d 11916	. . 3 ⊢ (𝜑 → ((2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) ≤ (((log‘𝑍) + 3) · (log‘𝑍)) ↔ (𝑈 · (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))) ≤ (𝑈 · (((log‘𝑍) + 3) · (log‘𝑍)))))
143	141, 142	mpbid 222	. 2 ⊢ (𝜑 → (𝑈 · (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))) ≤ (𝑈 · (((log‘𝑍) + 3) · (log‘𝑍))))
144	17	rpred 11872	. . . . . . . . 9 ⊢ (𝜑 → 𝑈 ∈ ℝ)
145	144	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → 𝑈 ∈ ℝ)
146	145	recnd 10068	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → 𝑈 ∈ ℂ)
147	6	recnd 10068	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → (log‘𝑛) ∈ ℂ)
148	5	rpcnne0d 11881	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0))
149		div23 10704	. . . . . . . 8 ⊢ ((𝑈 ∈ ℂ ∧ (log‘𝑛) ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0)) → ((𝑈 · (log‘𝑛)) / 𝑛) = ((𝑈 / 𝑛) · (log‘𝑛)))
150		divass 10703	. . . . . . . 8 ⊢ ((𝑈 ∈ ℂ ∧ (log‘𝑛) ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0)) → ((𝑈 · (log‘𝑛)) / 𝑛) = (𝑈 · ((log‘𝑛) / 𝑛)))
151	149, 150	eqtr3d 2658	. . . . . . 7 ⊢ ((𝑈 ∈ ℂ ∧ (log‘𝑛) ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0)) → ((𝑈 / 𝑛) · (log‘𝑛)) = (𝑈 · ((log‘𝑛) / 𝑛)))
152	146, 147, 148, 151	syl3anc 1326	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → ((𝑈 / 𝑛) · (log‘𝑛)) = (𝑈 · ((log‘𝑛) / 𝑛)))
153	152	sumeq2dv 14433	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛)) = Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))(𝑈 · ((log‘𝑛) / 𝑛)))
154	144	recnd 10068	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ ℂ)
155	7	recnd 10068	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))) → ((log‘𝑛) / 𝑛) ∈ ℂ)
156	2, 154, 155	fsummulc2 14516	. . . . 5 ⊢ (𝜑 → (𝑈 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)) = Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))(𝑈 · ((log‘𝑛) / 𝑛)))
157	153, 156	eqtr4d 2659	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛)) = (𝑈 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛)))
158	157	oveq2d 6666	. . 3 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛))) = (2 · (𝑈 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))))
159	8	recnd 10068	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛) ∈ ℂ)
160	123, 154, 159	mul12d 10245	. . 3 ⊢ (𝜑 → (2 · (𝑈 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))) = (𝑈 · (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))))
161	158, 160	eqtrd 2656	. 2 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛))) = (𝑈 · (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((log‘𝑛) / 𝑛))))
162	34	recnd 10068	. . 3 ⊢ (𝜑 → ((log‘𝑍) + 3) ∈ ℂ)
163	154, 162, 117	mulassd 10063	. 2 ⊢ (𝜑 → ((𝑈 · ((log‘𝑍) + 3)) · (log‘𝑍)) = (𝑈 · (((log‘𝑍) + 3) · (log‘𝑍))))
164	143, 161, 163	3brtr4d 4685	1 ⊢ (𝜑 → (2 · Σ𝑛 ∈ (1...(⌊‘(𝑍 / 𝑌)))((𝑈 / 𝑛) · (log‘𝑛))) ≤ ((𝑈 · ((log‘𝑍) + 3)) · (log‘𝑍)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 196 ∧ wa 384 ∧ w3a 1037 = wceq 1483 ∈ wcel 1990 ≠ wne 2794 ∀wral 2912 ∃wrex 2913 class class class wbr 4653 ↦ cmpt 4729 ‘cfv 5888 (class class class)co 6650 ℂcc 9934 ℝcr 9935 0cc0 9936 1c1 9937 + caddc 9939 · cmul 9941 +∞cpnf 10071 < clt 10074 ≤ cle 10075 − cmin 10266 / cdiv 10684 ℕcn 11020 2c2 11070 3c3 11071 4c4 11072 cdc 11493 ℝ⁺crp 11832 (,)cioo 12175 [,)cico 12177 [,]cicc 12178 ...cfz 12326 ⌊cfl 12591 ↑cexp 12860 √csqrt 13973 abscabs 13974 Σcsu 14416 expce 14792 eceu 14793 logclog 24301 ψcchp 24819

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1722 ax-4 1737 ax-5 1839 ax-6 1888 ax-7 1935 ax-8 1992 ax-9 1999 ax-10 2019 ax-11 2034 ax-12 2047 ax-13 2246 ax-ext 2602 ax-rep 4771 ax-sep 4781 ax-nul 4789 ax-pow 4843 ax-pr 4906 ax-un 6949 ax-inf2 8538 ax-cnex 9992 ax-resscn 9993 ax-1cn 9994 ax-icn 9995 ax-addcl 9996 ax-addrcl 9997 ax-mulcl 9998 ax-mulrcl 9999 ax-mulcom 10000 ax-addass 10001 ax-mulass 10002 ax-distr 10003 ax-i2m1 10004 ax-1ne0 10005 ax-1rid 10006 ax-rnegex 10007 ax-rrecex 10008 ax-cnre 10009 ax-pre-lttri 10010 ax-pre-lttrn 10011 ax-pre-ltadd 10012 ax-pre-mulgt0 10013 ax-pre-sup 10014 ax-addf 10015 ax-mulf 10016

This theorem depends on definitions: df-bi 197 df-or 385 df-an 386 df-3or 1038 df-3an 1039 df-tru 1486 df-fal 1489 df-ex 1705 df-nf 1710 df-sb 1881 df-eu 2474 df-mo 2475 df-clab 2609 df-cleq 2615 df-clel 2618 df-nfc 2753 df-ne 2795 df-nel 2898 df-ral 2917 df-rex 2918 df-reu 2919 df-rmo 2920 df-rab 2921 df-v 3202 df-sbc 3436 df-csb 3534 df-dif 3577 df-un 3579 df-in 3581 df-ss 3588 df-pss 3590 df-nul 3916 df-if 4087 df-pw 4160 df-sn 4178 df-pr 4180 df-tp 4182 df-op 4184 df-uni 4437 df-int 4476 df-iun 4522 df-iin 4523 df-br 4654 df-opab 4713 df-mpt 4730 df-tr 4753 df-id 5024 df-eprel 5029 df-po 5035 df-so 5036 df-fr 5073 df-se 5074 df-we 5075 df-xp 5120 df-rel 5121 df-cnv 5122 df-co 5123 df-dm 5124 df-rn 5125 df-res 5126 df-ima 5127 df-pred 5680 df-ord 5726 df-on 5727 df-lim 5728 df-suc 5729 df-iota 5851 df-fun 5890 df-fn 5891 df-f 5892 df-f1 5893 df-fo 5894 df-f1o 5895 df-fv 5896 df-isom 5897 df-riota 6611 df-ov 6653 df-oprab 6654 df-mpt2 6655 df-of 6897 df-om 7066 df-1st 7168 df-2nd 7169 df-supp 7296 df-wrecs 7407 df-recs 7468 df-rdg 7506 df-1o 7560 df-2o 7561 df-oadd 7564 df-er 7742 df-map 7859 df-pm 7860 df-ixp 7909 df-en 7956 df-dom 7957 df-sdom 7958 df-fin 7959 df-fsupp 8276 df-fi 8317 df-sup 8348 df-inf 8349 df-oi 8415 df-card 8765 df-cda 8990 df-pnf 10076 df-mnf 10077 df-xr 10078 df-ltxr 10079 df-le 10080 df-sub 10268 df-neg 10269 df-div 10685 df-nn 11021 df-2 11079 df-3 11080 df-4 11081 df-5 11082 df-6 11083 df-7 11084 df-8 11085 df-9 11086 df-n0 11293 df-z 11378 df-dec 11494 df-uz 11688 df-q 11789 df-rp 11833 df-xneg 11946 df-xadd 11947 df-xmul 11948 df-ioo 12179 df-ioc 12180 df-ico 12181 df-icc 12182 df-fz 12327 df-fzo 12466 df-fl 12593 df-mod 12669 df-seq 12802 df-exp 12861 df-fac 13061 df-bc 13090 df-hash 13118 df-shft 13807 df-cj 13839 df-re 13840 df-im 13841 df-sqrt 13975 df-abs 13976 df-limsup 14202 df-clim 14219 df-rlim 14220 df-sum 14417 df-ef 14798 df-e 14799 df-sin 14800 df-cos 14801 df-pi 14803 df-struct 15859 df-ndx 15860 df-slot 15861 df-base 15863 df-sets 15864 df-ress 15865 df-plusg 15954 df-mulr 15955 df-starv 15956 df-sca 15957 df-vsca 15958 df-ip 15959 df-tset 15960 df-ple 15961 df-ds 15964 df-unif 15965 df-hom 15966 df-cco 15967 df-rest 16083 df-topn 16084 df-0g 16102 df-gsum 16103 df-topgen 16104 df-pt 16105 df-prds 16108 df-xrs 16162 df-qtop 16167 df-imas 16168 df-xps 16170 df-mre 16246 df-mrc 16247 df-acs 16249 df-mgm 17242 df-sgrp 17284 df-mnd 17295 df-submnd 17336 df-mulg 17541 df-cntz 17750 df-cmn 18195 df-psmet 19738 df-xmet 19739 df-met 19740 df-bl 19741 df-mopn 19742 df-fbas 19743 df-fg 19744 df-cnfld 19747 df-top 20699 df-topon 20716 df-topsp 20737 df-bases 20750 df-cld 20823 df-ntr 20824 df-cls 20825 df-nei 20902 df-lp 20940 df-perf 20941 df-cn 21031 df-cnp 21032 df-haus 21119 df-tx 21365 df-hmeo 21558 df-fil 21650 df-fm 21742 df-flim 21743 df-flf 21744 df-xms 22125 df-ms 22126 df-tms 22127 df-cncf 22681 df-limc 23630 df-dv 23631 df-log 24303 df-em 24719

This theorem is referenced by: pntlemo 25296

W3C validator