pntrlog2bndlem5 - Metamath Proof Explorer

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

Theorem pntrlog2bndlem5 27901

Description: Lemma for pntrlog2bnd 27904. Bound on the difference between the Selberg function and its approximation, inside a sum. (Contributed by Mario Carneiro, 31-May-2016.)

**Hypotheses**
Ref	Expression
pntsval.1	⊢ 𝑆 = (𝑎 ∈ ℝ ↦ Σ𝑖 ∈ (1...(⌊‘𝑎))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑎 / 𝑖)))))
pntrlog2bnd.r	⊢ 𝑅 = (𝑎 ∈ ℝ⁺ ↦ ((ψ‘𝑎) − 𝑎))
pntrlog2bnd.t	⊢ 𝑇 = (𝑎 ∈ ℝ ↦ if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0))
pntrlog2bndlem5.1	⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
pntrlog2bndlem5.2	⊢ (𝜑 → ∀𝑦 ∈ ℝ⁺ (abs‘((𝑅‘𝑦) / 𝑦)) ≤ 𝐵)

**Assertion**
Ref	Expression
pntrlog2bndlem5	⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)) ∈ ≤𝑂(1))

Distinct variable groups: 𝑖,𝑎,𝑛,𝑥,𝑦 𝐵,𝑛,𝑥,𝑦 𝜑,𝑛,𝑥 𝑆,𝑛,𝑥,𝑦 𝑅,𝑛,𝑥,𝑦 𝑇,𝑛 Allowed substitution hints: 𝜑(𝑦, 𝑖, 𝑎) 𝐵(𝑖, 𝑎) 𝑅(𝑖, 𝑎) 𝑆(𝑖, 𝑎) 𝑇(𝑥, 𝑦, 𝑖, 𝑎)

**Proof of Theorem pntrlog2bndlem5**
Step	Hyp	Ref	Expression
1		elioore 13499	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (1(,)+∞) → 𝑥 ∈ ℝ)
2	1	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ)
3		1rp 13117	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℝ⁺
4	3	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ⁺)
5		1red 11302	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ)
6		eliooord 13529	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(,)+∞) → (1 < 𝑥 ∧ 𝑥 < +∞))
7	6	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 < 𝑥 ∧ 𝑥 < +∞))
8	7	simpld 500	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 < 𝑥)
9	5, 2, 8	ltled 11451	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ≤ 𝑥)
10	2, 4, 9	rpgecld 13196	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ⁺)
11		pntrlog2bnd.r	. . . . . . . . . . . . 13 ⊢ 𝑅 = (𝑎 ∈ ℝ⁺ ↦ ((ψ‘𝑎) − 𝑎))
12	11	pntrf 27883	. . . . . . . . . . . 12 ⊢ 𝑅:ℝ⁺⟶ℝ
13	12	ffvelcdmi 7081	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℝ⁺ → (𝑅‘𝑥) ∈ ℝ)
14	10, 13	syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (𝑅‘𝑥) ∈ ℝ)
15	14	recnd 11330	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (𝑅‘𝑥) ∈ ℂ)
16	15	abscld 15599	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (abs‘(𝑅‘𝑥)) ∈ ℝ)
17	16	recnd 11330	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (abs‘(𝑅‘𝑥)) ∈ ℂ)
18	10	relogcld 26944	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ)
19	18	recnd 11330	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℂ)
20	17, 19	mulcld 11322	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅‘𝑥)) · (log‘𝑥)) ∈ ℂ)
21		2cnd 12414	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℂ)
22	2, 8	rplogcld 26950	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ⁺)
23	22	rpne0d 13162	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ≠ 0)
24	21, 19, 23	divcld 12086	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 / (log‘𝑥)) ∈ ℂ)
25		fzfid 14109	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1...(⌊‘𝑥)) ∈ Fin)
26	10	adantr 486	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ⁺)
27		elfznn 13680	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
28	27	adantl 487	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
29	28	nnrpd 13155	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ⁺)
30	26, 29	rpdivcld 13174	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ⁺)
31	12	ffvelcdmi 7081	. . . . . . . . . . . . 13 ⊢ ((𝑥 / 𝑛) ∈ ℝ⁺ → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
32	30, 31	syl 18	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
33	32	recnd 11330	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℂ)
34	33	abscld 15599	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℝ)
35	29	relogcld 26944	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ∈ ℝ)
36		1red 11302	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℝ)
37	35, 36	readdcld 11331	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((log‘𝑛) + 1) ∈ ℝ)
38	34, 37	remulcld 11332	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℝ)
39	38	recnd 11330	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℂ)
40	25, 39	fsumcl 15892	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℂ)
41	24, 40	mulcld 11322	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) ∈ ℂ)
42	20, 41	subcld 11662	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) ∈ ℂ)
43	34	recnd 11330	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℂ)
44	25, 43	fsumcl 15892	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℂ)
45	24, 44	mulcld 11322	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) ∈ ℂ)
46	2	recnd 11330	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℂ)
47	10	rpne0d 13162	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ≠ 0)
48	42, 45, 46, 47	divdird 12124	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) / 𝑥) = (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥)))
49	16, 18	remulcld 11332	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅‘𝑥)) · (log‘𝑥)) ∈ ℝ)
50	49	recnd 11330	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅‘𝑥)) · (log‘𝑥)) ∈ ℂ)
51	50, 41, 45	subsubd 11690	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))))) = ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))))
52	24, 40, 44	subdid 11765	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) = (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))))
53	25, 39, 43	fsumsub 15947	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))))
54	37	recnd 11330	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((log‘𝑛) + 1) ∈ ℂ)
55		1cnd 11295	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℂ)
56	43, 54, 55	subdid 11765	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (((log‘𝑛) + 1) − 1)) = (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − ((abs‘(𝑅‘(𝑥 / 𝑛))) · 1)))
57	35	recnd 11330	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ∈ ℂ)
58	57, 55	pncand 11663	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((log‘𝑛) + 1) − 1) = (log‘𝑛))
59	58	oveq2d 7434	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (((log‘𝑛) + 1) − 1)) = ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
60	43	mulridd 11319	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · 1) = (abs‘(𝑅‘(𝑥 / 𝑛))))
61	60	oveq2d 7434	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − ((abs‘(𝑅‘(𝑥 / 𝑛))) · 1)) = (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))))
62	56, 59, 61	3eqtr3rd 2805	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
63	62	sumeq2dv 15862	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
64	53, 63	eqtr3d 2798	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
65	64	oveq2d 7434	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) = ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
66	52, 65	eqtr3d 2798	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) = ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
67	66	oveq2d 7434	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))))) = (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
68	51, 67	eqtr3d 2798	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) = (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
69	68	oveq1d 7433	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) / 𝑥) = ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥))
70	48, 69	eqtr3d 2798	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥)) = ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥))
71	70	mpteq2dva 5198	. 2 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥))) = (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)))
72		2re 12410	. . . . . . . 8 ⊢ 2 ∈ ℝ
73	72	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ)
74	73, 22	rerpdivcld 13188	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 / (log‘𝑥)) ∈ ℝ)
75	25, 38	fsumrecl 15893	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℝ)
76	74, 75	remulcld 11332	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) ∈ ℝ)
77	49, 76	resubcld 11737	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) ∈ ℝ)
78	77, 10	rerpdivcld 13188	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) ∈ ℝ)
79	25, 34	fsumrecl 15893	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℝ)
80	74, 79	remulcld 11332	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) ∈ ℝ)
81	80, 10	rerpdivcld 13188	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) ∈ ℝ)
82		1red 11302	. . . 4 ⊢ (𝜑 → 1 ∈ ℝ)
83		pntsval.1	. . . . . 6 ⊢ 𝑆 = (𝑎 ∈ ℝ ↦ Σ𝑖 ∈ (1...(⌊‘𝑎))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑎 / 𝑖)))))
84		pntrlog2bnd.t	. . . . . 6 ⊢ 𝑇 = (𝑎 ∈ ℝ ↦ if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0))
85	83, 11, 84	pntrlog2bndlem4 27900	. . . . 5 ⊢ (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) / 𝑥)) ∈ ≤𝑂(1)
86	85	a1i 11	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) / 𝑥)) ∈ ≤𝑂(1))
87	28	nnred 12343	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ)
88		simpl 488	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → 𝑎 ∈ ℝ)
89		simpr 490	. . . . . . . . . . . . . . . 16 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → 𝑎 ∈ ℝ⁺)
90	89	relogcld 26944	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → (log‘𝑎) ∈ ℝ)
91	88, 90	remulcld 11332	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → (𝑎 · (log‘𝑎)) ∈ ℝ)
92		0red 11304	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ ℝ ∧ ¬ 𝑎 ∈ ℝ⁺) → 0 ∈ ℝ)
93	91, 92	ifclda 4518	. . . . . . . . . . . . 13 ⊢ (𝑎 ∈ ℝ → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) ∈ ℝ)
94	84, 93	fmpti 7110	. . . . . . . . . . . 12 ⊢ 𝑇:ℝ⟶ℝ
95	94	ffvelcdmi 7081	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℝ → (𝑇‘𝑛) ∈ ℝ)
96	87, 95	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑇‘𝑛) ∈ ℝ)
97	87, 36	resubcld 11737	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑛 − 1) ∈ ℝ)
98	94	ffvelcdmi 7081	. . . . . . . . . . 11 ⊢ ((𝑛 − 1) ∈ ℝ → (𝑇‘(𝑛 − 1)) ∈ ℝ)
99	97, 98	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑇‘(𝑛 − 1)) ∈ ℝ)
100	96, 99	resubcld 11737	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ∈ ℝ)
101	34, 100	remulcld 11332	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ∈ ℝ)
102	25, 101	fsumrecl 15893	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ∈ ℝ)
103	74, 102	remulcld 11332	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))))) ∈ ℝ)
104	49, 103	resubcld 11737	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) ∈ ℝ)
105	104, 10	rerpdivcld 13188	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) / 𝑥) ∈ ℝ)
106		2rp 13118	. . . . . . . . . . 11 ⊢ 2 ∈ ℝ⁺
107	106	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ⁺)
108	107	rpge0d 13161	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ 2)
109	73, 22, 108	divge0d 13197	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ (2 / (log‘𝑥)))
110	33	absge0d 15607	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (abs‘(𝑅‘(𝑥 / 𝑛))))
111	29	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 𝑛 ∈ ℝ⁺)
112	111	rpcnd 13159	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 𝑛 ∈ ℂ)
113	57	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘𝑛) ∈ ℂ)
114	112, 113	mulcld 11322	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · (log‘𝑛)) ∈ ℂ)
115		simpr 490	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 1 < 𝑛)
116		1re 11301	. . . . . . . . . . . . . . . . . . 19 ⊢ 1 ∈ ℝ
117	111	rpred 13157	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 𝑛 ∈ ℝ)
118		difrp 13153	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1 ∈ ℝ ∧ 𝑛 ∈ ℝ) → (1 < 𝑛 ↔ (𝑛 − 1) ∈ ℝ⁺))
119	116, 117, 118	sylancr 599	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (1 < 𝑛 ↔ (𝑛 − 1) ∈ ℝ⁺))
120	115, 119	mpbid 235	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 − 1) ∈ ℝ⁺)
121	120	relogcld 26944	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘(𝑛 − 1)) ∈ ℝ)
122	121	recnd 11330	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘(𝑛 − 1)) ∈ ℂ)
123	112, 122	mulcld 11322	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · (log‘(𝑛 − 1))) ∈ ℂ)
124	114, 123, 122	subsubd 11690	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · (log‘𝑛)) − ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1)))) = (((𝑛 · (log‘𝑛)) − (𝑛 · (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))))
125		rpre 13122	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℝ⁺ → 𝑛 ∈ ℝ)
126		eleq1 2849	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 𝑛 → (𝑎 ∈ ℝ⁺ ↔ 𝑛 ∈ ℝ⁺))
127		id 23	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 𝑛 → 𝑎 = 𝑛)
128		fveq2 6883	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 𝑛 → (log‘𝑎) = (log‘𝑛))
129	127, 128	oveq12d 7436	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 𝑛 → (𝑎 · (log‘𝑎)) = (𝑛 · (log‘𝑛)))
130	126, 129	ifbieq1d 4507	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 = 𝑛 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0))
131		ovex 7451	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 · (log‘𝑛)) ∈ V
132		c0ex 11293	. . . . . . . . . . . . . . . . . . 19 ⊢ 0 ∈ V
133	131, 132	ifex 4533	. . . . . . . . . . . . . . . . . 18 ⊢ if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0) ∈ V
134	130, 84, 133	fvmpt 6991	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℝ → (𝑇‘𝑛) = if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0))
135	125, 134	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℝ⁺ → (𝑇‘𝑛) = if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0))
136		iftrue 4488	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℝ⁺ → if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0) = (𝑛 · (log‘𝑛)))
137	135, 136	eqtrd 2796	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℝ⁺ → (𝑇‘𝑛) = (𝑛 · (log‘𝑛)))
138	111, 137	syl 18	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑇‘𝑛) = (𝑛 · (log‘𝑛)))
139		rpre 13122	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → (𝑛 − 1) ∈ ℝ)
140		eleq1 2849	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (𝑛 − 1) → (𝑎 ∈ ℝ⁺ ↔ (𝑛 − 1) ∈ ℝ⁺))
141		id 23	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (𝑛 − 1) → 𝑎 = (𝑛 − 1))
142		fveq2 6883	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (𝑛 − 1) → (log‘𝑎) = (log‘(𝑛 − 1)))
143	141, 142	oveq12d 7436	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (𝑛 − 1) → (𝑎 · (log‘𝑎)) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
144	140, 143	ifbieq1d 4507	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = (𝑛 − 1) → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0))
145		ovex 7451	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑛 − 1) · (log‘(𝑛 − 1))) ∈ V
146	145, 132	ifex 4533	. . . . . . . . . . . . . . . . . . 19 ⊢ if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0) ∈ V
147	144, 84, 146	fvmpt 6991	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 − 1) ∈ ℝ → (𝑇‘(𝑛 − 1)) = if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0))
148	139, 147	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → (𝑇‘(𝑛 − 1)) = if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0))
149		iftrue 4488	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
150	148, 149	eqtrd 2796	. . . . . . . . . . . . . . . 16 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → (𝑇‘(𝑛 − 1)) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
151	120, 150	syl 18	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑇‘(𝑛 − 1)) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
152		1cnd 11295	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 1 ∈ ℂ)
153	112, 152, 122	subdird 11766	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · (log‘(𝑛 − 1))) = ((𝑛 · (log‘(𝑛 − 1))) − (1 · (log‘(𝑛 − 1)))))
154	122	mullidd 11320	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (1 · (log‘(𝑛 − 1))) = (log‘(𝑛 − 1)))
155	154	oveq2d 7434	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · (log‘(𝑛 − 1))) − (1 · (log‘(𝑛 − 1)))) = ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1))))
156	151, 153, 155	3eqtrd 2800	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑇‘(𝑛 − 1)) = ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1))))
157	138, 156	oveq12d 7436	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = ((𝑛 · (log‘𝑛)) − ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1)))))
158	112, 113, 122	subdid 11765	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) = ((𝑛 · (log‘𝑛)) − (𝑛 · (log‘(𝑛 − 1)))))
159	158	oveq1d 7433	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) = (((𝑛 · (log‘𝑛)) − (𝑛 · (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))))
160	124, 157, 159	3eqtr4d 2806	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))))
161	111	relogcld 26944	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘𝑛) ∈ ℝ)
162	161, 121	resubcld 11737	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘𝑛) − (log‘(𝑛 − 1))) ∈ ℝ)
163	162	recnd 11330	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘𝑛) − (log‘(𝑛 − 1))) ∈ ℂ)
164	112, 152, 163	subdird 11766	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · ((log‘𝑛) − (log‘(𝑛 − 1)))) = ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − (1 · ((log‘𝑛) − (log‘(𝑛 − 1))))))
165	163	mullidd 11320	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (1 · ((log‘𝑛) − (log‘(𝑛 − 1)))) = ((log‘𝑛) − (log‘(𝑛 − 1))))
166	165	oveq2d 7434	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − (1 · ((log‘𝑛) − (log‘(𝑛 − 1))))) = ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − ((log‘𝑛) − (log‘(𝑛 − 1)))))
167	117, 162	remulcld 11332	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) ∈ ℝ)
168	167	recnd 11330	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) ∈ ℂ)
169	168, 113, 122	subsub3d 11692	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − ((log‘𝑛) − (log‘(𝑛 − 1)))) = (((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)))
170	164, 166, 169	3eqtrd 2800	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · ((log‘𝑛) − (log‘(𝑛 − 1)))) = (((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)))
171	112, 152	npcand 11666	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) + 1) = 𝑛)
172	171	fveq2d 6887	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘((𝑛 − 1) + 1)) = (log‘𝑛))
173	172	oveq1d 7433	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘((𝑛 − 1) + 1)) − (log‘(𝑛 − 1))) = ((log‘𝑛) − (log‘(𝑛 − 1))))
174		logdifbnd 27314	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → ((log‘((𝑛 − 1) + 1)) − (log‘(𝑛 − 1))) ≤ (1 / (𝑛 − 1)))
175	120, 174	syl 18	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘((𝑛 − 1) + 1)) − (log‘(𝑛 − 1))) ≤ (1 / (𝑛 − 1)))
176	173, 175	eqbrtrrd 5129	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘𝑛) − (log‘(𝑛 − 1))) ≤ (1 / (𝑛 − 1)))
177		1red 11302	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 1 ∈ ℝ)
178	162, 177, 120	lemuldiv2d 13207	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (((𝑛 − 1) · ((log‘𝑛) − (log‘(𝑛 − 1)))) ≤ 1 ↔ ((log‘𝑛) − (log‘(𝑛 − 1))) ≤ (1 / (𝑛 − 1))))
179	176, 178	mpbird 260	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · ((log‘𝑛) − (log‘(𝑛 − 1)))) ≤ 1)
180	170, 179	eqbrtrrd 5129	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)) ≤ 1)
181	167, 121	readdcld 11331	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) ∈ ℝ)
182	181, 161, 177	lesubadd2d 11908	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)) ≤ 1 ↔ ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1)))
183	180, 182	mpbid 235	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
184	160, 183	eqbrtrd 5127	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
185		fveq2 6883	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 1 → (𝑇‘𝑛) = (𝑇‘1))
186		id 23	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = 1 → 𝑎 = 1)
187	186, 3	eqeltrdi 2869	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = 1 → 𝑎 ∈ ℝ⁺)
188	187	iftrued 4490	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 1 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = (𝑎 · (log‘𝑎)))
189		fveq2 6883	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 = 1 → (log‘𝑎) = (log‘1))
190		log1 26906	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (log‘1) = 0
191	189, 190	eqtrdi 2812	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = 1 → (log‘𝑎) = 0)
192	186, 191	oveq12d 7436	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = 1 → (𝑎 · (log‘𝑎)) = (1 · 0))
193		ax-1cn 11251	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 1 ∈ ℂ
194	193	mul01i 11493	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (1 · 0) = 0
195	192, 194	eqtrdi 2812	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 1 → (𝑎 · (log‘𝑎)) = 0)
196	188, 195	eqtrd 2796	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 1 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = 0)
197	196, 84, 132	fvmpt 6991	. . . . . . . . . . . . . . . . . 18 ⊢ (1 ∈ ℝ → (𝑇‘1) = 0)
198	116, 197	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ (𝑇‘1) = 0
199	185, 198	eqtrdi 2812	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 1 → (𝑇‘𝑛) = 0)
200		oveq1 7425	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 1 → (𝑛 − 1) = (1 − 1))
201		1m1e0 12408	. . . . . . . . . . . . . . . . . . 19 ⊢ (1 − 1) = 0
202	200, 201	eqtrdi 2812	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 1 → (𝑛 − 1) = 0)
203	202	fveq2d 6887	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 1 → (𝑇‘(𝑛 − 1)) = (𝑇‘0))
204		0re 11303	. . . . . . . . . . . . . . . . . 18 ⊢ 0 ∈ ℝ
205		rpne0 13130	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 ∈ ℝ⁺ → 𝑎 ≠ 0)
206	205	necon2bi 2986	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 0 → ¬ 𝑎 ∈ ℝ⁺)
207	206	iffalsed 4493	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 0 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = 0)
208	207, 84, 132	fvmpt 6991	. . . . . . . . . . . . . . . . . 18 ⊢ (0 ∈ ℝ → (𝑇‘0) = 0)
209	204, 208	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ (𝑇‘0) = 0
210	203, 209	eqtrdi 2812	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 1 → (𝑇‘(𝑛 − 1)) = 0)
211	199, 210	oveq12d 7436	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 1 → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = (0 − 0))
212		0m0e0 12454	. . . . . . . . . . . . . . 15 ⊢ (0 − 0) = 0
213	211, 212	eqtrdi 2812	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 1 → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = 0)
214	213	eqcoms 2769	. . . . . . . . . . . . 13 ⊢ (1 = 𝑛 → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = 0)
215	214	adantl 487	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 = 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = 0)
216		0red 11304	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ∈ ℝ)
217	28	nnge1d 12379	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ≤ 𝑛)
218	87, 217	logge0d 26951	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (log‘𝑛))
219	35	lep1d 12241	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ≤ ((log‘𝑛) + 1))
220	216, 35, 37, 218, 219	letrd 11460	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((log‘𝑛) + 1))
221	220	adantr 486	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 = 𝑛) → 0 ≤ ((log‘𝑛) + 1))
222	215, 221	eqbrtrd 5127	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 = 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
223		elfzle1 13653	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (1...(⌊‘𝑥)) → 1 ≤ 𝑛)
224	223	adantl 487	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ≤ 𝑛)
225	36, 87	leloed 11446	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 ≤ 𝑛 ↔ (1 < 𝑛 ∨ 1 = 𝑛)))
226	224, 225	mpbid 235	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 < 𝑛 ∨ 1 = 𝑛))
227	184, 222, 226	mpjaodan 973	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
228	100, 37, 34, 110, 227	lemul2ad 12250	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ≤ ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))
229	25, 101, 38, 228	fsumle 15959	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))
230	102, 75, 74, 109, 229	lemul2ad 12250	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))))) ≤ ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))))
231	103, 76, 49, 230	lesub2dd 11926	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) ≤ (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))))
232	77, 104, 10, 231	lediv1dd 13215	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) ≤ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) / 𝑥))
233	232	adantrr 730	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ (1(,)+∞) ∧ 1 ≤ 𝑥)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) ≤ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) / 𝑥))
234	82, 86, 105, 78, 233	lo1le 15812	. . 3 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥)) ∈ ≤𝑂(1))
235	106	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 2 ∈ ℝ⁺)
236		pntrlog2bndlem5.1	. . . . . . . 8 ⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
237	235, 236	rpmulcld 13173	. . . . . . 7 ⊢ (𝜑 → (2 · 𝐵) ∈ ℝ⁺)
238	237	rpred 13157	. . . . . 6 ⊢ (𝜑 → (2 · 𝐵) ∈ ℝ)
239	238	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · 𝐵) ∈ ℝ)
240	5, 22	rerpdivcld 13188	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 / (log‘𝑥)) ∈ ℝ)
241	5, 240	readdcld 11331	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 + (1 / (log‘𝑥))) ∈ ℝ)
242		ioossre 13531	. . . . . 6 ⊢ (1(,)+∞) ⊆ ℝ
243		lo1const 15781	. . . . . 6 ⊢ (((1(,)+∞) ⊆ ℝ ∧ (2 · 𝐵) ∈ ℝ) → (𝑥 ∈ (1(,)+∞) ↦ (2 · 𝐵)) ∈ ≤𝑂(1))
244	242, 238, 243	sylancr 599	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (2 · 𝐵)) ∈ ≤𝑂(1))
245		lo1const 15781	. . . . . . 7 ⊢ (((1(,)+∞) ⊆ ℝ ∧ 1 ∈ ℝ) → (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ ≤𝑂(1))
246	242, 82, 245	sylancr 599	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ ≤𝑂(1))
247		divlogrlim 26956	. . . . . . . 8 ⊢ (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ⇝_𝑟 0
248		rlimo1 15777	. . . . . . . 8 ⊢ ((𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ⇝_𝑟 0 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ 𝑂(1))
249	247, 248	mp1i 14	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ 𝑂(1))
250	240, 249	o1lo1d 15699	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ ≤𝑂(1))
251	5, 240, 246, 250	lo1add 15787	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 + (1 / (log‘𝑥)))) ∈ ≤𝑂(1))
252	237	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · 𝐵) ∈ ℝ⁺)
253	252	rpge0d 13161	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ (2 · 𝐵))
254	239, 241, 244, 251, 253	lo1mul 15788	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((2 · 𝐵) · (1 + (1 / (log‘𝑥))))) ∈ ≤𝑂(1))
255	239, 241	remulcld 11332	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))) ∈ ℝ)
256	79, 10	rerpdivcld 13188	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ∈ ℝ)
257	18, 5	readdcld 11331	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) + 1) ∈ ℝ)
258	236	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℝ⁺)
259	258	rpred 13157	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℝ)
260	257, 259	remulcld 11332	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) + 1) · 𝐵) ∈ ℝ)
261	28	nnrecred 12382	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 / 𝑛) ∈ ℝ)
262	25, 261	fsumrecl 15893	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) ∈ ℝ)
263	262, 259	remulcld 11332	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵) ∈ ℝ)
264	34, 26	rerpdivcld 13188	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ∈ ℝ)
265	259	adantr 486	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝐵 ∈ ℝ)
266	261, 265	remulcld 11332	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 / 𝑛) · 𝐵) ∈ ℝ)
267	30	rpcnd 13159	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℂ)
268	30	rpne0d 13162	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ≠ 0)
269	33, 267, 268	absdivd 15618	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (abs‘(𝑥 / 𝑛))))
270	2	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ)
271	270, 28	nndivred 12385	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ)
272	30	rpge0d 13161	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (𝑥 / 𝑛))
273	271, 272	absidd 15583	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑥 / 𝑛)) = (𝑥 / 𝑛))
274	273	oveq2d 7434	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / (abs‘(𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)))
275	269, 274	eqtrd 2796	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)))
276	46	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
277	87	recnd 11330	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℂ)
278	47	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ≠ 0)
279	28	nnne0d 12381	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ≠ 0)
280	43, 276, 277, 278, 279	divdiv2d 12118	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)) = (((abs‘(𝑅‘(𝑥 / 𝑛))) · 𝑛) / 𝑥))
281	43, 277, 276, 278	div23d 12123	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · 𝑛) / 𝑥) = (((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛))
282	275, 280, 281	3eqtrd 2800	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = (((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛))
283		fveq2 6883	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑥 / 𝑛) → (𝑅‘𝑦) = (𝑅‘(𝑥 / 𝑛)))
284		id 23	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑥 / 𝑛) → 𝑦 = (𝑥 / 𝑛))
285	283, 284	oveq12d 7436	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑥 / 𝑛) → ((𝑅‘𝑦) / 𝑦) = ((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛)))
286	285	fveq2d 6887	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑥 / 𝑛) → (abs‘((𝑅‘𝑦) / 𝑦)) = (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))))
287	286	breq1d 5113	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝑥 / 𝑛) → ((abs‘((𝑅‘𝑦) / 𝑦)) ≤ 𝐵 ↔ (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) ≤ 𝐵))
288		pntrlog2bndlem5.2	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ∀𝑦 ∈ ℝ⁺ (abs‘((𝑅‘𝑦) / 𝑦)) ≤ 𝐵)
289	288	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ∀𝑦 ∈ ℝ⁺ (abs‘((𝑅‘𝑦) / 𝑦)) ≤ 𝐵)
290	287, 289, 30	rspcdva 3578	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) ≤ 𝐵)
291	282, 290	eqbrtrrd 5129	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛) ≤ 𝐵)
292	264, 265, 29	lemuldivd 13206	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛) ≤ 𝐵 ↔ ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (𝐵 / 𝑛)))
293	291, 292	mpbid 235	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (𝐵 / 𝑛))
294	265	recnd 11330	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝐵 ∈ ℂ)
295	294, 277, 279	divrec2d 12090	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐵 / 𝑛) = ((1 / 𝑛) · 𝐵))
296	293, 295	breqtrd 5131	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ ((1 / 𝑛) · 𝐵))
297	25, 264, 266, 296	fsumle 15959	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 / 𝑛) · 𝐵))
298	25, 46, 43, 47	fsumdivc 15945	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) = Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥))
299	258	rpcnd 13159	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℂ)
300	261	recnd 11330	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 / 𝑛) ∈ ℂ)
301	25, 299, 300	fsummulc1 15944	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵) = Σ𝑛 ∈ (1...(⌊‘𝑥))((1 / 𝑛) · 𝐵))
302	297, 298, 301	3brtr4d 5137	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵))
303	258	rpge0d 13161	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ 𝐵)
304		harmonicubnd 27330	. . . . . . . . . 10 ⊢ ((𝑥 ∈ ℝ ∧ 1 ≤ 𝑥) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) ≤ ((log‘𝑥) + 1))
305	2, 9, 304	syl2anc 596	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) ≤ ((log‘𝑥) + 1))
306	262, 257, 259, 303, 305	lemul1ad 12249	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵) ≤ (((log‘𝑥) + 1) · 𝐵))
307	256, 263, 260, 302, 306	letrd 11460	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (((log‘𝑥) + 1) · 𝐵))
308	256, 260, 74, 109, 307	lemul2ad 12250	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥)) ≤ ((2 / (log‘𝑥)) · (((log‘𝑥) + 1) · 𝐵)))
309	24, 44, 46, 47	divassd 12121	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) = ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥)))
310	241	recnd 11330	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 + (1 / (log‘𝑥))) ∈ ℂ)
311	21, 299, 310	mul32d 11513	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))) = ((2 · (1 + (1 / (log‘𝑥)))) · 𝐵))
312		1cnd 11295	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℂ)
313	19, 312, 19, 23	divdird 12124	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) + 1) / (log‘𝑥)) = (((log‘𝑥) / (log‘𝑥)) + (1 / (log‘𝑥))))
314	19, 23	dividd 12084	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) / (log‘𝑥)) = 1)
315	314	oveq1d 7433	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) / (log‘𝑥)) + (1 / (log‘𝑥))) = (1 + (1 / (log‘𝑥))))
316	313, 315	eqtr2d 2797	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 + (1 / (log‘𝑥))) = (((log‘𝑥) + 1) / (log‘𝑥)))
317	316	oveq2d 7434	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · (1 + (1 / (log‘𝑥)))) = (2 · (((log‘𝑥) + 1) / (log‘𝑥))))
318	19, 312	addcld 11321	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) + 1) ∈ ℂ)
319	21, 19, 318, 23	div32d 12109	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · ((log‘𝑥) + 1)) = (2 · (((log‘𝑥) + 1) / (log‘𝑥))))
320	317, 319	eqtr4d 2799	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · (1 + (1 / (log‘𝑥)))) = ((2 / (log‘𝑥)) · ((log‘𝑥) + 1)))
321	320	oveq1d 7433	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · (1 + (1 / (log‘𝑥)))) · 𝐵) = (((2 / (log‘𝑥)) · ((log‘𝑥) + 1)) · 𝐵))
322	24, 318, 299	mulassd 11325	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · ((log‘𝑥) + 1)) · 𝐵) = ((2 / (log‘𝑥)) · (((log‘𝑥) + 1) · 𝐵)))
323	311, 321, 322	3eqtrd 2800	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))) = ((2 / (log‘𝑥)) · (((log‘𝑥) + 1) · 𝐵)))
324	308, 309, 323	3brtr4d 5137	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) ≤ ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))))
325	324	adantrr 730	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ (1(,)+∞) ∧ 1 ≤ 𝑥)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) ≤ ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))))
326	82, 254, 255, 81, 325	lo1le 15812	. . 3 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥)) ∈ ≤𝑂(1))
327	78, 81, 234, 326	lo1add 15787	. 2 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥))) ∈ ≤𝑂(1))
328	71, 327	eqeltrrd 2862	1 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)) ∈ ≤𝑂(1))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∨ wo 861 = wceq 1570 ∈ wcel 2145 ≠ wne 2956 ∀wral 3077 ⊆ wss 3899 ifcif 4482 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 ℝ⁺crp 13113 (,)cioo 13469 ...cfz 13632 ⌊cfl 13923 abscabs 15394 ⇝_𝑟 crli 15645 𝑂(1)co1 15646 ≤𝑂(1)clo1 15647 Σcsu 15846 logclog 26875 Λcvma 27412 ψ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-disj 5071 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-dju 9975 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-o1 15650 df-lo1 15651 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-gcd 16658 df-prm 16840 df-pc 17008 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-cxp 26878 df-atan 27188 df-em 27313 df-cht 27417 df-vma 27418 df-chp 27419 df-ppi 27420 df-mu 27421

This theorem is used by: pntrlog2bndlem6 27903

W3C validator