chpdifbndlem1 - Metamath Proof Explorer

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

Theorem chpdifbndlem1 27617

Description: Lemma for chpdifbnd 27619. (Contributed by Mario Carneiro, 25-May-2016.)

**Hypotheses**
Ref	Expression
chpdifbnd.a	⊢ (𝜑 → 𝐴 ∈ ℝ⁺)
chpdifbnd.1	⊢ (𝜑 → 1 ≤ 𝐴)
chpdifbnd.b	⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
chpdifbnd.2	⊢ (𝜑 → ∀𝑧 ∈ (1[,)+∞)(abs‘(((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧)))) ≤ 𝐵)
chpdifbnd.c	⊢ 𝐶 = ((𝐵 · (𝐴 + 1)) + ((2 · 𝐴) · (log‘𝐴)))
chpdifbnd.x	⊢ (𝜑 → 𝑋 ∈ (1(,)+∞))
chpdifbnd.y	⊢ (𝜑 → 𝑌 ∈ (𝑋[,](𝐴 · 𝑋)))

**Assertion**
Ref	Expression
chpdifbndlem1	⊢ (𝜑 → ((ψ‘𝑌) − (ψ‘𝑋)) ≤ ((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))))

Distinct variable groups: 𝑧,𝑚,𝐶 𝑧,𝑋 𝑧,𝑌 𝑧,𝐵 Allowed substitution hints: 𝜑(𝑧,𝑚) 𝐴(𝑧,𝑚) 𝐵(𝑚) 𝑋(𝑚) 𝑌(𝑚)

Proof of Theorem chpdifbndlem1 Dummy variable 𝑛 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		chpdifbnd.y	. . . . . . . . 9 ⊢ (𝜑 → 𝑌 ∈ (𝑋[,](𝐴 · 𝑋)))
2		ioossre 13411	. . . . . . . . . . 11 ⊢ (1(,)+∞) ⊆ ℝ
3		chpdifbnd.x	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ∈ (1(,)+∞))
4	2, 3	sselid 3934	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ ℝ)
5		chpdifbnd.a	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐴 ∈ ℝ⁺)
6	5	rpred 13037	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ ℝ)
7	6, 4	remulcld 11212	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 · 𝑋) ∈ ℝ)
8		elicc2 13415	. . . . . . . . . 10 ⊢ ((𝑋 ∈ ℝ ∧ (𝐴 · 𝑋) ∈ ℝ) → (𝑌 ∈ (𝑋[,](𝐴 · 𝑋)) ↔ (𝑌 ∈ ℝ ∧ 𝑋 ≤ 𝑌 ∧ 𝑌 ≤ (𝐴 · 𝑋))))
9	4, 7, 8	syl2anc 593	. . . . . . . . 9 ⊢ (𝜑 → (𝑌 ∈ (𝑋[,](𝐴 · 𝑋)) ↔ (𝑌 ∈ ℝ ∧ 𝑋 ≤ 𝑌 ∧ 𝑌 ≤ (𝐴 · 𝑋))))
10	1, 9	mpbid 234	. . . . . . . 8 ⊢ (𝜑 → (𝑌 ∈ ℝ ∧ 𝑋 ≤ 𝑌 ∧ 𝑌 ≤ (𝐴 · 𝑋)))
11	10	simp1d 1155	. . . . . . 7 ⊢ (𝜑 → 𝑌 ∈ ℝ)
12		chpcl 27188	. . . . . . 7 ⊢ (𝑌 ∈ ℝ → (ψ‘𝑌) ∈ ℝ)
13	11, 12	syl 17	. . . . . 6 ⊢ (𝜑 → (ψ‘𝑌) ∈ ℝ)
14		chpcl 27188	. . . . . . 7 ⊢ (𝑋 ∈ ℝ → (ψ‘𝑋) ∈ ℝ)
15	4, 14	syl 17	. . . . . 6 ⊢ (𝜑 → (ψ‘𝑋) ∈ ℝ)
16	13, 15	resubcld 11615	. . . . 5 ⊢ (𝜑 → ((ψ‘𝑌) − (ψ‘𝑋)) ∈ ℝ)
17		0red 11184	. . . . . . . 8 ⊢ (𝜑 → 0 ∈ ℝ)
18		1re 11181	. . . . . . . . 9 ⊢ 1 ∈ ℝ
19	18	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 1 ∈ ℝ)
20		0lt1 11709	. . . . . . . . 9 ⊢ 0 < 1
21	20	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 0 < 1)
22		eliooord 13409	. . . . . . . . . 10 ⊢ (𝑋 ∈ (1(,)+∞) → (1 < 𝑋 ∧ 𝑋 < +∞))
23	3, 22	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (1 < 𝑋 ∧ 𝑋 < +∞))
24	23	simpld 498	. . . . . . . 8 ⊢ (𝜑 → 1 < 𝑋)
25	17, 19, 4, 21, 24	lttrd 11344	. . . . . . 7 ⊢ (𝜑 → 0 < 𝑋)
26	4, 25	elrpd 13034	. . . . . 6 ⊢ (𝜑 → 𝑋 ∈ ℝ⁺)
27	26	relogcld 26688	. . . . 5 ⊢ (𝜑 → (log‘𝑋) ∈ ℝ)
28	16, 27	remulcld 11212	. . . 4 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) ∈ ℝ)
29		2re 12292	. . . . . . 7 ⊢ 2 ∈ ℝ
30	11, 4	resubcld 11615	. . . . . . 7 ⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℝ)
31		remulcl 11158	. . . . . . 7 ⊢ ((2 ∈ ℝ ∧ (𝑌 − 𝑋) ∈ ℝ) → (2 · (𝑌 − 𝑋)) ∈ ℝ)
32	29, 30, 31	sylancr 596	. . . . . 6 ⊢ (𝜑 → (2 · (𝑌 − 𝑋)) ∈ ℝ)
33	32, 27	remulcld 11212	. . . . 5 ⊢ (𝜑 → ((2 · (𝑌 − 𝑋)) · (log‘𝑋)) ∈ ℝ)
34		chpdifbnd.b	. . . . . . . 8 ⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
35	34	rpred 13037	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ ℝ)
36	11, 4	readdcld 11211	. . . . . . 7 ⊢ (𝜑 → (𝑌 + 𝑋) ∈ ℝ)
37	35, 36	remulcld 11212	. . . . . 6 ⊢ (𝜑 → (𝐵 · (𝑌 + 𝑋)) ∈ ℝ)
38	5	relogcld 26688	. . . . . . . 8 ⊢ (𝜑 → (log‘𝐴) ∈ ℝ)
39		remulcl 11158	. . . . . . . 8 ⊢ ((2 ∈ ℝ ∧ (log‘𝐴) ∈ ℝ) → (2 · (log‘𝐴)) ∈ ℝ)
40	29, 38, 39	sylancr 596	. . . . . . 7 ⊢ (𝜑 → (2 · (log‘𝐴)) ∈ ℝ)
41	40, 11	remulcld 11212	. . . . . 6 ⊢ (𝜑 → ((2 · (log‘𝐴)) · 𝑌) ∈ ℝ)
42	37, 41	readdcld 11211	. . . . 5 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) ∈ ℝ)
43	33, 42	readdcld 11211	. . . 4 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌))) ∈ ℝ)
44		chpdifbnd.c	. . . . . . 7 ⊢ 𝐶 = ((𝐵 · (𝐴 + 1)) + ((2 · 𝐴) · (log‘𝐴)))
45		peano2re 11356	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ → (𝐴 + 1) ∈ ℝ)
46	6, 45	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 + 1) ∈ ℝ)
47	35, 46	remulcld 11212	. . . . . . . 8 ⊢ (𝜑 → (𝐵 · (𝐴 + 1)) ∈ ℝ)
48		remulcl 11158	. . . . . . . . . 10 ⊢ ((2 ∈ ℝ ∧ 𝐴 ∈ ℝ) → (2 · 𝐴) ∈ ℝ)
49	29, 6, 48	sylancr 596	. . . . . . . . 9 ⊢ (𝜑 → (2 · 𝐴) ∈ ℝ)
50	49, 38	remulcld 11212	. . . . . . . 8 ⊢ (𝜑 → ((2 · 𝐴) · (log‘𝐴)) ∈ ℝ)
51	47, 50	readdcld 11211	. . . . . . 7 ⊢ (𝜑 → ((𝐵 · (𝐴 + 1)) + ((2 · 𝐴) · (log‘𝐴))) ∈ ℝ)
52	44, 51	eqeltrid 2866	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ ℝ)
53	52, 4	remulcld 11212	. . . . 5 ⊢ (𝜑 → (𝐶 · 𝑋) ∈ ℝ)
54	33, 53	readdcld 11211	. . . 4 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + (𝐶 · 𝑋)) ∈ ℝ)
55	13, 27	remulcld 11212	. . . . . . 7 ⊢ (𝜑 → ((ψ‘𝑌) · (log‘𝑋)) ∈ ℝ)
56		fzfid 13986	. . . . . . . 8 ⊢ (𝜑 → (1...(⌊‘𝑋)) ∈ Fin)
57	10	simp2d 1156	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 ≤ 𝑌)
58		flword2 13823	. . . . . . . . . . . 12 ⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ ∧ 𝑋 ≤ 𝑌) → (⌊‘𝑌) ∈ (ℤ_≥‘(⌊‘𝑋)))
59	4, 11, 57, 58	syl3anc 1390	. . . . . . . . . . 11 ⊢ (𝜑 → (⌊‘𝑌) ∈ (ℤ_≥‘(⌊‘𝑋)))
60		fzss2 13569	. . . . . . . . . . 11 ⊢ ((⌊‘𝑌) ∈ (ℤ_≥‘(⌊‘𝑋)) → (1...(⌊‘𝑋)) ⊆ (1...(⌊‘𝑌)))
61	59, 60	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (1...(⌊‘𝑋)) ⊆ (1...(⌊‘𝑌)))
62	61	sselda 3936	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑋))) → 𝑛 ∈ (1...(⌊‘𝑌)))
63		elfznn 13558	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ (1...(⌊‘𝑌)) → 𝑛 ∈ ℕ)
64	63	adantl 485	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑛 ∈ ℕ)
65		vmacl 27182	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → (Λ‘𝑛) ∈ ℝ)
66	64, 65	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (Λ‘𝑛) ∈ ℝ)
67		nndivre 12254	. . . . . . . . . . . 12 ⊢ ((𝑋 ∈ ℝ ∧ 𝑛 ∈ ℕ) → (𝑋 / 𝑛) ∈ ℝ)
68	4, 63, 67	syl2an 605	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (𝑋 / 𝑛) ∈ ℝ)
69		chpcl 27188	. . . . . . . . . . 11 ⊢ ((𝑋 / 𝑛) ∈ ℝ → (ψ‘(𝑋 / 𝑛)) ∈ ℝ)
70	68, 69	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (ψ‘(𝑋 / 𝑛)) ∈ ℝ)
71	66, 70	remulcld 11212	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → ((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ∈ ℝ)
72	62, 71	syldan 600	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑋))) → ((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ∈ ℝ)
73	56, 72	fsumrecl 15761	. . . . . . 7 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ∈ ℝ)
74	55, 73	readdcld 11211	. . . . . 6 ⊢ (𝜑 → (((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) ∈ ℝ)
75		remulcl 11158	. . . . . . . . 9 ⊢ ((2 ∈ ℝ ∧ (log‘𝑋) ∈ ℝ) → (2 · (log‘𝑋)) ∈ ℝ)
76	29, 27, 75	sylancr 596	. . . . . . . 8 ⊢ (𝜑 → (2 · (log‘𝑋)) ∈ ℝ)
77	76, 35	resubcld 11615	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝑋)) − 𝐵) ∈ ℝ)
78	77, 4	remulcld 11212	. . . . . 6 ⊢ (𝜑 → (((2 · (log‘𝑋)) − 𝐵) · 𝑋) ∈ ℝ)
79	5, 26	rpmulcld 13053	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 · 𝑋) ∈ ℝ⁺)
80	79	relogcld 26688	. . . . . . . . 9 ⊢ (𝜑 → (log‘(𝐴 · 𝑋)) ∈ ℝ)
81		remulcl 11158	. . . . . . . . 9 ⊢ ((2 ∈ ℝ ∧ (log‘(𝐴 · 𝑋)) ∈ ℝ) → (2 · (log‘(𝐴 · 𝑋))) ∈ ℝ)
82	29, 80, 81	sylancr 596	. . . . . . . 8 ⊢ (𝜑 → (2 · (log‘(𝐴 · 𝑋))) ∈ ℝ)
83	35, 82	readdcld 11211	. . . . . . 7 ⊢ (𝜑 → (𝐵 + (2 · (log‘(𝐴 · 𝑋)))) ∈ ℝ)
84	83, 11	remulcld 11212	. . . . . 6 ⊢ (𝜑 → ((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) ∈ ℝ)
85	15, 27	remulcld 11212	. . . . . . 7 ⊢ (𝜑 → ((ψ‘𝑋) · (log‘𝑋)) ∈ ℝ)
86	85, 73	readdcld 11211	. . . . . 6 ⊢ (𝜑 → (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) ∈ ℝ)
87	17, 4, 11, 25, 57	ltletrd 11343	. . . . . . . . . . 11 ⊢ (𝜑 → 0 < 𝑌)
88	11, 87	elrpd 13034	. . . . . . . . . 10 ⊢ (𝜑 → 𝑌 ∈ ℝ⁺)
89	88	relogcld 26688	. . . . . . . . 9 ⊢ (𝜑 → (log‘𝑌) ∈ ℝ)
90	13, 89	remulcld 11212	. . . . . . . 8 ⊢ (𝜑 → ((ψ‘𝑌) · (log‘𝑌)) ∈ ℝ)
91		fzfid 13986	. . . . . . . . 9 ⊢ (𝜑 → (1...(⌊‘𝑌)) ∈ Fin)
92		nndivre 12254	. . . . . . . . . . . 12 ⊢ ((𝑌 ∈ ℝ ∧ 𝑛 ∈ ℕ) → (𝑌 / 𝑛) ∈ ℝ)
93	11, 63, 92	syl2an 605	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (𝑌 / 𝑛) ∈ ℝ)
94		chpcl 27188	. . . . . . . . . . 11 ⊢ ((𝑌 / 𝑛) ∈ ℝ → (ψ‘(𝑌 / 𝑛)) ∈ ℝ)
95	93, 94	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (ψ‘(𝑌 / 𝑛)) ∈ ℝ)
96	66, 95	remulcld 11212	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → ((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))) ∈ ℝ)
97	91, 96	fsumrecl 15761	. . . . . . . 8 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))) ∈ ℝ)
98	90, 97	readdcld 11211	. . . . . . 7 ⊢ (𝜑 → (((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) ∈ ℝ)
99		chpge0 27190	. . . . . . . . . 10 ⊢ (𝑌 ∈ ℝ → 0 ≤ (ψ‘𝑌))
100	11, 99	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ (ψ‘𝑌))
101	26, 88	logled 26692	. . . . . . . . . 10 ⊢ (𝜑 → (𝑋 ≤ 𝑌 ↔ (log‘𝑋) ≤ (log‘𝑌)))
102	57, 101	mpbid 234	. . . . . . . . 9 ⊢ (𝜑 → (log‘𝑋) ≤ (log‘𝑌))
103	27, 89, 13, 100, 102	lemul2ad 12132	. . . . . . . 8 ⊢ (𝜑 → ((ψ‘𝑌) · (log‘𝑋)) ≤ ((ψ‘𝑌) · (log‘𝑌)))
104	91, 71	fsumrecl 15761	. . . . . . . . 9 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ∈ ℝ)
105		vmage0 27185	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ → 0 ≤ (Λ‘𝑛))
106	64, 105	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 0 ≤ (Λ‘𝑛))
107		chpge0 27190	. . . . . . . . . . . 12 ⊢ ((𝑋 / 𝑛) ∈ ℝ → 0 ≤ (ψ‘(𝑋 / 𝑛)))
108	68, 107	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 0 ≤ (ψ‘(𝑋 / 𝑛)))
109	66, 70, 106, 108	mulge0d 11764	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 0 ≤ ((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))
110	91, 71, 109, 61	fsumless 15824	. . . . . . . . 9 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))
111	4	adantr 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑋 ∈ ℝ)
112	11	adantr 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑌 ∈ ℝ)
113	64	nnrpd 13035	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑛 ∈ ℝ⁺)
114	57	adantr 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑋 ≤ 𝑌)
115	111, 112, 113, 114	lediv1dd 13095	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (𝑋 / 𝑛) ≤ (𝑌 / 𝑛))
116		chpwordi 27221	. . . . . . . . . . . 12 ⊢ (((𝑋 / 𝑛) ∈ ℝ ∧ (𝑌 / 𝑛) ∈ ℝ ∧ (𝑋 / 𝑛) ≤ (𝑌 / 𝑛)) → (ψ‘(𝑋 / 𝑛)) ≤ (ψ‘(𝑌 / 𝑛)))
117	68, 93, 115, 116	syl3anc 1390	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (ψ‘(𝑋 / 𝑛)) ≤ (ψ‘(𝑌 / 𝑛)))
118	70, 95, 66, 106, 117	lemul2ad 12132	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → ((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ≤ ((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
119	91, 71, 96, 118	fsumle 15827	. . . . . . . . 9 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
120	73, 104, 97, 110, 119	letrd 11340	. . . . . . . 8 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
121	55, 73, 90, 97, 103, 120	le2addd 11806	. . . . . . 7 ⊢ (𝜑 → (((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) ≤ (((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))))
122	98, 88	rerpdivcld 13068	. . . . . . . . 9 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) ∈ ℝ)
123		remulcl 11158	. . . . . . . . . . 11 ⊢ ((2 ∈ ℝ ∧ (log‘𝑌) ∈ ℝ) → (2 · (log‘𝑌)) ∈ ℝ)
124	29, 89, 123	sylancr 596	. . . . . . . . . 10 ⊢ (𝜑 → (2 · (log‘𝑌)) ∈ ℝ)
125	35, 124	readdcld 11211	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + (2 · (log‘𝑌))) ∈ ℝ)
126	122, 124	resubcld 11615	. . . . . . . . . . 11 ⊢ (𝜑 → (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))) ∈ ℝ)
127	126	recnd 11210	. . . . . . . . . . . 12 ⊢ (𝜑 → (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))) ∈ ℂ)
128	127	abscld 15466	. . . . . . . . . . 11 ⊢ (𝜑 → (abs‘(((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌)))) ∈ ℝ)
129	126	leabsd 15442	. . . . . . . . . . 11 ⊢ (𝜑 → (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))) ≤ (abs‘(((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌)))))
130		fveq2 6867	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = 𝑌 → (ψ‘𝑧) = (ψ‘𝑌))
131		fveq2 6867	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = 𝑌 → (log‘𝑧) = (log‘𝑌))
132	130, 131	oveq12d 7414	. . . . . . . . . . . . . . . . 17 ⊢ (𝑧 = 𝑌 → ((ψ‘𝑧) · (log‘𝑧)) = ((ψ‘𝑌) · (log‘𝑌)))
133		fveq2 6867	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 = 𝑛 → (Λ‘𝑚) = (Λ‘𝑛))
134		oveq2 7404	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (𝑧 / 𝑚) = (𝑧 / 𝑛))
135	134	fveq2d 6871	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 = 𝑛 → (ψ‘(𝑧 / 𝑚)) = (ψ‘(𝑧 / 𝑛)))
136	133, 135	oveq12d 7414	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑚 = 𝑛 → ((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚))) = ((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛))))
137	136	cbvsumv 15723	. . . . . . . . . . . . . . . . . 18 ⊢ Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚))) = Σ𝑛 ∈ (1...(⌊‘𝑧))((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛)))
138		fveq2 6867	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 = 𝑌 → (⌊‘𝑧) = (⌊‘𝑌))
139	138	oveq2d 7412	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = 𝑌 → (1...(⌊‘𝑧)) = (1...(⌊‘𝑌)))
140		simpl 486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑧 = 𝑌 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑧 = 𝑌)
141	140	fvoveq1d 7418	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑧 = 𝑌 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (ψ‘(𝑧 / 𝑛)) = (ψ‘(𝑌 / 𝑛)))
142	141	oveq2d 7412	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑧 = 𝑌 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → ((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛))) = ((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
143	139, 142	sumeq12rdv 15734	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = 𝑌 → Σ𝑛 ∈ (1...(⌊‘𝑧))((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
144	137, 143	eqtrid 2809	. . . . . . . . . . . . . . . . 17 ⊢ (𝑧 = 𝑌 → Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚))) = Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
145	132, 144	oveq12d 7414	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑌 → (((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) = (((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))))
146		id 22	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑌 → 𝑧 = 𝑌)
147	145, 146	oveq12d 7414	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑌 → ((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) = ((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌))
148	131	oveq2d 7412	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑌 → (2 · (log‘𝑧)) = (2 · (log‘𝑌)))
149	147, 148	oveq12d 7414	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑌 → (((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧))) = (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))))
150	149	fveq2d 6871	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑌 → (abs‘(((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧)))) = (abs‘(((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌)))))
151	150	breq1d 5110	. . . . . . . . . . . 12 ⊢ (𝑧 = 𝑌 → ((abs‘(((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧)))) ≤ 𝐵 ↔ (abs‘(((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌)))) ≤ 𝐵))
152		chpdifbnd.2	. . . . . . . . . . . 12 ⊢ (𝜑 → ∀𝑧 ∈ (1[,)+∞)(abs‘(((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧)))) ≤ 𝐵)
153	19, 4, 24	ltled 11331	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ≤ 𝑋)
154	19, 4, 11, 153, 57	letrd 11340	. . . . . . . . . . . . 13 ⊢ (𝜑 → 1 ≤ 𝑌)
155		elicopnf 13449	. . . . . . . . . . . . . 14 ⊢ (1 ∈ ℝ → (𝑌 ∈ (1[,)+∞) ↔ (𝑌 ∈ ℝ ∧ 1 ≤ 𝑌)))
156	18, 155	ax-mp 5	. . . . . . . . . . . . 13 ⊢ (𝑌 ∈ (1[,)+∞) ↔ (𝑌 ∈ ℝ ∧ 1 ≤ 𝑌))
157	11, 154, 156	sylanbrc 592	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑌 ∈ (1[,)+∞))
158	151, 152, 157	rspcdva 3582	. . . . . . . . . . 11 ⊢ (𝜑 → (abs‘(((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌)))) ≤ 𝐵)
159	126, 128, 35, 129, 158	letrd 11340	. . . . . . . . . 10 ⊢ (𝜑 → (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))) ≤ 𝐵)
160	122, 124, 35	lesubaddd 11784	. . . . . . . . . 10 ⊢ (𝜑 → ((((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))) ≤ 𝐵 ↔ ((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) ≤ (𝐵 + (2 · (log‘𝑌)))))
161	159, 160	mpbid 234	. . . . . . . . 9 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) ≤ (𝐵 + (2 · (log‘𝑌))))
162	10	simp3d 1157	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑌 ≤ (𝐴 · 𝑋))
163	88, 79	logled 26692	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑌 ≤ (𝐴 · 𝑋) ↔ (log‘𝑌) ≤ (log‘(𝐴 · 𝑋))))
164	162, 163	mpbid 234	. . . . . . . . . . 11 ⊢ (𝜑 → (log‘𝑌) ≤ (log‘(𝐴 · 𝑋)))
165		2pos 12322	. . . . . . . . . . . . . 14 ⊢ 0 < 2
166	29, 165	pm3.2i 474	. . . . . . . . . . . . 13 ⊢ (2 ∈ ℝ ∧ 0 < 2)
167	166	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → (2 ∈ ℝ ∧ 0 < 2))
168		lemul2 12044	. . . . . . . . . . . 12 ⊢ (((log‘𝑌) ∈ ℝ ∧ (log‘(𝐴 · 𝑋)) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((log‘𝑌) ≤ (log‘(𝐴 · 𝑋)) ↔ (2 · (log‘𝑌)) ≤ (2 · (log‘(𝐴 · 𝑋)))))
169	89, 80, 167, 168	syl3anc 1390	. . . . . . . . . . 11 ⊢ (𝜑 → ((log‘𝑌) ≤ (log‘(𝐴 · 𝑋)) ↔ (2 · (log‘𝑌)) ≤ (2 · (log‘(𝐴 · 𝑋)))))
170	164, 169	mpbid 234	. . . . . . . . . 10 ⊢ (𝜑 → (2 · (log‘𝑌)) ≤ (2 · (log‘(𝐴 · 𝑋))))
171	124, 82, 35, 170	leadd2dd 11802	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + (2 · (log‘𝑌))) ≤ (𝐵 + (2 · (log‘(𝐴 · 𝑋)))))
172	122, 125, 83, 161, 171	letrd 11340	. . . . . . . 8 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) ≤ (𝐵 + (2 · (log‘(𝐴 · 𝑋)))))
173	98, 83, 88	ledivmul2d 13091	. . . . . . . 8 ⊢ (𝜑 → (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) ≤ (𝐵 + (2 · (log‘(𝐴 · 𝑋)))) ↔ (((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) ≤ ((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌)))
174	172, 173	mpbid 234	. . . . . . 7 ⊢ (𝜑 → (((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) ≤ ((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌))
175	74, 98, 84, 121, 174	letrd 11340	. . . . . 6 ⊢ (𝜑 → (((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) ≤ ((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌))
176		fveq2 6867	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑋 → (ψ‘𝑧) = (ψ‘𝑋))
177		fveq2 6867	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑋 → (log‘𝑧) = (log‘𝑋))
178	176, 177	oveq12d 7414	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑋 → ((ψ‘𝑧) · (log‘𝑧)) = ((ψ‘𝑋) · (log‘𝑋)))
179		fveq2 6867	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = 𝑋 → (⌊‘𝑧) = (⌊‘𝑋))
180	179	oveq2d 7412	. . . . . . . . . . . . . . . . 17 ⊢ (𝑧 = 𝑋 → (1...(⌊‘𝑧)) = (1...(⌊‘𝑋)))
181		simpl 486	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑧 = 𝑋 ∧ 𝑛 ∈ (1...(⌊‘𝑋))) → 𝑧 = 𝑋)
182	181	fvoveq1d 7418	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑧 = 𝑋 ∧ 𝑛 ∈ (1...(⌊‘𝑋))) → (ψ‘(𝑧 / 𝑛)) = (ψ‘(𝑋 / 𝑛)))
183	182	oveq2d 7412	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑧 = 𝑋 ∧ 𝑛 ∈ (1...(⌊‘𝑋))) → ((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛))) = ((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))
184	180, 183	sumeq12rdv 15734	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑋 → Σ𝑛 ∈ (1...(⌊‘𝑧))((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))
185	137, 184	eqtrid 2809	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑋 → Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚))) = Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))
186	178, 185	oveq12d 7414	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑋 → (((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) = (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))))
187		id 22	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑋 → 𝑧 = 𝑋)
188	186, 187	oveq12d 7414	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑋 → ((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) = ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋))
189	177	oveq2d 7412	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑋 → (2 · (log‘𝑧)) = (2 · (log‘𝑋)))
190	188, 189	oveq12d 7414	. . . . . . . . . . . 12 ⊢ (𝑧 = 𝑋 → (((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧))) = (((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) − (2 · (log‘𝑋))))
191	190	fveq2d 6871	. . . . . . . . . . 11 ⊢ (𝑧 = 𝑋 → (abs‘(((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧)))) = (abs‘(((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) − (2 · (log‘𝑋)))))
192	191	breq1d 5110	. . . . . . . . . 10 ⊢ (𝑧 = 𝑋 → ((abs‘(((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧)))) ≤ 𝐵 ↔ (abs‘(((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) − (2 · (log‘𝑋)))) ≤ 𝐵))
193		elicopnf 13449	. . . . . . . . . . . 12 ⊢ (1 ∈ ℝ → (𝑋 ∈ (1[,)+∞) ↔ (𝑋 ∈ ℝ ∧ 1 ≤ 𝑋)))
194	18, 193	ax-mp 5	. . . . . . . . . . 11 ⊢ (𝑋 ∈ (1[,)+∞) ↔ (𝑋 ∈ ℝ ∧ 1 ≤ 𝑋))
195	4, 153, 194	sylanbrc 592	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ (1[,)+∞))
196	192, 152, 195	rspcdva 3582	. . . . . . . . 9 ⊢ (𝜑 → (abs‘(((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) − (2 · (log‘𝑋)))) ≤ 𝐵)
197	86, 26	rerpdivcld 13068	. . . . . . . . . 10 ⊢ (𝜑 → ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) ∈ ℝ)
198	197, 76, 35	absdifled 15464	. . . . . . . . 9 ⊢ (𝜑 → ((abs‘(((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) − (2 · (log‘𝑋)))) ≤ 𝐵 ↔ (((2 · (log‘𝑋)) − 𝐵) ≤ ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) ∧ ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) ≤ ((2 · (log‘𝑋)) + 𝐵))))
199	196, 198	mpbid 234	. . . . . . . 8 ⊢ (𝜑 → (((2 · (log‘𝑋)) − 𝐵) ≤ ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) ∧ ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) ≤ ((2 · (log‘𝑋)) + 𝐵)))
200	199	simpld 498	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝑋)) − 𝐵) ≤ ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋))
201	77, 86, 26	lemuldivd 13086	. . . . . . 7 ⊢ (𝜑 → ((((2 · (log‘𝑋)) − 𝐵) · 𝑋) ≤ (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) ↔ ((2 · (log‘𝑋)) − 𝐵) ≤ ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋)))
202	200, 201	mpbird 259	. . . . . 6 ⊢ (𝜑 → (((2 · (log‘𝑋)) − 𝐵) · 𝑋) ≤ (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))))
203	74, 78, 84, 86, 175, 202	le2subd 11807	. . . . 5 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) − (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))) ≤ (((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) − (((2 · (log‘𝑋)) − 𝐵) · 𝑋)))
204	55	recnd 11210	. . . . . . 7 ⊢ (𝜑 → ((ψ‘𝑌) · (log‘𝑋)) ∈ ℂ)
205	85	recnd 11210	. . . . . . 7 ⊢ (𝜑 → ((ψ‘𝑋) · (log‘𝑋)) ∈ ℂ)
206	73	recnd 11210	. . . . . . 7 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ∈ ℂ)
207	204, 205, 206	pnpcan2d 11580	. . . . . 6 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) − (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))) = (((ψ‘𝑌) · (log‘𝑋)) − ((ψ‘𝑋) · (log‘𝑋))))
208	13	recnd 11210	. . . . . . 7 ⊢ (𝜑 → (ψ‘𝑌) ∈ ℂ)
209	15	recnd 11210	. . . . . . 7 ⊢ (𝜑 → (ψ‘𝑋) ∈ ℂ)
210	27	recnd 11210	. . . . . . 7 ⊢ (𝜑 → (log‘𝑋) ∈ ℂ)
211	208, 209, 210	subdird 11644	. . . . . 6 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) = (((ψ‘𝑌) · (log‘𝑋)) − ((ψ‘𝑋) · (log‘𝑋))))
212	207, 211	eqtr4d 2800	. . . . 5 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) − (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))) = (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)))
213	76, 11	remulcld 11212	. . . . . . . 8 ⊢ (𝜑 → ((2 · (log‘𝑋)) · 𝑌) ∈ ℝ)
214	213	recnd 11210	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝑋)) · 𝑌) ∈ ℂ)
215	35, 40	readdcld 11211	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + (2 · (log‘𝐴))) ∈ ℝ)
216	215, 11	remulcld 11212	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 + (2 · (log‘𝐴))) · 𝑌) ∈ ℝ)
217	216	recnd 11210	. . . . . . 7 ⊢ (𝜑 → ((𝐵 + (2 · (log‘𝐴))) · 𝑌) ∈ ℂ)
218	76, 4	remulcld 11212	. . . . . . . 8 ⊢ (𝜑 → ((2 · (log‘𝑋)) · 𝑋) ∈ ℝ)
219	218	recnd 11210	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝑋)) · 𝑋) ∈ ℂ)
220	35, 4	remulcld 11212	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 · 𝑋) ∈ ℝ)
221	220	recnd 11210	. . . . . . . 8 ⊢ (𝜑 → (𝐵 · 𝑋) ∈ ℂ)
222	221	negcld 11529	. . . . . . 7 ⊢ (𝜑 → -(𝐵 · 𝑋) ∈ ℂ)
223	214, 217, 219, 222	addsub4d 11589	. . . . . 6 ⊢ (𝜑 → ((((2 · (log‘𝑋)) · 𝑌) + ((𝐵 + (2 · (log‘𝐴))) · 𝑌)) − (((2 · (log‘𝑋)) · 𝑋) + -(𝐵 · 𝑋))) = ((((2 · (log‘𝑋)) · 𝑌) − ((2 · (log‘𝑋)) · 𝑋)) + (((𝐵 + (2 · (log‘𝐴))) · 𝑌) − -(𝐵 · 𝑋))))
224	38	recnd 11210	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (log‘𝐴) ∈ ℂ)
225	5, 26	relogmuld 26690	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (log‘(𝐴 · 𝑋)) = ((log‘𝐴) + (log‘𝑋)))
226	224, 210, 225	comraddd 11397	. . . . . . . . . . . . 13 ⊢ (𝜑 → (log‘(𝐴 · 𝑋)) = ((log‘𝑋) + (log‘𝐴)))
227	226	oveq2d 7412	. . . . . . . . . . . 12 ⊢ (𝜑 → (2 · (log‘(𝐴 · 𝑋))) = (2 · ((log‘𝑋) + (log‘𝐴))))
228		2cnd 12296	. . . . . . . . . . . . 13 ⊢ (𝜑 → 2 ∈ ℂ)
229	228, 210, 224	adddid 11206	. . . . . . . . . . . 12 ⊢ (𝜑 → (2 · ((log‘𝑋) + (log‘𝐴))) = ((2 · (log‘𝑋)) + (2 · (log‘𝐴))))
230	227, 229	eqtrd 2797	. . . . . . . . . . 11 ⊢ (𝜑 → (2 · (log‘(𝐴 · 𝑋))) = ((2 · (log‘𝑋)) + (2 · (log‘𝐴))))
231	230	oveq2d 7412	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 + (2 · (log‘(𝐴 · 𝑋)))) = (𝐵 + ((2 · (log‘𝑋)) + (2 · (log‘𝐴)))))
232	35	recnd 11210	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐵 ∈ ℂ)
233	76	recnd 11210	. . . . . . . . . . 11 ⊢ (𝜑 → (2 · (log‘𝑋)) ∈ ℂ)
234	40	recnd 11210	. . . . . . . . . . 11 ⊢ (𝜑 → (2 · (log‘𝐴)) ∈ ℂ)
235	232, 233, 234	add12d 11410	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 + ((2 · (log‘𝑋)) + (2 · (log‘𝐴)))) = ((2 · (log‘𝑋)) + (𝐵 + (2 · (log‘𝐴)))))
236	231, 235	eqtrd 2797	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + (2 · (log‘(𝐴 · 𝑋)))) = ((2 · (log‘𝑋)) + (𝐵 + (2 · (log‘𝐴)))))
237	236	oveq1d 7411	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) = (((2 · (log‘𝑋)) + (𝐵 + (2 · (log‘𝐴)))) · 𝑌))
238	215	recnd 11210	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + (2 · (log‘𝐴))) ∈ ℂ)
239	11	recnd 11210	. . . . . . . . 9 ⊢ (𝜑 → 𝑌 ∈ ℂ)
240	233, 238, 239	adddird 11207	. . . . . . . 8 ⊢ (𝜑 → (((2 · (log‘𝑋)) + (𝐵 + (2 · (log‘𝐴)))) · 𝑌) = (((2 · (log‘𝑋)) · 𝑌) + ((𝐵 + (2 · (log‘𝐴))) · 𝑌)))
241	237, 240	eqtrd 2797	. . . . . . 7 ⊢ (𝜑 → ((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) = (((2 · (log‘𝑋)) · 𝑌) + ((𝐵 + (2 · (log‘𝐴))) · 𝑌)))
242	4	recnd 11210	. . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ ℂ)
243	233, 232, 242	subdird 11644	. . . . . . . 8 ⊢ (𝜑 → (((2 · (log‘𝑋)) − 𝐵) · 𝑋) = (((2 · (log‘𝑋)) · 𝑋) − (𝐵 · 𝑋)))
244	219, 221	negsubd 11548	. . . . . . . 8 ⊢ (𝜑 → (((2 · (log‘𝑋)) · 𝑋) + -(𝐵 · 𝑋)) = (((2 · (log‘𝑋)) · 𝑋) − (𝐵 · 𝑋)))
245	243, 244	eqtr4d 2800	. . . . . . 7 ⊢ (𝜑 → (((2 · (log‘𝑋)) − 𝐵) · 𝑋) = (((2 · (log‘𝑋)) · 𝑋) + -(𝐵 · 𝑋)))
246	241, 245	oveq12d 7414	. . . . . 6 ⊢ (𝜑 → (((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) − (((2 · (log‘𝑋)) − 𝐵) · 𝑋)) = ((((2 · (log‘𝑋)) · 𝑌) + ((𝐵 + (2 · (log‘𝐴))) · 𝑌)) − (((2 · (log‘𝑋)) · 𝑋) + -(𝐵 · 𝑋))))
247	30	recnd 11210	. . . . . . . . 9 ⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℂ)
248	228, 247, 210	mul32d 11393	. . . . . . . 8 ⊢ (𝜑 → ((2 · (𝑌 − 𝑋)) · (log‘𝑋)) = ((2 · (log‘𝑋)) · (𝑌 − 𝑋)))
249	233, 239, 242	subdid 11643	. . . . . . . 8 ⊢ (𝜑 → ((2 · (log‘𝑋)) · (𝑌 − 𝑋)) = (((2 · (log‘𝑋)) · 𝑌) − ((2 · (log‘𝑋)) · 𝑋)))
250	248, 249	eqtrd 2797	. . . . . . 7 ⊢ (𝜑 → ((2 · (𝑌 − 𝑋)) · (log‘𝑋)) = (((2 · (log‘𝑋)) · 𝑌) − ((2 · (log‘𝑋)) · 𝑋)))
251	35, 11	remulcld 11212	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐵 · 𝑌) ∈ ℝ)
252	251	recnd 11210	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 · 𝑌) ∈ ℂ)
253	41	recnd 11210	. . . . . . . . . 10 ⊢ (𝜑 → ((2 · (log‘𝐴)) · 𝑌) ∈ ℂ)
254	252, 221, 253	add32d 11411	. . . . . . . . 9 ⊢ (𝜑 → (((𝐵 · 𝑌) + (𝐵 · 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) = (((𝐵 · 𝑌) + ((2 · (log‘𝐴)) · 𝑌)) + (𝐵 · 𝑋)))
255	232, 239, 242	adddid 11206	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 · (𝑌 + 𝑋)) = ((𝐵 · 𝑌) + (𝐵 · 𝑋)))
256	255	oveq1d 7411	. . . . . . . . 9 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) = (((𝐵 · 𝑌) + (𝐵 · 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)))
257	232, 234, 239	adddird 11207	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐵 + (2 · (log‘𝐴))) · 𝑌) = ((𝐵 · 𝑌) + ((2 · (log‘𝐴)) · 𝑌)))
258	257	oveq1d 7411	. . . . . . . . 9 ⊢ (𝜑 → (((𝐵 + (2 · (log‘𝐴))) · 𝑌) + (𝐵 · 𝑋)) = (((𝐵 · 𝑌) + ((2 · (log‘𝐴)) · 𝑌)) + (𝐵 · 𝑋)))
259	254, 256, 258	3eqtr4d 2807	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) = (((𝐵 + (2 · (log‘𝐴))) · 𝑌) + (𝐵 · 𝑋)))
260	217, 221	subnegd 11549	. . . . . . . 8 ⊢ (𝜑 → (((𝐵 + (2 · (log‘𝐴))) · 𝑌) − -(𝐵 · 𝑋)) = (((𝐵 + (2 · (log‘𝐴))) · 𝑌) + (𝐵 · 𝑋)))
261	259, 260	eqtr4d 2800	. . . . . . 7 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) = (((𝐵 + (2 · (log‘𝐴))) · 𝑌) − -(𝐵 · 𝑋)))
262	250, 261	oveq12d 7414	. . . . . 6 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌))) = ((((2 · (log‘𝑋)) · 𝑌) − ((2 · (log‘𝑋)) · 𝑋)) + (((𝐵 + (2 · (log‘𝐴))) · 𝑌) − -(𝐵 · 𝑋))))
263	223, 246, 262	3eqtr4d 2807	. . . . 5 ⊢ (𝜑 → (((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) − (((2 · (log‘𝑋)) − 𝐵) · 𝑋)) = (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌))))
264	203, 212, 263	3brtr3d 5131	. . . 4 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) ≤ (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌))))
265	47, 4	remulcld 11212	. . . . . . 7 ⊢ (𝜑 → ((𝐵 · (𝐴 + 1)) · 𝑋) ∈ ℝ)
266	50, 4	remulcld 11212	. . . . . . 7 ⊢ (𝜑 → (((2 · 𝐴) · (log‘𝐴)) · 𝑋) ∈ ℝ)
267	11, 7, 4, 162	leadd1dd 11801	. . . . . . . . . 10 ⊢ (𝜑 → (𝑌 + 𝑋) ≤ ((𝐴 · 𝑋) + 𝑋))
268	6	recnd 11210	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ ℂ)
269	268, 242	adddirp1d 11208	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐴 + 1) · 𝑋) = ((𝐴 · 𝑋) + 𝑋))
270	267, 269	breqtrrd 5128	. . . . . . . . 9 ⊢ (𝜑 → (𝑌 + 𝑋) ≤ ((𝐴 + 1) · 𝑋))
271	46, 4	remulcld 11212	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐴 + 1) · 𝑋) ∈ ℝ)
272	36, 271, 34	lemul2d 13081	. . . . . . . . 9 ⊢ (𝜑 → ((𝑌 + 𝑋) ≤ ((𝐴 + 1) · 𝑋) ↔ (𝐵 · (𝑌 + 𝑋)) ≤ (𝐵 · ((𝐴 + 1) · 𝑋))))
273	270, 272	mpbid 234	. . . . . . . 8 ⊢ (𝜑 → (𝐵 · (𝑌 + 𝑋)) ≤ (𝐵 · ((𝐴 + 1) · 𝑋)))
274	46	recnd 11210	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 + 1) ∈ ℂ)
275	232, 274, 242	mulassd 11205	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 · (𝐴 + 1)) · 𝑋) = (𝐵 · ((𝐴 + 1) · 𝑋)))
276	273, 275	breqtrrd 5128	. . . . . . 7 ⊢ (𝜑 → (𝐵 · (𝑌 + 𝑋)) ≤ ((𝐵 · (𝐴 + 1)) · 𝑋))
277	29	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 2 ∈ ℝ)
278		0le2 12320	. . . . . . . . . . 11 ⊢ 0 ≤ 2
279	278	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 0 ≤ 2)
280		log1 26650	. . . . . . . . . . 11 ⊢ (log‘1) = 0
281		chpdifbnd.1	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ≤ 𝐴)
282		1rp 12997	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℝ⁺
283		logleb 26668	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℝ⁺ ∧ 𝐴 ∈ ℝ⁺) → (1 ≤ 𝐴 ↔ (log‘1) ≤ (log‘𝐴)))
284	282, 5, 283	sylancr 596	. . . . . . . . . . . 12 ⊢ (𝜑 → (1 ≤ 𝐴 ↔ (log‘1) ≤ (log‘𝐴)))
285	281, 284	mpbid 234	. . . . . . . . . . 11 ⊢ (𝜑 → (log‘1) ≤ (log‘𝐴))
286	280, 285	eqbrtrrid 5136	. . . . . . . . . 10 ⊢ (𝜑 → 0 ≤ (log‘𝐴))
287	277, 38, 279, 286	mulge0d 11764	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ (2 · (log‘𝐴)))
288	11, 7, 40, 287, 162	lemul2ad 12132	. . . . . . . 8 ⊢ (𝜑 → ((2 · (log‘𝐴)) · 𝑌) ≤ ((2 · (log‘𝐴)) · (𝐴 · 𝑋)))
289	49	recnd 11210	. . . . . . . . . 10 ⊢ (𝜑 → (2 · 𝐴) ∈ ℂ)
290	289, 224, 242	mulassd 11205	. . . . . . . . 9 ⊢ (𝜑 → (((2 · 𝐴) · (log‘𝐴)) · 𝑋) = ((2 · 𝐴) · ((log‘𝐴) · 𝑋)))
291	228, 268, 224, 242	mul4d 11395	. . . . . . . . 9 ⊢ (𝜑 → ((2 · 𝐴) · ((log‘𝐴) · 𝑋)) = ((2 · (log‘𝐴)) · (𝐴 · 𝑋)))
292	290, 291	eqtrd 2797	. . . . . . . 8 ⊢ (𝜑 → (((2 · 𝐴) · (log‘𝐴)) · 𝑋) = ((2 · (log‘𝐴)) · (𝐴 · 𝑋)))
293	288, 292	breqtrrd 5128	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝐴)) · 𝑌) ≤ (((2 · 𝐴) · (log‘𝐴)) · 𝑋))
294	37, 41, 265, 266, 276, 293	le2addd 11806	. . . . . 6 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) ≤ (((𝐵 · (𝐴 + 1)) · 𝑋) + (((2 · 𝐴) · (log‘𝐴)) · 𝑋)))
295	44	oveq1i 7406	. . . . . . 7 ⊢ (𝐶 · 𝑋) = (((𝐵 · (𝐴 + 1)) + ((2 · 𝐴) · (log‘𝐴))) · 𝑋)
296	47	recnd 11210	. . . . . . . 8 ⊢ (𝜑 → (𝐵 · (𝐴 + 1)) ∈ ℂ)
297	50	recnd 11210	. . . . . . . 8 ⊢ (𝜑 → ((2 · 𝐴) · (log‘𝐴)) ∈ ℂ)
298	296, 297, 242	adddird 11207	. . . . . . 7 ⊢ (𝜑 → (((𝐵 · (𝐴 + 1)) + ((2 · 𝐴) · (log‘𝐴))) · 𝑋) = (((𝐵 · (𝐴 + 1)) · 𝑋) + (((2 · 𝐴) · (log‘𝐴)) · 𝑋)))
299	295, 298	eqtrid 2809	. . . . . 6 ⊢ (𝜑 → (𝐶 · 𝑋) = (((𝐵 · (𝐴 + 1)) · 𝑋) + (((2 · 𝐴) · (log‘𝐴)) · 𝑋)))
300	294, 299	breqtrrd 5128	. . . . 5 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) ≤ (𝐶 · 𝑋))
301	42, 53, 33, 300	leadd2dd 11802	. . . 4 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌))) ≤ (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + (𝐶 · 𝑋)))
302	28, 43, 54, 264, 301	letrd 11340	. . 3 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) ≤ (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + (𝐶 · 𝑋)))
303	32	recnd 11210	. . . . 5 ⊢ (𝜑 → (2 · (𝑌 − 𝑋)) ∈ ℂ)
304	4, 24	rplogcld 26694	. . . . . . . 8 ⊢ (𝜑 → (log‘𝑋) ∈ ℝ⁺)
305	4, 304	rerpdivcld 13068	. . . . . . 7 ⊢ (𝜑 → (𝑋 / (log‘𝑋)) ∈ ℝ)
306	52, 305	remulcld 11212	. . . . . 6 ⊢ (𝜑 → (𝐶 · (𝑋 / (log‘𝑋))) ∈ ℝ)
307	306	recnd 11210	. . . . 5 ⊢ (𝜑 → (𝐶 · (𝑋 / (log‘𝑋))) ∈ ℂ)
308	303, 307, 210	adddird 11207	. . . 4 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))) · (log‘𝑋)) = (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐶 · (𝑋 / (log‘𝑋))) · (log‘𝑋))))
309	52	recnd 11210	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ ℂ)
310	305	recnd 11210	. . . . . . 7 ⊢ (𝜑 → (𝑋 / (log‘𝑋)) ∈ ℂ)
311	309, 310, 210	mulassd 11205	. . . . . 6 ⊢ (𝜑 → ((𝐶 · (𝑋 / (log‘𝑋))) · (log‘𝑋)) = (𝐶 · ((𝑋 / (log‘𝑋)) · (log‘𝑋))))
312	304	rpne0d 13042	. . . . . . . 8 ⊢ (𝜑 → (log‘𝑋) ≠ 0)
313	242, 210, 312	divcan1d 11968	. . . . . . 7 ⊢ (𝜑 → ((𝑋 / (log‘𝑋)) · (log‘𝑋)) = 𝑋)
314	313	oveq2d 7412	. . . . . 6 ⊢ (𝜑 → (𝐶 · ((𝑋 / (log‘𝑋)) · (log‘𝑋))) = (𝐶 · 𝑋))
315	311, 314	eqtrd 2797	. . . . 5 ⊢ (𝜑 → ((𝐶 · (𝑋 / (log‘𝑋))) · (log‘𝑋)) = (𝐶 · 𝑋))
316	315	oveq2d 7412	. . . 4 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐶 · (𝑋 / (log‘𝑋))) · (log‘𝑋))) = (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + (𝐶 · 𝑋)))
317	308, 316	eqtrd 2797	. . 3 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))) · (log‘𝑋)) = (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + (𝐶 · 𝑋)))
318	302, 317	breqtrrd 5128	. 2 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) ≤ (((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))) · (log‘𝑋)))
319	32, 306	readdcld 11211	. . 3 ⊢ (𝜑 → ((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))) ∈ ℝ)
320	16, 319, 304	lemul1d 13080	. 2 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) ≤ ((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))) ↔ (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) ≤ (((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))) · (log‘𝑋))))
321	318, 320	mpbird 259	1 ⊢ (𝜑 → ((ψ‘𝑌) − (ψ‘𝑋)) ≤ ((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 399 ∧ w3a 1098 = wceq 1560 ∈ wcel 2142 ∀wral 3076 ⊆ wss 3904 class class class wbr 5100 ‘cfv 6521 (class class class)co 7396 ℝcr 11072 0cc0 11073 1c1 11074 + caddc 11076 · cmul 11078 +∞cpnf 11213 < clt 11216 ≤ cle 11217 − cmin 11414 -cneg 11415 / cdiv 11844 ℕcn 12210 2c2 12272 ℤ_≥cuz 12839 ℝ⁺crp 12993 (,)cioo 13349 [,)cico 13351 [,]cicc 13352 ...cfz 13512 ⌊cfl 13800 abscabs 15261 Σcsu 15713 logclog 26619 Λcvma 27156 ψcchp 27157

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1815 ax-4 1829 ax-5 1930 ax-6 1987 ax-7 2028 ax-8 2144 ax-9 2152 ax-10 2175 ax-11 2191 ax-12 2212 ax-ext 2734 ax-rep 5227 ax-sep 5246 ax-nul 5256 ax-pow 5322 ax-pr 5390 ax-un 7718 ax-inf2 9596 ax-cnex 11129 ax-resscn 11130 ax-1cn 11131 ax-icn 11132 ax-addcl 11133 ax-addrcl 11134 ax-mulcl 11135 ax-mulrcl 11136 ax-mulcom 11137 ax-addass 11138 ax-mulass 11139 ax-distr 11140 ax-i2m1 11141 ax-1ne0 11142 ax-1rid 11143 ax-rnegex 11144 ax-rrecex 11145 ax-cnre 11146 ax-pre-lttri 11147 ax-pre-lttrn 11148 ax-pre-ltadd 11149 ax-pre-mulgt0 11150 ax-pre-sup 11151 ax-addf 11152

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 df-3or 1099 df-3an 1100 df-tru 1563 df-fal 1573 df-ex 1800 df-nf 1804 df-sb 2091 df-mo 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3367 df-reu 3368 df-rab 3415 df-v 3456 df-sbc 3745 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-pss 3924 df-nul 4286 df-if 4481 df-pw 4557 df-sn 4583 df-pr 4585 df-tp 4587 df-op 4589 df-uni 4866 df-int 4906 df-iun 4951 df-iin 4952 df-br 5101 df-opab 5163 df-mpt 5182 df-tr 5208 df-id 5542 df-eprel 5547 df-po 5555 df-so 5556 df-fr 5600 df-se 5601 df-we 5602 df-xp 5653 df-rel 5654 df-cnv 5655 df-co 5656 df-dm 5657 df-rn 5658 df-res 5659 df-ima 5660 df-pred 6288 df-ord 6349 df-on 6350 df-lim 6351 df-suc 6352 df-iota 6477 df-fun 6523 df-fn 6524 df-f 6525 df-f1 6526 df-fo 6527 df-f1o 6528 df-fv 6529 df-isom 6530 df-riota 7353 df-ov 7399 df-oprab 7400 df-mpo 7401 df-of 7660 df-om 7847 df-1st 7970 df-2nd 7971 df-supp 8141 df-frecs 8262 df-wrecs 8293 df-recs 8342 df-rdg 8381 df-1o 8437 df-2o 8438 df-oadd 8441 df-er 8678 df-map 8810 df-pm 8811 df-ixp 8880 df-en 8928 df-dom 8929 df-sdom 8930 df-fin 8931 df-fsupp 9308 df-fi 9357 df-sup 9388 df-inf 9389 df-oi 9458 df-dju 9859 df-card 9897 df-pnf 11218 df-mnf 11219 df-xr 11220 df-ltxr 11221 df-le 11222 df-sub 11416 df-neg 11417 df-div 11845 df-nn 12211 df-2 12280 df-3 12281 df-4 12282 df-5 12283 df-6 12284 df-7 12285 df-8 12286 df-9 12287 df-n0 12482 df-z 12569 df-dec 12689 df-uz 12840 df-q 12950 df-rp 12994 df-xneg 13114 df-xadd 13115 df-xmul 13116 df-ioo 13353 df-ioc 13354 df-ico 13355 df-icc 13356 df-fz 13513 df-fzo 13660 df-fl 13802 df-mod 13880 df-seq 14015 df-exp 14075 df-fac 14287 df-bc 14316 df-hash 14344 df-shft 15080 df-cj 15126 df-re 15127 df-im 15128 df-sqrt 15262 df-abs 15263 df-limsup 15498 df-clim 15515 df-rlim 15516 df-sum 15714 df-ef 16097 df-sin 16099 df-cos 16100 df-pi 16102 df-dvds 16287 df-gcd 16529 df-prm 16706 df-pc 16873 df-struct 17183 df-sets 17200 df-slot 17218 df-ndx 17230 df-base 17246 df-ress 17267 df-plusg 17299 df-mulr 17300 df-starv 17301 df-sca 17302 df-vsca 17303 df-ip 17304 df-tset 17305 df-ple 17306 df-ds 17308 df-unif 17309 df-hom 17310 df-cco 17311 df-rest 17451 df-topn 17452 df-0g 17470 df-gsum 17471 df-topgen 17472 df-pt 17473 df-prds 17476 df-xrs 17532 df-qtop 17537 df-imas 17538 df-xps 17540 df-mre 17614 df-mrc 17615 df-acs 17617 df-mgm 18674 df-sgrp 18753 df-mnd 18769 df-submnd 18818 df-mulg 19110 df-cntz 19357 df-cmn 19822 df-psmet 21416 df-xmet 21417 df-met 21418 df-bl 21419 df-mopn 21420 df-fbas 21421 df-fg 21422 df-cnfld 21425 df-top 22954 df-topon 22971 df-topsp 22993 df-bases 23006 df-cld 23079 df-ntr 23080 df-cls 23081 df-nei 23158 df-lp 23196 df-perf 23197 df-cn 23287 df-cnp 23288 df-haus 23375 df-tx 23622 df-hmeo 23815 df-fil 23906 df-fm 23998 df-flim 23999 df-flf 24000 df-xms 24380 df-ms 24381 df-tms 24382 df-cncf 24940 df-limc 25928 df-dv 25929 df-log 26621 df-vma 27162 df-chp 27163

This theorem is referenced by: chpdifbndlem2 27618

W3C validator