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 27544

Description: Lemma for pntrlog2bnd 27547. 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 13328	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (1(,)+∞) → 𝑥 ∈ ℝ)
2	1	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ)
3		1rp 12946	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℝ⁺
4	3	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ⁺)
5		1red 11145	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ)
6		eliooord 13358	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(,)+∞) → (1 < 𝑥 ∧ 𝑥 < +∞))
7	6	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 < 𝑥 ∧ 𝑥 < +∞))
8	7	simpld 494	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 < 𝑥)
9	5, 2, 8	ltled 11294	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ≤ 𝑥)
10	2, 4, 9	rpgecld 13025	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ⁺)
11		pntrlog2bnd.r	. . . . . . . . . . . . 13 ⊢ 𝑅 = (𝑎 ∈ ℝ⁺ ↦ ((ψ‘𝑎) − 𝑎))
12	11	pntrf 27526	. . . . . . . . . . . 12 ⊢ 𝑅:ℝ⁺⟶ℝ
13	12	ffvelcdmi 7035	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℝ⁺ → (𝑅‘𝑥) ∈ ℝ)
14	10, 13	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (𝑅‘𝑥) ∈ ℝ)
15	14	recnd 11173	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (𝑅‘𝑥) ∈ ℂ)
16	15	abscld 15401	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (abs‘(𝑅‘𝑥)) ∈ ℝ)
17	16	recnd 11173	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (abs‘(𝑅‘𝑥)) ∈ ℂ)
18	10	relogcld 26587	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ)
19	18	recnd 11173	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℂ)
20	17, 19	mulcld 11165	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅‘𝑥)) · (log‘𝑥)) ∈ ℂ)
21		2cnd 12259	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℂ)
22	2, 8	rplogcld 26593	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ⁺)
23	22	rpne0d 12991	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ≠ 0)
24	21, 19, 23	divcld 11931	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 / (log‘𝑥)) ∈ ℂ)
25		fzfid 13935	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1...(⌊‘𝑥)) ∈ Fin)
26	10	adantr 480	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ⁺)
27		elfznn 13507	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
28	27	adantl 481	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
29	28	nnrpd 12984	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ⁺)
30	26, 29	rpdivcld 13003	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ⁺)
31	12	ffvelcdmi 7035	. . . . . . . . . . . . 13 ⊢ ((𝑥 / 𝑛) ∈ ℝ⁺ → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
32	30, 31	syl 17	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
33	32	recnd 11173	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℂ)
34	33	abscld 15401	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℝ)
35	29	relogcld 26587	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ∈ ℝ)
36		1red 11145	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℝ)
37	35, 36	readdcld 11174	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((log‘𝑛) + 1) ∈ ℝ)
38	34, 37	remulcld 11175	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℝ)
39	38	recnd 11173	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℂ)
40	25, 39	fsumcl 15695	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℂ)
41	24, 40	mulcld 11165	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) ∈ ℂ)
42	20, 41	subcld 11505	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) ∈ ℂ)
43	34	recnd 11173	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℂ)
44	25, 43	fsumcl 15695	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℂ)
45	24, 44	mulcld 11165	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) ∈ ℂ)
46	2	recnd 11173	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℂ)
47	10	rpne0d 12991	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ≠ 0)
48	42, 45, 46, 47	divdird 11969	. . . 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 11175	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅‘𝑥)) · (log‘𝑥)) ∈ ℝ)
50	49	recnd 11173	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅‘𝑥)) · (log‘𝑥)) ∈ ℂ)
51	50, 41, 45	subsubd 11533	. . . . . 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 11606	. . . . . . . 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 15750	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))))
54	37	recnd 11173	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((log‘𝑛) + 1) ∈ ℂ)
55		1cnd 11139	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℂ)
56	43, 54, 55	subdid 11606	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (((log‘𝑛) + 1) − 1)) = (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − ((abs‘(𝑅‘(𝑥 / 𝑛))) · 1)))
57	35	recnd 11173	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ∈ ℂ)
58	57, 55	pncand 11506	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((log‘𝑛) + 1) − 1) = (log‘𝑛))
59	58	oveq2d 7383	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (((log‘𝑛) + 1) − 1)) = ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
60	43	mulridd 11162	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · 1) = (abs‘(𝑅‘(𝑥 / 𝑛))))
61	60	oveq2d 7383	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − ((abs‘(𝑅‘(𝑥 / 𝑛))) · 1)) = (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))))
62	56, 59, 61	3eqtr3rd 2780	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
63	62	sumeq2dv 15664	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
64	53, 63	eqtr3d 2773	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
65	64	oveq2d 7383	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) = ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
66	52, 65	eqtr3d 2773	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) = ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
67	66	oveq2d 7383	. . . . . 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 2773	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) = (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
69	68	oveq1d 7382	. . . 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 2773	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥)) = ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥))
71	70	mpteq2dva 5178	. 2 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥))) = (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)))
72		2re 12255	. . . . . . . 8 ⊢ 2 ∈ ℝ
73	72	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ)
74	73, 22	rerpdivcld 13017	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 / (log‘𝑥)) ∈ ℝ)
75	25, 38	fsumrecl 15696	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℝ)
76	74, 75	remulcld 11175	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) ∈ ℝ)
77	49, 76	resubcld 11578	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) ∈ ℝ)
78	77, 10	rerpdivcld 13017	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) ∈ ℝ)
79	25, 34	fsumrecl 15696	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℝ)
80	74, 79	remulcld 11175	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) ∈ ℝ)
81	80, 10	rerpdivcld 13017	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) ∈ ℝ)
82		1red 11145	. . . 4 ⊢ (𝜑 → 1 ∈ ℝ)
83		pntsval.1	. . . . . 6 ⊢ 𝑆 = (𝑎 ∈ ℝ ↦ Σ𝑖 ∈ (1...(⌊‘𝑎))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑎 / 𝑖)))))
84		pntrlog2bnd.t	. . . . . 6 ⊢ 𝑇 = (𝑎 ∈ ℝ ↦ if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0))
85	83, 11, 84	pntrlog2bndlem4 27543	. . . . 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 12189	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ)
88		simpl 482	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → 𝑎 ∈ ℝ)
89		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → 𝑎 ∈ ℝ⁺)
90	89	relogcld 26587	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → (log‘𝑎) ∈ ℝ)
91	88, 90	remulcld 11175	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → (𝑎 · (log‘𝑎)) ∈ ℝ)
92		0red 11147	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ ℝ ∧ ¬ 𝑎 ∈ ℝ⁺) → 0 ∈ ℝ)
93	91, 92	ifclda 4502	. . . . . . . . . . . . 13 ⊢ (𝑎 ∈ ℝ → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) ∈ ℝ)
94	84, 93	fmpti 7064	. . . . . . . . . . . 12 ⊢ 𝑇:ℝ⟶ℝ
95	94	ffvelcdmi 7035	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℝ → (𝑇‘𝑛) ∈ ℝ)
96	87, 95	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑇‘𝑛) ∈ ℝ)
97	87, 36	resubcld 11578	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑛 − 1) ∈ ℝ)
98	94	ffvelcdmi 7035	. . . . . . . . . . 11 ⊢ ((𝑛 − 1) ∈ ℝ → (𝑇‘(𝑛 − 1)) ∈ ℝ)
99	97, 98	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑇‘(𝑛 − 1)) ∈ ℝ)
100	96, 99	resubcld 11578	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ∈ ℝ)
101	34, 100	remulcld 11175	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ∈ ℝ)
102	25, 101	fsumrecl 15696	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ∈ ℝ)
103	74, 102	remulcld 11175	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))))) ∈ ℝ)
104	49, 103	resubcld 11578	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) ∈ ℝ)
105	104, 10	rerpdivcld 13017	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) / 𝑥) ∈ ℝ)
106		2rp 12947	. . . . . . . . . . 11 ⊢ 2 ∈ ℝ⁺
107	106	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ⁺)
108	107	rpge0d 12990	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ 2)
109	73, 22, 108	divge0d 13026	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ (2 / (log‘𝑥)))
110	33	absge0d 15409	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (abs‘(𝑅‘(𝑥 / 𝑛))))
111	29	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 𝑛 ∈ ℝ⁺)
112	111	rpcnd 12988	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 𝑛 ∈ ℂ)
113	57	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘𝑛) ∈ ℂ)
114	112, 113	mulcld 11165	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · (log‘𝑛)) ∈ ℂ)
115		simpr 484	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 1 < 𝑛)
116		1re 11144	. . . . . . . . . . . . . . . . . . 19 ⊢ 1 ∈ ℝ
117	111	rpred 12986	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 𝑛 ∈ ℝ)
118		difrp 12982	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1 ∈ ℝ ∧ 𝑛 ∈ ℝ) → (1 < 𝑛 ↔ (𝑛 − 1) ∈ ℝ⁺))
119	116, 117, 118	sylancr 588	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (1 < 𝑛 ↔ (𝑛 − 1) ∈ ℝ⁺))
120	115, 119	mpbid 232	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 − 1) ∈ ℝ⁺)
121	120	relogcld 26587	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘(𝑛 − 1)) ∈ ℝ)
122	121	recnd 11173	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘(𝑛 − 1)) ∈ ℂ)
123	112, 122	mulcld 11165	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · (log‘(𝑛 − 1))) ∈ ℂ)
124	114, 123, 122	subsubd 11533	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · (log‘𝑛)) − ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1)))) = (((𝑛 · (log‘𝑛)) − (𝑛 · (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))))
125		rpre 12951	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℝ⁺ → 𝑛 ∈ ℝ)
126		eleq1 2824	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 𝑛 → (𝑎 ∈ ℝ⁺ ↔ 𝑛 ∈ ℝ⁺))
127		id 22	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 𝑛 → 𝑎 = 𝑛)
128		fveq2 6840	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 𝑛 → (log‘𝑎) = (log‘𝑛))
129	127, 128	oveq12d 7385	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 𝑛 → (𝑎 · (log‘𝑎)) = (𝑛 · (log‘𝑛)))
130	126, 129	ifbieq1d 4491	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 = 𝑛 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0))
131		ovex 7400	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 · (log‘𝑛)) ∈ V
132		c0ex 11138	. . . . . . . . . . . . . . . . . . 19 ⊢ 0 ∈ V
133	131, 132	ifex 4517	. . . . . . . . . . . . . . . . . 18 ⊢ if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0) ∈ V
134	130, 84, 133	fvmpt 6947	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℝ → (𝑇‘𝑛) = if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0))
135	125, 134	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℝ⁺ → (𝑇‘𝑛) = if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0))
136		iftrue 4472	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℝ⁺ → if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0) = (𝑛 · (log‘𝑛)))
137	135, 136	eqtrd 2771	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℝ⁺ → (𝑇‘𝑛) = (𝑛 · (log‘𝑛)))
138	111, 137	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑇‘𝑛) = (𝑛 · (log‘𝑛)))
139		rpre 12951	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → (𝑛 − 1) ∈ ℝ)
140		eleq1 2824	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (𝑛 − 1) → (𝑎 ∈ ℝ⁺ ↔ (𝑛 − 1) ∈ ℝ⁺))
141		id 22	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (𝑛 − 1) → 𝑎 = (𝑛 − 1))
142		fveq2 6840	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (𝑛 − 1) → (log‘𝑎) = (log‘(𝑛 − 1)))
143	141, 142	oveq12d 7385	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (𝑛 − 1) → (𝑎 · (log‘𝑎)) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
144	140, 143	ifbieq1d 4491	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = (𝑛 − 1) → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0))
145		ovex 7400	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑛 − 1) · (log‘(𝑛 − 1))) ∈ V
146	145, 132	ifex 4517	. . . . . . . . . . . . . . . . . . 19 ⊢ if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0) ∈ V
147	144, 84, 146	fvmpt 6947	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 − 1) ∈ ℝ → (𝑇‘(𝑛 − 1)) = if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0))
148	139, 147	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → (𝑇‘(𝑛 − 1)) = if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0))
149		iftrue 4472	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
150	148, 149	eqtrd 2771	. . . . . . . . . . . . . . . 16 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → (𝑇‘(𝑛 − 1)) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
151	120, 150	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑇‘(𝑛 − 1)) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
152		1cnd 11139	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 1 ∈ ℂ)
153	112, 152, 122	subdird 11607	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · (log‘(𝑛 − 1))) = ((𝑛 · (log‘(𝑛 − 1))) − (1 · (log‘(𝑛 − 1)))))
154	122	mullidd 11163	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (1 · (log‘(𝑛 − 1))) = (log‘(𝑛 − 1)))
155	154	oveq2d 7383	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · (log‘(𝑛 − 1))) − (1 · (log‘(𝑛 − 1)))) = ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1))))
156	151, 153, 155	3eqtrd 2775	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑇‘(𝑛 − 1)) = ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1))))
157	138, 156	oveq12d 7385	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = ((𝑛 · (log‘𝑛)) − ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1)))))
158	112, 113, 122	subdid 11606	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) = ((𝑛 · (log‘𝑛)) − (𝑛 · (log‘(𝑛 − 1)))))
159	158	oveq1d 7382	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) = (((𝑛 · (log‘𝑛)) − (𝑛 · (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))))
160	124, 157, 159	3eqtr4d 2781	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))))
161	111	relogcld 26587	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘𝑛) ∈ ℝ)
162	161, 121	resubcld 11578	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘𝑛) − (log‘(𝑛 − 1))) ∈ ℝ)
163	162	recnd 11173	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘𝑛) − (log‘(𝑛 − 1))) ∈ ℂ)
164	112, 152, 163	subdird 11607	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · ((log‘𝑛) − (log‘(𝑛 − 1)))) = ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − (1 · ((log‘𝑛) − (log‘(𝑛 − 1))))))
165	163	mullidd 11163	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (1 · ((log‘𝑛) − (log‘(𝑛 − 1)))) = ((log‘𝑛) − (log‘(𝑛 − 1))))
166	165	oveq2d 7383	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − (1 · ((log‘𝑛) − (log‘(𝑛 − 1))))) = ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − ((log‘𝑛) − (log‘(𝑛 − 1)))))
167	117, 162	remulcld 11175	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) ∈ ℝ)
168	167	recnd 11173	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) ∈ ℂ)
169	168, 113, 122	subsub3d 11535	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − ((log‘𝑛) − (log‘(𝑛 − 1)))) = (((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)))
170	164, 166, 169	3eqtrd 2775	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · ((log‘𝑛) − (log‘(𝑛 − 1)))) = (((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)))
171	112, 152	npcand 11509	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) + 1) = 𝑛)
172	171	fveq2d 6844	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘((𝑛 − 1) + 1)) = (log‘𝑛))
173	172	oveq1d 7382	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘((𝑛 − 1) + 1)) − (log‘(𝑛 − 1))) = ((log‘𝑛) − (log‘(𝑛 − 1))))
174		logdifbnd 26957	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → ((log‘((𝑛 − 1) + 1)) − (log‘(𝑛 − 1))) ≤ (1 / (𝑛 − 1)))
175	120, 174	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘((𝑛 − 1) + 1)) − (log‘(𝑛 − 1))) ≤ (1 / (𝑛 − 1)))
176	173, 175	eqbrtrrd 5109	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘𝑛) − (log‘(𝑛 − 1))) ≤ (1 / (𝑛 − 1)))
177		1red 11145	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 1 ∈ ℝ)
178	162, 177, 120	lemuldiv2d 13036	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (((𝑛 − 1) · ((log‘𝑛) − (log‘(𝑛 − 1)))) ≤ 1 ↔ ((log‘𝑛) − (log‘(𝑛 − 1))) ≤ (1 / (𝑛 − 1))))
179	176, 178	mpbird 257	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · ((log‘𝑛) − (log‘(𝑛 − 1)))) ≤ 1)
180	170, 179	eqbrtrrd 5109	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)) ≤ 1)
181	167, 121	readdcld 11174	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) ∈ ℝ)
182	181, 161, 177	lesubadd2d 11749	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)) ≤ 1 ↔ ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1)))
183	180, 182	mpbid 232	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
184	160, 183	eqbrtrd 5107	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
185		fveq2 6840	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 1 → (𝑇‘𝑛) = (𝑇‘1))
186		id 22	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = 1 → 𝑎 = 1)
187	186, 3	eqeltrdi 2844	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = 1 → 𝑎 ∈ ℝ⁺)
188	187	iftrued 4474	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 1 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = (𝑎 · (log‘𝑎)))
189		fveq2 6840	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 = 1 → (log‘𝑎) = (log‘1))
190		log1 26549	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (log‘1) = 0
191	189, 190	eqtrdi 2787	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = 1 → (log‘𝑎) = 0)
192	186, 191	oveq12d 7385	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = 1 → (𝑎 · (log‘𝑎)) = (1 · 0))
193		ax-1cn 11096	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 1 ∈ ℂ
194	193	mul01i 11336	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (1 · 0) = 0
195	192, 194	eqtrdi 2787	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 1 → (𝑎 · (log‘𝑎)) = 0)
196	188, 195	eqtrd 2771	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 1 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = 0)
197	196, 84, 132	fvmpt 6947	. . . . . . . . . . . . . . . . . 18 ⊢ (1 ∈ ℝ → (𝑇‘1) = 0)
198	116, 197	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ (𝑇‘1) = 0
199	185, 198	eqtrdi 2787	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 1 → (𝑇‘𝑛) = 0)
200		oveq1 7374	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 1 → (𝑛 − 1) = (1 − 1))
201		1m1e0 12253	. . . . . . . . . . . . . . . . . . 19 ⊢ (1 − 1) = 0
202	200, 201	eqtrdi 2787	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 1 → (𝑛 − 1) = 0)
203	202	fveq2d 6844	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 1 → (𝑇‘(𝑛 − 1)) = (𝑇‘0))
204		0re 11146	. . . . . . . . . . . . . . . . . 18 ⊢ 0 ∈ ℝ
205		rpne0 12959	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 ∈ ℝ⁺ → 𝑎 ≠ 0)
206	205	necon2bi 2962	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 0 → ¬ 𝑎 ∈ ℝ⁺)
207	206	iffalsed 4477	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 0 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = 0)
208	207, 84, 132	fvmpt 6947	. . . . . . . . . . . . . . . . . 18 ⊢ (0 ∈ ℝ → (𝑇‘0) = 0)
209	204, 208	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ (𝑇‘0) = 0
210	203, 209	eqtrdi 2787	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 1 → (𝑇‘(𝑛 − 1)) = 0)
211	199, 210	oveq12d 7385	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 1 → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = (0 − 0))
212		0m0e0 12296	. . . . . . . . . . . . . . 15 ⊢ (0 − 0) = 0
213	211, 212	eqtrdi 2787	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 1 → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = 0)
214	213	eqcoms 2744	. . . . . . . . . . . . 13 ⊢ (1 = 𝑛 → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = 0)
215	214	adantl 481	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 = 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = 0)
216		0red 11147	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ∈ ℝ)
217	28	nnge1d 12225	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ≤ 𝑛)
218	87, 217	logge0d 26594	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (log‘𝑛))
219	35	lep1d 12087	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ≤ ((log‘𝑛) + 1))
220	216, 35, 37, 218, 219	letrd 11303	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((log‘𝑛) + 1))
221	220	adantr 480	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 = 𝑛) → 0 ≤ ((log‘𝑛) + 1))
222	215, 221	eqbrtrd 5107	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 = 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
223		elfzle1 13481	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (1...(⌊‘𝑥)) → 1 ≤ 𝑛)
224	223	adantl 481	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ≤ 𝑛)
225	36, 87	leloed 11289	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 ≤ 𝑛 ↔ (1 < 𝑛 ∨ 1 = 𝑛)))
226	224, 225	mpbid 232	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 < 𝑛 ∨ 1 = 𝑛))
227	184, 222, 226	mpjaodan 961	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
228	100, 37, 34, 110, 227	lemul2ad 12096	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ≤ ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))
229	25, 101, 38, 228	fsumle 15762	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))
230	102, 75, 74, 109, 229	lemul2ad 12096	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))))) ≤ ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))))
231	103, 76, 49, 230	lesub2dd 11767	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) ≤ (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))))
232	77, 104, 10, 231	lediv1dd 13044	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) ≤ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) / 𝑥))
233	232	adantrr 718	. . . 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 15614	. . 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 13002	. . . . . . 7 ⊢ (𝜑 → (2 · 𝐵) ∈ ℝ⁺)
238	237	rpred 12986	. . . . . 6 ⊢ (𝜑 → (2 · 𝐵) ∈ ℝ)
239	238	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · 𝐵) ∈ ℝ)
240	5, 22	rerpdivcld 13017	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 / (log‘𝑥)) ∈ ℝ)
241	5, 240	readdcld 11174	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 + (1 / (log‘𝑥))) ∈ ℝ)
242		ioossre 13360	. . . . . 6 ⊢ (1(,)+∞) ⊆ ℝ
243		lo1const 15583	. . . . . 6 ⊢ (((1(,)+∞) ⊆ ℝ ∧ (2 · 𝐵) ∈ ℝ) → (𝑥 ∈ (1(,)+∞) ↦ (2 · 𝐵)) ∈ ≤𝑂(1))
244	242, 238, 243	sylancr 588	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (2 · 𝐵)) ∈ ≤𝑂(1))
245		lo1const 15583	. . . . . . 7 ⊢ (((1(,)+∞) ⊆ ℝ ∧ 1 ∈ ℝ) → (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ ≤𝑂(1))
246	242, 82, 245	sylancr 588	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ ≤𝑂(1))
247		divlogrlim 26599	. . . . . . . 8 ⊢ (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ⇝_𝑟 0
248		rlimo1 15579	. . . . . . . 8 ⊢ ((𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ⇝_𝑟 0 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ 𝑂(1))
249	247, 248	mp1i 13	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ 𝑂(1))
250	240, 249	o1lo1d 15501	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ ≤𝑂(1))
251	5, 240, 246, 250	lo1add 15589	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 + (1 / (log‘𝑥)))) ∈ ≤𝑂(1))
252	237	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · 𝐵) ∈ ℝ⁺)
253	252	rpge0d 12990	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ (2 · 𝐵))
254	239, 241, 244, 251, 253	lo1mul 15590	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((2 · 𝐵) · (1 + (1 / (log‘𝑥))))) ∈ ≤𝑂(1))
255	239, 241	remulcld 11175	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))) ∈ ℝ)
256	79, 10	rerpdivcld 13017	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ∈ ℝ)
257	18, 5	readdcld 11174	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) + 1) ∈ ℝ)
258	236	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℝ⁺)
259	258	rpred 12986	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℝ)
260	257, 259	remulcld 11175	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) + 1) · 𝐵) ∈ ℝ)
261	28	nnrecred 12228	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 / 𝑛) ∈ ℝ)
262	25, 261	fsumrecl 15696	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) ∈ ℝ)
263	262, 259	remulcld 11175	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵) ∈ ℝ)
264	34, 26	rerpdivcld 13017	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ∈ ℝ)
265	259	adantr 480	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝐵 ∈ ℝ)
266	261, 265	remulcld 11175	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 / 𝑛) · 𝐵) ∈ ℝ)
267	30	rpcnd 12988	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℂ)
268	30	rpne0d 12991	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ≠ 0)
269	33, 267, 268	absdivd 15420	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (abs‘(𝑥 / 𝑛))))
270	2	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ)
271	270, 28	nndivred 12231	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ)
272	30	rpge0d 12990	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (𝑥 / 𝑛))
273	271, 272	absidd 15385	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑥 / 𝑛)) = (𝑥 / 𝑛))
274	273	oveq2d 7383	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / (abs‘(𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)))
275	269, 274	eqtrd 2771	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)))
276	46	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
277	87	recnd 11173	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℂ)
278	47	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ≠ 0)
279	28	nnne0d 12227	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ≠ 0)
280	43, 276, 277, 278, 279	divdiv2d 11963	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)) = (((abs‘(𝑅‘(𝑥 / 𝑛))) · 𝑛) / 𝑥))
281	43, 277, 276, 278	div23d 11968	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · 𝑛) / 𝑥) = (((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛))
282	275, 280, 281	3eqtrd 2775	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = (((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛))
283		fveq2 6840	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑥 / 𝑛) → (𝑅‘𝑦) = (𝑅‘(𝑥 / 𝑛)))
284		id 22	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑥 / 𝑛) → 𝑦 = (𝑥 / 𝑛))
285	283, 284	oveq12d 7385	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑥 / 𝑛) → ((𝑅‘𝑦) / 𝑦) = ((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛)))
286	285	fveq2d 6844	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑥 / 𝑛) → (abs‘((𝑅‘𝑦) / 𝑦)) = (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))))
287	286	breq1d 5095	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝑥 / 𝑛) → ((abs‘((𝑅‘𝑦) / 𝑦)) ≤ 𝐵 ↔ (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) ≤ 𝐵))
288		pntrlog2bndlem5.2	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ∀𝑦 ∈ ℝ⁺ (abs‘((𝑅‘𝑦) / 𝑦)) ≤ 𝐵)
289	288	ad2antrr 727	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ∀𝑦 ∈ ℝ⁺ (abs‘((𝑅‘𝑦) / 𝑦)) ≤ 𝐵)
290	287, 289, 30	rspcdva 3565	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) ≤ 𝐵)
291	282, 290	eqbrtrrd 5109	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛) ≤ 𝐵)
292	264, 265, 29	lemuldivd 13035	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛) ≤ 𝐵 ↔ ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (𝐵 / 𝑛)))
293	291, 292	mpbid 232	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (𝐵 / 𝑛))
294	265	recnd 11173	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝐵 ∈ ℂ)
295	294, 277, 279	divrec2d 11935	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐵 / 𝑛) = ((1 / 𝑛) · 𝐵))
296	293, 295	breqtrd 5111	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ ((1 / 𝑛) · 𝐵))
297	25, 264, 266, 296	fsumle 15762	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 / 𝑛) · 𝐵))
298	25, 46, 43, 47	fsumdivc 15748	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) = Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥))
299	258	rpcnd 12988	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℂ)
300	261	recnd 11173	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 / 𝑛) ∈ ℂ)
301	25, 299, 300	fsummulc1 15747	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵) = Σ𝑛 ∈ (1...(⌊‘𝑥))((1 / 𝑛) · 𝐵))
302	297, 298, 301	3brtr4d 5117	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵))
303	258	rpge0d 12990	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ 𝐵)
304		harmonicubnd 26973	. . . . . . . . . 10 ⊢ ((𝑥 ∈ ℝ ∧ 1 ≤ 𝑥) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) ≤ ((log‘𝑥) + 1))
305	2, 9, 304	syl2anc 585	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) ≤ ((log‘𝑥) + 1))
306	262, 257, 259, 303, 305	lemul1ad 12095	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵) ≤ (((log‘𝑥) + 1) · 𝐵))
307	256, 263, 260, 302, 306	letrd 11303	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (((log‘𝑥) + 1) · 𝐵))
308	256, 260, 74, 109, 307	lemul2ad 12096	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥)) ≤ ((2 / (log‘𝑥)) · (((log‘𝑥) + 1) · 𝐵)))
309	24, 44, 46, 47	divassd 11966	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) = ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥)))
310	241	recnd 11173	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 + (1 / (log‘𝑥))) ∈ ℂ)
311	21, 299, 310	mul32d 11356	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))) = ((2 · (1 + (1 / (log‘𝑥)))) · 𝐵))
312		1cnd 11139	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℂ)
313	19, 312, 19, 23	divdird 11969	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) + 1) / (log‘𝑥)) = (((log‘𝑥) / (log‘𝑥)) + (1 / (log‘𝑥))))
314	19, 23	dividd 11929	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) / (log‘𝑥)) = 1)
315	314	oveq1d 7382	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) / (log‘𝑥)) + (1 / (log‘𝑥))) = (1 + (1 / (log‘𝑥))))
316	313, 315	eqtr2d 2772	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 + (1 / (log‘𝑥))) = (((log‘𝑥) + 1) / (log‘𝑥)))
317	316	oveq2d 7383	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · (1 + (1 / (log‘𝑥)))) = (2 · (((log‘𝑥) + 1) / (log‘𝑥))))
318	19, 312	addcld 11164	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) + 1) ∈ ℂ)
319	21, 19, 318, 23	div32d 11954	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · ((log‘𝑥) + 1)) = (2 · (((log‘𝑥) + 1) / (log‘𝑥))))
320	317, 319	eqtr4d 2774	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · (1 + (1 / (log‘𝑥)))) = ((2 / (log‘𝑥)) · ((log‘𝑥) + 1)))
321	320	oveq1d 7382	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · (1 + (1 / (log‘𝑥)))) · 𝐵) = (((2 / (log‘𝑥)) · ((log‘𝑥) + 1)) · 𝐵))
322	24, 318, 299	mulassd 11168	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · ((log‘𝑥) + 1)) · 𝐵) = ((2 / (log‘𝑥)) · (((log‘𝑥) + 1) · 𝐵)))
323	311, 321, 322	3eqtrd 2775	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))) = ((2 / (log‘𝑥)) · (((log‘𝑥) + 1) · 𝐵)))
324	308, 309, 323	3brtr4d 5117	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) ≤ ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))))
325	324	adantrr 718	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ (1(,)+∞) ∧ 1 ≤ 𝑥)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) ≤ ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))))
326	82, 254, 255, 81, 325	lo1le 15614	. . 3 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥)) ∈ ≤𝑂(1))
327	78, 81, 234, 326	lo1add 15589	. 2 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥))) ∈ ≤𝑂(1))
328	71, 327	eqeltrrd 2837	1 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)) ∈ ≤𝑂(1))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∨ wo 848 = wceq 1542 ∈ wcel 2114 ≠ wne 2932 ∀wral 3051 ⊆ wss 3889 ifcif 4466 class class class wbr 5085 ↦ cmpt 5166 ‘cfv 6498 (class class class)co 7367 ℂcc 11036 ℝcr 11037 0cc0 11038 1c1 11039 + caddc 11041 · cmul 11043 +∞cpnf 11176 < clt 11179 ≤ cle 11180 − cmin 11377 / cdiv 11807 ℕcn 12174 2c2 12236 ℝ⁺crp 12942 (,)cioo 13298 ...cfz 13461 ⌊cfl 13749 abscabs 15196 ⇝_𝑟 crli 15447 𝑂(1)co1 15448 ≤𝑂(1)clo1 15449 Σcsu 15648 logclog 26518 Λcvma 27055 ψcchp 27056

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2708 ax-rep 5212 ax-sep 5231 ax-nul 5241 ax-pow 5307 ax-pr 5375 ax-un 7689 ax-inf2 9562 ax-cnex 11094 ax-resscn 11095 ax-1cn 11096 ax-icn 11097 ax-addcl 11098 ax-addrcl 11099 ax-mulcl 11100 ax-mulrcl 11101 ax-mulcom 11102 ax-addass 11103 ax-mulass 11104 ax-distr 11105 ax-i2m1 11106 ax-1ne0 11107 ax-1rid 11108 ax-rnegex 11109 ax-rrecex 11110 ax-cnre 11111 ax-pre-lttri 11112 ax-pre-lttrn 11113 ax-pre-ltadd 11114 ax-pre-mulgt0 11115 ax-pre-sup 11116 ax-addf 11117

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2539 df-eu 2569 df-clab 2715 df-cleq 2728 df-clel 2811 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3062 df-rmo 3342 df-reu 3343 df-rab 3390 df-v 3431 df-sbc 3729 df-csb 3838 df-dif 3892 df-un 3894 df-in 3896 df-ss 3906 df-pss 3909 df-nul 4274 df-if 4467 df-pw 4543 df-sn 4568 df-pr 4570 df-tp 4572 df-op 4574 df-uni 4851 df-int 4890 df-iun 4935 df-iin 4936 df-disj 5053 df-br 5086 df-opab 5148 df-mpt 5167 df-tr 5193 df-id 5526 df-eprel 5531 df-po 5539 df-so 5540 df-fr 5584 df-se 5585 df-we 5586 df-xp 5637 df-rel 5638 df-cnv 5639 df-co 5640 df-dm 5641 df-rn 5642 df-res 5643 df-ima 5644 df-pred 6265 df-ord 6326 df-on 6327 df-lim 6328 df-suc 6329 df-iota 6454 df-fun 6500 df-fn 6501 df-f 6502 df-f1 6503 df-fo 6504 df-f1o 6505 df-fv 6506 df-isom 6507 df-riota 7324 df-ov 7370 df-oprab 7371 df-mpo 7372 df-of 7631 df-om 7818 df-1st 7942 df-2nd 7943 df-supp 8111 df-frecs 8231 df-wrecs 8262 df-recs 8311 df-rdg 8349 df-1o 8405 df-2o 8406 df-oadd 8409 df-er 8643 df-map 8775 df-pm 8776 df-ixp 8846 df-en 8894 df-dom 8895 df-sdom 8896 df-fin 8897 df-fsupp 9275 df-fi 9324 df-sup 9355 df-inf 9356 df-oi 9425 df-dju 9825 df-card 9863 df-pnf 11181 df-mnf 11182 df-xr 11183 df-ltxr 11184 df-le 11185 df-sub 11379 df-neg 11380 df-div 11808 df-nn 12175 df-2 12244 df-3 12245 df-4 12246 df-5 12247 df-6 12248 df-7 12249 df-8 12250 df-9 12251 df-n0 12438 df-xnn0 12511 df-z 12525 df-dec 12645 df-uz 12789 df-q 12899 df-rp 12943 df-xneg 13063 df-xadd 13064 df-xmul 13065 df-ioo 13302 df-ioc 13303 df-ico 13304 df-icc 13305 df-fz 13462 df-fzo 13609 df-fl 13751 df-mod 13829 df-seq 13964 df-exp 14024 df-fac 14236 df-bc 14265 df-hash 14293 df-shft 15029 df-cj 15061 df-re 15062 df-im 15063 df-sqrt 15197 df-abs 15198 df-limsup 15433 df-clim 15450 df-rlim 15451 df-o1 15452 df-lo1 15453 df-sum 15649 df-ef 16032 df-e 16033 df-sin 16034 df-cos 16035 df-tan 16036 df-pi 16037 df-dvds 16222 df-gcd 16464 df-prm 16641 df-pc 16808 df-struct 17117 df-sets 17134 df-slot 17152 df-ndx 17164 df-base 17180 df-ress 17201 df-plusg 17233 df-mulr 17234 df-starv 17235 df-sca 17236 df-vsca 17237 df-ip 17238 df-tset 17239 df-ple 17240 df-ds 17242 df-unif 17243 df-hom 17244 df-cco 17245 df-rest 17385 df-topn 17386 df-0g 17404 df-gsum 17405 df-topgen 17406 df-pt 17407 df-prds 17410 df-xrs 17466 df-qtop 17471 df-imas 17472 df-xps 17474 df-mre 17548 df-mrc 17549 df-acs 17551 df-mgm 18608 df-sgrp 18687 df-mnd 18703 df-submnd 18752 df-mulg 19044 df-cntz 19292 df-cmn 19757 df-psmet 21344 df-xmet 21345 df-met 21346 df-bl 21347 df-mopn 21348 df-fbas 21349 df-fg 21350 df-cnfld 21353 df-top 22859 df-topon 22876 df-topsp 22898 df-bases 22911 df-cld 22984 df-ntr 22985 df-cls 22986 df-nei 23063 df-lp 23101 df-perf 23102 df-cn 23192 df-cnp 23193 df-haus 23280 df-cmp 23352 df-tx 23527 df-hmeo 23720 df-fil 23811 df-fm 23903 df-flim 23904 df-flf 23905 df-xms 24285 df-ms 24286 df-tms 24287 df-cncf 24845 df-limc 25833 df-dv 25834 df-ulm 26342 df-log 26520 df-cxp 26521 df-atan 26831 df-em 26956 df-cht 27060 df-vma 27061 df-chp 27062 df-ppi 27063 df-mu 27064

This theorem is referenced by: pntrlog2bndlem6 27546

W3C validator