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 27074

Description: Lemma for pntrlog2bnd 27077. 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 13351	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (1(,)+∞) → 𝑥 ∈ ℝ)
2	1	adantl 483	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ)
3		1rp 12975	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℝ⁺
4	3	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ⁺)
5		1red 11212	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ)
6		eliooord 13380	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1(,)+∞) → (1 < 𝑥 ∧ 𝑥 < +∞))
7	6	adantl 483	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 < 𝑥 ∧ 𝑥 < +∞))
8	7	simpld 496	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 < 𝑥)
9	5, 2, 8	ltled 11359	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ≤ 𝑥)
10	2, 4, 9	rpgecld 13052	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ⁺)
11		pntrlog2bnd.r	. . . . . . . . . . . . 13 ⊢ 𝑅 = (𝑎 ∈ ℝ⁺ ↦ ((ψ‘𝑎) − 𝑎))
12	11	pntrf 27056	. . . . . . . . . . . 12 ⊢ 𝑅:ℝ⁺⟶ℝ
13	12	ffvelcdmi 7083	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℝ⁺ → (𝑅‘𝑥) ∈ ℝ)
14	10, 13	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (𝑅‘𝑥) ∈ ℝ)
15	14	recnd 11239	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (𝑅‘𝑥) ∈ ℂ)
16	15	abscld 15380	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (abs‘(𝑅‘𝑥)) ∈ ℝ)
17	16	recnd 11239	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (abs‘(𝑅‘𝑥)) ∈ ℂ)
18	10	relogcld 26123	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ)
19	18	recnd 11239	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℂ)
20	17, 19	mulcld 11231	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅‘𝑥)) · (log‘𝑥)) ∈ ℂ)
21		2cnd 12287	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℂ)
22	2, 8	rplogcld 26129	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ⁺)
23	22	rpne0d 13018	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ≠ 0)
24	21, 19, 23	divcld 11987	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 / (log‘𝑥)) ∈ ℂ)
25		fzfid 13935	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1...(⌊‘𝑥)) ∈ Fin)
26	10	adantr 482	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ⁺)
27		elfznn 13527	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
28	27	adantl 483	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
29	28	nnrpd 13011	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ⁺)
30	26, 29	rpdivcld 13030	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ⁺)
31	12	ffvelcdmi 7083	. . . . . . . . . . . . 13 ⊢ ((𝑥 / 𝑛) ∈ ℝ⁺ → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
32	30, 31	syl 17	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
33	32	recnd 11239	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℂ)
34	33	abscld 15380	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℝ)
35	29	relogcld 26123	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ∈ ℝ)
36		1red 11212	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℝ)
37	35, 36	readdcld 11240	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((log‘𝑛) + 1) ∈ ℝ)
38	34, 37	remulcld 11241	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℝ)
39	38	recnd 11239	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℂ)
40	25, 39	fsumcl 15676	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℂ)
41	24, 40	mulcld 11231	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) ∈ ℂ)
42	20, 41	subcld 11568	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) ∈ ℂ)
43	34	recnd 11239	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℂ)
44	25, 43	fsumcl 15676	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℂ)
45	24, 44	mulcld 11231	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) ∈ ℂ)
46	2	recnd 11239	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℂ)
47	10	rpne0d 13018	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ≠ 0)
48	42, 45, 46, 47	divdird 12025	. . . 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 11241	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅‘𝑥)) · (log‘𝑥)) ∈ ℝ)
50	49	recnd 11239	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅‘𝑥)) · (log‘𝑥)) ∈ ℂ)
51	50, 41, 45	subsubd 11596	. . . . . 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 11667	. . . . . . . 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 15731	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))))
54	37	recnd 11239	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((log‘𝑛) + 1) ∈ ℂ)
55		1cnd 11206	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℂ)
56	43, 54, 55	subdid 11667	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (((log‘𝑛) + 1) − 1)) = (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − ((abs‘(𝑅‘(𝑥 / 𝑛))) · 1)))
57	35	recnd 11239	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ∈ ℂ)
58	57, 55	pncand 11569	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((log‘𝑛) + 1) − 1) = (log‘𝑛))
59	58	oveq2d 7422	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (((log‘𝑛) + 1) − 1)) = ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
60	43	mulridd 11228	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · 1) = (abs‘(𝑅‘(𝑥 / 𝑛))))
61	60	oveq2d 7422	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − ((abs‘(𝑅‘(𝑥 / 𝑛))) · 1)) = (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))))
62	56, 59, 61	3eqtr3rd 2782	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
63	62	sumeq2dv 15646	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − (abs‘(𝑅‘(𝑥 / 𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
64	53, 63	eqtr3d 2775	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
65	64	oveq2d 7422	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) − Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) = ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
66	52, 65	eqtr3d 2775	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) = ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
67	66	oveq2d 7422	. . . . . 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 2775	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))))) = (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
69	68	oveq1d 7421	. . . 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 2775	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥)) = ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥))
71	70	mpteq2dva 5248	. 2 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥))) = (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)))
72		2re 12283	. . . . . . . 8 ⊢ 2 ∈ ℝ
73	72	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ)
74	73, 22	rerpdivcld 13044	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 / (log‘𝑥)) ∈ ℝ)
75	25, 38	fsumrecl 15677	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)) ∈ ℝ)
76	74, 75	remulcld 11241	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))) ∈ ℝ)
77	49, 76	resubcld 11639	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) ∈ ℝ)
78	77, 10	rerpdivcld 13044	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) ∈ ℝ)
79	25, 34	fsumrecl 15677	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℝ)
80	74, 79	remulcld 11241	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) ∈ ℝ)
81	80, 10	rerpdivcld 13044	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) ∈ ℝ)
82		1red 11212	. . . 4 ⊢ (𝜑 → 1 ∈ ℝ)
83		pntsval.1	. . . . . 6 ⊢ 𝑆 = (𝑎 ∈ ℝ ↦ Σ𝑖 ∈ (1...(⌊‘𝑎))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑎 / 𝑖)))))
84		pntrlog2bnd.t	. . . . . 6 ⊢ 𝑇 = (𝑎 ∈ ℝ ↦ if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0))
85	83, 11, 84	pntrlog2bndlem4 27073	. . . . 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 12224	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ)
88		simpl 484	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → 𝑎 ∈ ℝ)
89		simpr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → 𝑎 ∈ ℝ⁺)
90	89	relogcld 26123	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → (log‘𝑎) ∈ ℝ)
91	88, 90	remulcld 11241	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ ℝ ∧ 𝑎 ∈ ℝ⁺) → (𝑎 · (log‘𝑎)) ∈ ℝ)
92		0red 11214	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ ℝ ∧ ¬ 𝑎 ∈ ℝ⁺) → 0 ∈ ℝ)
93	91, 92	ifclda 4563	. . . . . . . . . . . . 13 ⊢ (𝑎 ∈ ℝ → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) ∈ ℝ)
94	84, 93	fmpti 7109	. . . . . . . . . . . 12 ⊢ 𝑇:ℝ⟶ℝ
95	94	ffvelcdmi 7083	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℝ → (𝑇‘𝑛) ∈ ℝ)
96	87, 95	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑇‘𝑛) ∈ ℝ)
97	87, 36	resubcld 11639	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑛 − 1) ∈ ℝ)
98	94	ffvelcdmi 7083	. . . . . . . . . . 11 ⊢ ((𝑛 − 1) ∈ ℝ → (𝑇‘(𝑛 − 1)) ∈ ℝ)
99	97, 98	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑇‘(𝑛 − 1)) ∈ ℝ)
100	96, 99	resubcld 11639	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ∈ ℝ)
101	34, 100	remulcld 11241	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ∈ ℝ)
102	25, 101	fsumrecl 15677	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ∈ ℝ)
103	74, 102	remulcld 11241	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))))) ∈ ℝ)
104	49, 103	resubcld 11639	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) ∈ ℝ)
105	104, 10	rerpdivcld 13044	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) / 𝑥) ∈ ℝ)
106		2rp 12976	. . . . . . . . . . 11 ⊢ 2 ∈ ℝ⁺
107	106	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ⁺)
108	107	rpge0d 13017	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ 2)
109	73, 22, 108	divge0d 13053	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ (2 / (log‘𝑥)))
110	33	absge0d 15388	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (abs‘(𝑅‘(𝑥 / 𝑛))))
111	29	adantr 482	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 𝑛 ∈ ℝ⁺)
112	111	rpcnd 13015	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 𝑛 ∈ ℂ)
113	57	adantr 482	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘𝑛) ∈ ℂ)
114	112, 113	mulcld 11231	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · (log‘𝑛)) ∈ ℂ)
115		simpr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 1 < 𝑛)
116		1re 11211	. . . . . . . . . . . . . . . . . . 19 ⊢ 1 ∈ ℝ
117	111	rpred 13013	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 𝑛 ∈ ℝ)
118		difrp 13009	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1 ∈ ℝ ∧ 𝑛 ∈ ℝ) → (1 < 𝑛 ↔ (𝑛 − 1) ∈ ℝ⁺))
119	116, 117, 118	sylancr 588	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (1 < 𝑛 ↔ (𝑛 − 1) ∈ ℝ⁺))
120	115, 119	mpbid 231	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 − 1) ∈ ℝ⁺)
121	120	relogcld 26123	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘(𝑛 − 1)) ∈ ℝ)
122	121	recnd 11239	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘(𝑛 − 1)) ∈ ℂ)
123	112, 122	mulcld 11231	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · (log‘(𝑛 − 1))) ∈ ℂ)
124	114, 123, 122	subsubd 11596	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · (log‘𝑛)) − ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1)))) = (((𝑛 · (log‘𝑛)) − (𝑛 · (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))))
125		rpre 12979	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℝ⁺ → 𝑛 ∈ ℝ)
126		eleq1 2822	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 𝑛 → (𝑎 ∈ ℝ⁺ ↔ 𝑛 ∈ ℝ⁺))
127		id 22	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 𝑛 → 𝑎 = 𝑛)
128		fveq2 6889	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 𝑛 → (log‘𝑎) = (log‘𝑛))
129	127, 128	oveq12d 7424	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 𝑛 → (𝑎 · (log‘𝑎)) = (𝑛 · (log‘𝑛)))
130	126, 129	ifbieq1d 4552	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 = 𝑛 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0))
131		ovex 7439	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 · (log‘𝑛)) ∈ V
132		c0ex 11205	. . . . . . . . . . . . . . . . . . 19 ⊢ 0 ∈ V
133	131, 132	ifex 4578	. . . . . . . . . . . . . . . . . 18 ⊢ if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0) ∈ V
134	130, 84, 133	fvmpt 6996	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℝ → (𝑇‘𝑛) = if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0))
135	125, 134	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℝ⁺ → (𝑇‘𝑛) = if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0))
136		iftrue 4534	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℝ⁺ → if(𝑛 ∈ ℝ⁺, (𝑛 · (log‘𝑛)), 0) = (𝑛 · (log‘𝑛)))
137	135, 136	eqtrd 2773	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℝ⁺ → (𝑇‘𝑛) = (𝑛 · (log‘𝑛)))
138	111, 137	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑇‘𝑛) = (𝑛 · (log‘𝑛)))
139		rpre 12979	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → (𝑛 − 1) ∈ ℝ)
140		eleq1 2822	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (𝑛 − 1) → (𝑎 ∈ ℝ⁺ ↔ (𝑛 − 1) ∈ ℝ⁺))
141		id 22	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (𝑛 − 1) → 𝑎 = (𝑛 − 1))
142		fveq2 6889	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = (𝑛 − 1) → (log‘𝑎) = (log‘(𝑛 − 1)))
143	141, 142	oveq12d 7424	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = (𝑛 − 1) → (𝑎 · (log‘𝑎)) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
144	140, 143	ifbieq1d 4552	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = (𝑛 − 1) → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0))
145		ovex 7439	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑛 − 1) · (log‘(𝑛 − 1))) ∈ V
146	145, 132	ifex 4578	. . . . . . . . . . . . . . . . . . 19 ⊢ if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0) ∈ V
147	144, 84, 146	fvmpt 6996	. . . . . . . . . . . . . . . . . 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 4534	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → if((𝑛 − 1) ∈ ℝ⁺, ((𝑛 − 1) · (log‘(𝑛 − 1))), 0) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
150	148, 149	eqtrd 2773	. . . . . . . . . . . . . . . 16 ⊢ ((𝑛 − 1) ∈ ℝ⁺ → (𝑇‘(𝑛 − 1)) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
151	120, 150	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑇‘(𝑛 − 1)) = ((𝑛 − 1) · (log‘(𝑛 − 1))))
152		1cnd 11206	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 1 ∈ ℂ)
153	112, 152, 122	subdird 11668	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · (log‘(𝑛 − 1))) = ((𝑛 · (log‘(𝑛 − 1))) − (1 · (log‘(𝑛 − 1)))))
154	122	mullidd 11229	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (1 · (log‘(𝑛 − 1))) = (log‘(𝑛 − 1)))
155	154	oveq2d 7422	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · (log‘(𝑛 − 1))) − (1 · (log‘(𝑛 − 1)))) = ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1))))
156	151, 153, 155	3eqtrd 2777	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑇‘(𝑛 − 1)) = ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1))))
157	138, 156	oveq12d 7424	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = ((𝑛 · (log‘𝑛)) − ((𝑛 · (log‘(𝑛 − 1))) − (log‘(𝑛 − 1)))))
158	112, 113, 122	subdid 11667	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) = ((𝑛 · (log‘𝑛)) − (𝑛 · (log‘(𝑛 − 1)))))
159	158	oveq1d 7421	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) = (((𝑛 · (log‘𝑛)) − (𝑛 · (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))))
160	124, 157, 159	3eqtr4d 2783	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))))
161	111	relogcld 26123	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘𝑛) ∈ ℝ)
162	161, 121	resubcld 11639	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘𝑛) − (log‘(𝑛 − 1))) ∈ ℝ)
163	162	recnd 11239	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘𝑛) − (log‘(𝑛 − 1))) ∈ ℂ)
164	112, 152, 163	subdird 11668	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · ((log‘𝑛) − (log‘(𝑛 − 1)))) = ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − (1 · ((log‘𝑛) − (log‘(𝑛 − 1))))))
165	163	mullidd 11229	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (1 · ((log‘𝑛) − (log‘(𝑛 − 1)))) = ((log‘𝑛) − (log‘(𝑛 − 1))))
166	165	oveq2d 7422	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − (1 · ((log‘𝑛) − (log‘(𝑛 − 1))))) = ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − ((log‘𝑛) − (log‘(𝑛 − 1)))))
167	117, 162	remulcld 11241	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) ∈ ℝ)
168	167	recnd 11239	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) ∈ ℂ)
169	168, 113, 122	subsub3d 11598	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) − ((log‘𝑛) − (log‘(𝑛 − 1)))) = (((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)))
170	164, 166, 169	3eqtrd 2777	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) · ((log‘𝑛) − (log‘(𝑛 − 1)))) = (((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)))
171	112, 152	npcand 11572	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 − 1) + 1) = 𝑛)
172	171	fveq2d 6893	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (log‘((𝑛 − 1) + 1)) = (log‘𝑛))
173	172	oveq1d 7421	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘((𝑛 − 1) + 1)) − (log‘(𝑛 − 1))) = ((log‘𝑛) − (log‘(𝑛 − 1))))
174		logdifbnd 26488	. . . . . . . . . . . . . . . . 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 5172	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((log‘𝑛) − (log‘(𝑛 − 1))) ≤ (1 / (𝑛 − 1)))
177		1red 11212	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → 1 ∈ ℝ)
178	162, 177, 120	lemuldiv2d 13063	. . . . . . . . . . . . . . 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 5172	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → (((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)) ≤ 1)
181	167, 121	readdcld 11240	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) ∈ ℝ)
182	181, 161, 177	lesubadd2d 11810	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) − (log‘𝑛)) ≤ 1 ↔ ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1)))
183	180, 182	mpbid 231	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑛 · ((log‘𝑛) − (log‘(𝑛 − 1)))) + (log‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
184	160, 183	eqbrtrd 5170	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 < 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
185		fveq2 6889	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 1 → (𝑇‘𝑛) = (𝑇‘1))
186		id 22	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = 1 → 𝑎 = 1)
187	186, 3	eqeltrdi 2842	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = 1 → 𝑎 ∈ ℝ⁺)
188	187	iftrued 4536	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 1 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = (𝑎 · (log‘𝑎)))
189		fveq2 6889	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 = 1 → (log‘𝑎) = (log‘1))
190		log1 26086	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (log‘1) = 0
191	189, 190	eqtrdi 2789	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 = 1 → (log‘𝑎) = 0)
192	186, 191	oveq12d 7424	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = 1 → (𝑎 · (log‘𝑎)) = (1 · 0))
193		ax-1cn 11165	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 1 ∈ ℂ
194	193	mul01i 11401	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (1 · 0) = 0
195	192, 194	eqtrdi 2789	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 1 → (𝑎 · (log‘𝑎)) = 0)
196	188, 195	eqtrd 2773	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 1 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = 0)
197	196, 84, 132	fvmpt 6996	. . . . . . . . . . . . . . . . . 18 ⊢ (1 ∈ ℝ → (𝑇‘1) = 0)
198	116, 197	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ (𝑇‘1) = 0
199	185, 198	eqtrdi 2789	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 1 → (𝑇‘𝑛) = 0)
200		oveq1 7413	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 1 → (𝑛 − 1) = (1 − 1))
201		1m1e0 12281	. . . . . . . . . . . . . . . . . . 19 ⊢ (1 − 1) = 0
202	200, 201	eqtrdi 2789	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 1 → (𝑛 − 1) = 0)
203	202	fveq2d 6893	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 1 → (𝑇‘(𝑛 − 1)) = (𝑇‘0))
204		0re 11213	. . . . . . . . . . . . . . . . . 18 ⊢ 0 ∈ ℝ
205		rpne0 12987	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 ∈ ℝ⁺ → 𝑎 ≠ 0)
206	205	necon2bi 2972	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = 0 → ¬ 𝑎 ∈ ℝ⁺)
207	206	iffalsed 4539	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = 0 → if(𝑎 ∈ ℝ⁺, (𝑎 · (log‘𝑎)), 0) = 0)
208	207, 84, 132	fvmpt 6996	. . . . . . . . . . . . . . . . . 18 ⊢ (0 ∈ ℝ → (𝑇‘0) = 0)
209	204, 208	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ (𝑇‘0) = 0
210	203, 209	eqtrdi 2789	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 1 → (𝑇‘(𝑛 − 1)) = 0)
211	199, 210	oveq12d 7424	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 1 → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = (0 − 0))
212		0m0e0 12329	. . . . . . . . . . . . . . 15 ⊢ (0 − 0) = 0
213	211, 212	eqtrdi 2789	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 1 → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = 0)
214	213	eqcoms 2741	. . . . . . . . . . . . 13 ⊢ (1 = 𝑛 → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = 0)
215	214	adantl 483	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 = 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) = 0)
216		0red 11214	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ∈ ℝ)
217	28	nnge1d 12257	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ≤ 𝑛)
218	87, 217	logge0d 26130	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (log‘𝑛))
219	35	lep1d 12142	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ≤ ((log‘𝑛) + 1))
220	216, 35, 37, 218, 219	letrd 11368	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((log‘𝑛) + 1))
221	220	adantr 482	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 = 𝑛) → 0 ≤ ((log‘𝑛) + 1))
222	215, 221	eqbrtrd 5170	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 1 = 𝑛) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
223		elfzle1 13501	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (1...(⌊‘𝑥)) → 1 ≤ 𝑛)
224	223	adantl 483	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ≤ 𝑛)
225	36, 87	leloed 11354	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 ≤ 𝑛 ↔ (1 < 𝑛 ∨ 1 = 𝑛)))
226	224, 225	mpbid 231	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 < 𝑛 ∨ 1 = 𝑛))
227	184, 222, 226	mpjaodan 958	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))) ≤ ((log‘𝑛) + 1))
228	100, 37, 34, 110, 227	lemul2ad 12151	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ≤ ((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))
229	25, 101, 38, 228	fsumle 15742	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))
230	102, 75, 74, 109, 229	lemul2ad 12151	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1))))) ≤ ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1))))
231	103, 76, 49, 230	lesub2dd 11828	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) ≤ (((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))))
232	77, 104, 10, 231	lediv1dd 13071	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) ≤ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((𝑇‘𝑛) − (𝑇‘(𝑛 − 1)))))) / 𝑥))
233	232	adantrr 716	. . . 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 15595	. . 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 13029	. . . . . . 7 ⊢ (𝜑 → (2 · 𝐵) ∈ ℝ⁺)
238	237	rpred 13013	. . . . . 6 ⊢ (𝜑 → (2 · 𝐵) ∈ ℝ)
239	238	adantr 482	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · 𝐵) ∈ ℝ)
240	5, 22	rerpdivcld 13044	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 / (log‘𝑥)) ∈ ℝ)
241	5, 240	readdcld 11240	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 + (1 / (log‘𝑥))) ∈ ℝ)
242		ioossre 13382	. . . . . 6 ⊢ (1(,)+∞) ⊆ ℝ
243		lo1const 15562	. . . . . 6 ⊢ (((1(,)+∞) ⊆ ℝ ∧ (2 · 𝐵) ∈ ℝ) → (𝑥 ∈ (1(,)+∞) ↦ (2 · 𝐵)) ∈ ≤𝑂(1))
244	242, 238, 243	sylancr 588	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (2 · 𝐵)) ∈ ≤𝑂(1))
245		lo1const 15562	. . . . . . 7 ⊢ (((1(,)+∞) ⊆ ℝ ∧ 1 ∈ ℝ) → (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ ≤𝑂(1))
246	242, 82, 245	sylancr 588	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ ≤𝑂(1))
247		divlogrlim 26135	. . . . . . . 8 ⊢ (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ⇝_𝑟 0
248		rlimo1 15558	. . . . . . . 8 ⊢ ((𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ⇝_𝑟 0 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ 𝑂(1))
249	247, 248	mp1i 13	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ 𝑂(1))
250	240, 249	o1lo1d 15480	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ ≤𝑂(1))
251	5, 240, 246, 250	lo1add 15568	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 + (1 / (log‘𝑥)))) ∈ ≤𝑂(1))
252	237	adantr 482	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · 𝐵) ∈ ℝ⁺)
253	252	rpge0d 13017	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ (2 · 𝐵))
254	239, 241, 244, 251, 253	lo1mul 15569	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((2 · 𝐵) · (1 + (1 / (log‘𝑥))))) ∈ ≤𝑂(1))
255	239, 241	remulcld 11241	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))) ∈ ℝ)
256	79, 10	rerpdivcld 13044	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ∈ ℝ)
257	18, 5	readdcld 11240	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) + 1) ∈ ℝ)
258	236	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℝ⁺)
259	258	rpred 13013	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℝ)
260	257, 259	remulcld 11241	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) + 1) · 𝐵) ∈ ℝ)
261	28	nnrecred 12260	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 / 𝑛) ∈ ℝ)
262	25, 261	fsumrecl 15677	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) ∈ ℝ)
263	262, 259	remulcld 11241	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵) ∈ ℝ)
264	34, 26	rerpdivcld 13044	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ∈ ℝ)
265	259	adantr 482	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝐵 ∈ ℝ)
266	261, 265	remulcld 11241	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 / 𝑛) · 𝐵) ∈ ℝ)
267	30	rpcnd 13015	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℂ)
268	30	rpne0d 13018	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ≠ 0)
269	33, 267, 268	absdivd 15399	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (abs‘(𝑥 / 𝑛))))
270	2	adantr 482	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ)
271	270, 28	nndivred 12263	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ)
272	30	rpge0d 13017	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (𝑥 / 𝑛))
273	271, 272	absidd 15366	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑥 / 𝑛)) = (𝑥 / 𝑛))
274	273	oveq2d 7422	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / (abs‘(𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)))
275	269, 274	eqtrd 2773	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)))
276	46	adantr 482	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
277	87	recnd 11239	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℂ)
278	47	adantr 482	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ≠ 0)
279	28	nnne0d 12259	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ≠ 0)
280	43, 276, 277, 278, 279	divdiv2d 12019	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)) = (((abs‘(𝑅‘(𝑥 / 𝑛))) · 𝑛) / 𝑥))
281	43, 277, 276, 278	div23d 12024	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · 𝑛) / 𝑥) = (((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛))
282	275, 280, 281	3eqtrd 2777	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = (((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛))
283		fveq2 6889	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑥 / 𝑛) → (𝑅‘𝑦) = (𝑅‘(𝑥 / 𝑛)))
284		id 22	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑥 / 𝑛) → 𝑦 = (𝑥 / 𝑛))
285	283, 284	oveq12d 7424	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑥 / 𝑛) → ((𝑅‘𝑦) / 𝑦) = ((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛)))
286	285	fveq2d 6893	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑥 / 𝑛) → (abs‘((𝑅‘𝑦) / 𝑦)) = (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))))
287	286	breq1d 5158	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝑥 / 𝑛) → ((abs‘((𝑅‘𝑦) / 𝑦)) ≤ 𝐵 ↔ (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) ≤ 𝐵))
288		pntrlog2bndlem5.2	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ∀𝑦 ∈ ℝ⁺ (abs‘((𝑅‘𝑦) / 𝑦)) ≤ 𝐵)
289	288	ad2antrr 725	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ∀𝑦 ∈ ℝ⁺ (abs‘((𝑅‘𝑦) / 𝑦)) ≤ 𝐵)
290	287, 289, 30	rspcdva 3614	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) ≤ 𝐵)
291	282, 290	eqbrtrrd 5172	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛) ≤ 𝐵)
292	264, 265, 29	lemuldivd 13062	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) · 𝑛) ≤ 𝐵 ↔ ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (𝐵 / 𝑛)))
293	291, 292	mpbid 231	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (𝐵 / 𝑛))
294	265	recnd 11239	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝐵 ∈ ℂ)
295	294, 277, 279	divrec2d 11991	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐵 / 𝑛) = ((1 / 𝑛) · 𝐵))
296	293, 295	breqtrd 5174	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ ((1 / 𝑛) · 𝐵))
297	25, 264, 266, 296	fsumle 15742	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((1 / 𝑛) · 𝐵))
298	25, 46, 43, 47	fsumdivc 15729	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) = Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥))
299	258	rpcnd 13015	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℂ)
300	261	recnd 11239	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 / 𝑛) ∈ ℂ)
301	25, 299, 300	fsummulc1 15728	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵) = Σ𝑛 ∈ (1...(⌊‘𝑥))((1 / 𝑛) · 𝐵))
302	297, 298, 301	3brtr4d 5180	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵))
303	258	rpge0d 13017	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 0 ≤ 𝐵)
304		harmonicubnd 26504	. . . . . . . . . 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 12150	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) · 𝐵) ≤ (((log‘𝑥) + 1) · 𝐵))
307	256, 263, 260, 302, 306	letrd 11368	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥) ≤ (((log‘𝑥) + 1) · 𝐵))
308	256, 260, 74, 109, 307	lemul2ad 12151	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥)) ≤ ((2 / (log‘𝑥)) · (((log‘𝑥) + 1) · 𝐵)))
309	24, 44, 46, 47	divassd 12022	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) = ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛))) / 𝑥)))
310	241	recnd 11239	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 + (1 / (log‘𝑥))) ∈ ℂ)
311	21, 299, 310	mul32d 11421	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))) = ((2 · (1 + (1 / (log‘𝑥)))) · 𝐵))
312		1cnd 11206	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℂ)
313	19, 312, 19, 23	divdird 12025	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) + 1) / (log‘𝑥)) = (((log‘𝑥) / (log‘𝑥)) + (1 / (log‘𝑥))))
314	19, 23	dividd 11985	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) / (log‘𝑥)) = 1)
315	314	oveq1d 7421	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) / (log‘𝑥)) + (1 / (log‘𝑥))) = (1 + (1 / (log‘𝑥))))
316	313, 315	eqtr2d 2774	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (1 + (1 / (log‘𝑥))) = (((log‘𝑥) + 1) / (log‘𝑥)))
317	316	oveq2d 7422	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · (1 + (1 / (log‘𝑥)))) = (2 · (((log‘𝑥) + 1) / (log‘𝑥))))
318	19, 312	addcld 11230	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) + 1) ∈ ℂ)
319	21, 19, 318, 23	div32d 12010	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · ((log‘𝑥) + 1)) = (2 · (((log‘𝑥) + 1) / (log‘𝑥))))
320	317, 319	eqtr4d 2776	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (2 · (1 + (1 / (log‘𝑥)))) = ((2 / (log‘𝑥)) · ((log‘𝑥) + 1)))
321	320	oveq1d 7421	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · (1 + (1 / (log‘𝑥)))) · 𝐵) = (((2 / (log‘𝑥)) · ((log‘𝑥) + 1)) · 𝐵))
322	24, 318, 299	mulassd 11234	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · ((log‘𝑥) + 1)) · 𝐵) = ((2 / (log‘𝑥)) · (((log‘𝑥) + 1) · 𝐵)))
323	311, 321, 322	3eqtrd 2777	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))) = ((2 / (log‘𝑥)) · (((log‘𝑥) + 1) · 𝐵)))
324	308, 309, 323	3brtr4d 5180	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) ≤ ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))))
325	324	adantrr 716	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ (1(,)+∞) ∧ 1 ≤ 𝑥)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥) ≤ ((2 · 𝐵) · (1 + (1 / (log‘𝑥)))))
326	82, 254, 255, 81, 325	lo1le 15595	. . 3 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥)) ∈ ≤𝑂(1))
327	78, 81, 234, 326	lo1add 15568	. 2 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · ((log‘𝑛) + 1)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘(𝑅‘(𝑥 / 𝑛)))) / 𝑥))) ∈ ≤𝑂(1))
328	71, 327	eqeltrrd 2835	1 ⊢ (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅‘𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)) ∈ ≤𝑂(1))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 397 ∨ wo 846 = wceq 1542 ∈ wcel 2107 ≠ wne 2941 ∀wral 3062 ⊆ wss 3948 ifcif 4528 class class class wbr 5148 ↦ cmpt 5231 ‘cfv 6541 (class class class)co 7406 ℂcc 11105 ℝcr 11106 0cc0 11107 1c1 11108 + caddc 11110 · cmul 11112 +∞cpnf 11242 < clt 11245 ≤ cle 11246 − cmin 11441 / cdiv 11868 ℕcn 12209 2c2 12264 ℝ⁺crp 12971 (,)cioo 13321 ...cfz 13481 ⌊cfl 13752 abscabs 15178 ⇝_𝑟 crli 15426 𝑂(1)co1 15427 ≤𝑂(1)clo1 15428 Σcsu 15629 logclog 26055 Λcvma 26586 ψcchp 26587

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-rep 5285 ax-sep 5299 ax-nul 5306 ax-pow 5363 ax-pr 5427 ax-un 7722 ax-inf2 9633 ax-cnex 11163 ax-resscn 11164 ax-1cn 11165 ax-icn 11166 ax-addcl 11167 ax-addrcl 11168 ax-mulcl 11169 ax-mulrcl 11170 ax-mulcom 11171 ax-addass 11172 ax-mulass 11173 ax-distr 11174 ax-i2m1 11175 ax-1ne0 11176 ax-1rid 11177 ax-rnegex 11178 ax-rrecex 11179 ax-cnre 11180 ax-pre-lttri 11181 ax-pre-lttrn 11182 ax-pre-ltadd 11183 ax-pre-mulgt0 11184 ax-pre-sup 11185 ax-addf 11186 ax-mulf 11187

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-rmo 3377 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3778 df-csb 3894 df-dif 3951 df-un 3953 df-in 3955 df-ss 3965 df-pss 3967 df-nul 4323 df-if 4529 df-pw 4604 df-sn 4629 df-pr 4631 df-tp 4633 df-op 4635 df-uni 4909 df-int 4951 df-iun 4999 df-iin 5000 df-disj 5114 df-br 5149 df-opab 5211 df-mpt 5232 df-tr 5266 df-id 5574 df-eprel 5580 df-po 5588 df-so 5589 df-fr 5631 df-se 5632 df-we 5633 df-xp 5682 df-rel 5683 df-cnv 5684 df-co 5685 df-dm 5686 df-rn 5687 df-res 5688 df-ima 5689 df-pred 6298 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6493 df-fun 6543 df-fn 6544 df-f 6545 df-f1 6546 df-fo 6547 df-f1o 6548 df-fv 6549 df-isom 6550 df-riota 7362 df-ov 7409 df-oprab 7410 df-mpo 7411 df-of 7667 df-om 7853 df-1st 7972 df-2nd 7973 df-supp 8144 df-frecs 8263 df-wrecs 8294 df-recs 8368 df-rdg 8407 df-1o 8463 df-2o 8464 df-oadd 8467 df-er 8700 df-map 8819 df-pm 8820 df-ixp 8889 df-en 8937 df-dom 8938 df-sdom 8939 df-fin 8940 df-fsupp 9359 df-fi 9403 df-sup 9434 df-inf 9435 df-oi 9502 df-dju 9893 df-card 9931 df-pnf 11247 df-mnf 11248 df-xr 11249 df-ltxr 11250 df-le 11251 df-sub 11443 df-neg 11444 df-div 11869 df-nn 12210 df-2 12272 df-3 12273 df-4 12274 df-5 12275 df-6 12276 df-7 12277 df-8 12278 df-9 12279 df-n0 12470 df-xnn0 12542 df-z 12556 df-dec 12675 df-uz 12820 df-q 12930 df-rp 12972 df-xneg 13089 df-xadd 13090 df-xmul 13091 df-ioo 13325 df-ioc 13326 df-ico 13327 df-icc 13328 df-fz 13482 df-fzo 13625 df-fl 13754 df-mod 13832 df-seq 13964 df-exp 14025 df-fac 14231 df-bc 14260 df-hash 14288 df-shft 15011 df-cj 15043 df-re 15044 df-im 15045 df-sqrt 15179 df-abs 15180 df-limsup 15412 df-clim 15429 df-rlim 15430 df-o1 15431 df-lo1 15432 df-sum 15630 df-ef 16008 df-e 16009 df-sin 16010 df-cos 16011 df-tan 16012 df-pi 16013 df-dvds 16195 df-gcd 16433 df-prm 16606 df-pc 16767 df-struct 17077 df-sets 17094 df-slot 17112 df-ndx 17124 df-base 17142 df-ress 17171 df-plusg 17207 df-mulr 17208 df-starv 17209 df-sca 17210 df-vsca 17211 df-ip 17212 df-tset 17213 df-ple 17214 df-ds 17216 df-unif 17217 df-hom 17218 df-cco 17219 df-rest 17365 df-topn 17366 df-0g 17384 df-gsum 17385 df-topgen 17386 df-pt 17387 df-prds 17390 df-xrs 17445 df-qtop 17450 df-imas 17451 df-xps 17453 df-mre 17527 df-mrc 17528 df-acs 17530 df-mgm 18558 df-sgrp 18607 df-mnd 18623 df-submnd 18669 df-mulg 18946 df-cntz 19176 df-cmn 19645 df-psmet 20929 df-xmet 20930 df-met 20931 df-bl 20932 df-mopn 20933 df-fbas 20934 df-fg 20935 df-cnfld 20938 df-top 22388 df-topon 22405 df-topsp 22427 df-bases 22441 df-cld 22515 df-ntr 22516 df-cls 22517 df-nei 22594 df-lp 22632 df-perf 22633 df-cn 22723 df-cnp 22724 df-haus 22811 df-cmp 22883 df-tx 23058 df-hmeo 23251 df-fil 23342 df-fm 23434 df-flim 23435 df-flf 23436 df-xms 23818 df-ms 23819 df-tms 23820 df-cncf 24386 df-limc 25375 df-dv 25376 df-ulm 25881 df-log 26057 df-cxp 26058 df-atan 26362 df-em 26487 df-cht 26591 df-vma 26592 df-chp 26593 df-ppi 26594 df-mu 26595

This theorem is referenced by: pntrlog2bndlem6 27076

W3C validator