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 26131

Description: Lemma for chpdifbnd 26133. (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 12801	. . . . . . . . . . 11 ⊢ (1(,)+∞) ⊆ ℝ
3		chpdifbnd.x	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ∈ (1(,)+∞))
4	2, 3	sseldi 3967	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ ℝ)
5		chpdifbnd.a	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐴 ∈ ℝ⁺)
6	5	rpred 12434	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ ℝ)
7	6, 4	remulcld 10673	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 · 𝑋) ∈ ℝ)
8		elicc2 12804	. . . . . . . . . 10 ⊢ ((𝑋 ∈ ℝ ∧ (𝐴 · 𝑋) ∈ ℝ) → (𝑌 ∈ (𝑋[,](𝐴 · 𝑋)) ↔ (𝑌 ∈ ℝ ∧ 𝑋 ≤ 𝑌 ∧ 𝑌 ≤ (𝐴 · 𝑋))))
9	4, 7, 8	syl2anc 586	. . . . . . . . 9 ⊢ (𝜑 → (𝑌 ∈ (𝑋[,](𝐴 · 𝑋)) ↔ (𝑌 ∈ ℝ ∧ 𝑋 ≤ 𝑌 ∧ 𝑌 ≤ (𝐴 · 𝑋))))
10	1, 9	mpbid 234	. . . . . . . 8 ⊢ (𝜑 → (𝑌 ∈ ℝ ∧ 𝑋 ≤ 𝑌 ∧ 𝑌 ≤ (𝐴 · 𝑋)))
11	10	simp1d 1138	. . . . . . 7 ⊢ (𝜑 → 𝑌 ∈ ℝ)
12		chpcl 25703	. . . . . . 7 ⊢ (𝑌 ∈ ℝ → (ψ‘𝑌) ∈ ℝ)
13	11, 12	syl 17	. . . . . 6 ⊢ (𝜑 → (ψ‘𝑌) ∈ ℝ)
14		chpcl 25703	. . . . . . 7 ⊢ (𝑋 ∈ ℝ → (ψ‘𝑋) ∈ ℝ)
15	4, 14	syl 17	. . . . . 6 ⊢ (𝜑 → (ψ‘𝑋) ∈ ℝ)
16	13, 15	resubcld 11070	. . . . 5 ⊢ (𝜑 → ((ψ‘𝑌) − (ψ‘𝑋)) ∈ ℝ)
17		0red 10646	. . . . . . . 8 ⊢ (𝜑 → 0 ∈ ℝ)
18		1re 10643	. . . . . . . . 9 ⊢ 1 ∈ ℝ
19	18	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 1 ∈ ℝ)
20		0lt1 11164	. . . . . . . . 9 ⊢ 0 < 1
21	20	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 0 < 1)
22		eliooord 12799	. . . . . . . . . 10 ⊢ (𝑋 ∈ (1(,)+∞) → (1 < 𝑋 ∧ 𝑋 < +∞))
23	3, 22	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (1 < 𝑋 ∧ 𝑋 < +∞))
24	23	simpld 497	. . . . . . . 8 ⊢ (𝜑 → 1 < 𝑋)
25	17, 19, 4, 21, 24	lttrd 10803	. . . . . . 7 ⊢ (𝜑 → 0 < 𝑋)
26	4, 25	elrpd 12431	. . . . . 6 ⊢ (𝜑 → 𝑋 ∈ ℝ⁺)
27	26	relogcld 25208	. . . . 5 ⊢ (𝜑 → (log‘𝑋) ∈ ℝ)
28	16, 27	remulcld 10673	. . . 4 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) ∈ ℝ)
29		2re 11714	. . . . . . 7 ⊢ 2 ∈ ℝ
30	11, 4	resubcld 11070	. . . . . . 7 ⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℝ)
31		remulcl 10624	. . . . . . 7 ⊢ ((2 ∈ ℝ ∧ (𝑌 − 𝑋) ∈ ℝ) → (2 · (𝑌 − 𝑋)) ∈ ℝ)
32	29, 30, 31	sylancr 589	. . . . . 6 ⊢ (𝜑 → (2 · (𝑌 − 𝑋)) ∈ ℝ)
33	32, 27	remulcld 10673	. . . . 5 ⊢ (𝜑 → ((2 · (𝑌 − 𝑋)) · (log‘𝑋)) ∈ ℝ)
34		chpdifbnd.b	. . . . . . . 8 ⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
35	34	rpred 12434	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ ℝ)
36	11, 4	readdcld 10672	. . . . . . 7 ⊢ (𝜑 → (𝑌 + 𝑋) ∈ ℝ)
37	35, 36	remulcld 10673	. . . . . 6 ⊢ (𝜑 → (𝐵 · (𝑌 + 𝑋)) ∈ ℝ)
38	5	relogcld 25208	. . . . . . . 8 ⊢ (𝜑 → (log‘𝐴) ∈ ℝ)
39		remulcl 10624	. . . . . . . 8 ⊢ ((2 ∈ ℝ ∧ (log‘𝐴) ∈ ℝ) → (2 · (log‘𝐴)) ∈ ℝ)
40	29, 38, 39	sylancr 589	. . . . . . 7 ⊢ (𝜑 → (2 · (log‘𝐴)) ∈ ℝ)
41	40, 11	remulcld 10673	. . . . . 6 ⊢ (𝜑 → ((2 · (log‘𝐴)) · 𝑌) ∈ ℝ)
42	37, 41	readdcld 10672	. . . . 5 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) ∈ ℝ)
43	33, 42	readdcld 10672	. . . 4 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌))) ∈ ℝ)
44		chpdifbnd.c	. . . . . . 7 ⊢ 𝐶 = ((𝐵 · (𝐴 + 1)) + ((2 · 𝐴) · (log‘𝐴)))
45		peano2re 10815	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ → (𝐴 + 1) ∈ ℝ)
46	6, 45	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 + 1) ∈ ℝ)
47	35, 46	remulcld 10673	. . . . . . . 8 ⊢ (𝜑 → (𝐵 · (𝐴 + 1)) ∈ ℝ)
48		remulcl 10624	. . . . . . . . . 10 ⊢ ((2 ∈ ℝ ∧ 𝐴 ∈ ℝ) → (2 · 𝐴) ∈ ℝ)
49	29, 6, 48	sylancr 589	. . . . . . . . 9 ⊢ (𝜑 → (2 · 𝐴) ∈ ℝ)
50	49, 38	remulcld 10673	. . . . . . . 8 ⊢ (𝜑 → ((2 · 𝐴) · (log‘𝐴)) ∈ ℝ)
51	47, 50	readdcld 10672	. . . . . . 7 ⊢ (𝜑 → ((𝐵 · (𝐴 + 1)) + ((2 · 𝐴) · (log‘𝐴))) ∈ ℝ)
52	44, 51	eqeltrid 2919	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ ℝ)
53	52, 4	remulcld 10673	. . . . 5 ⊢ (𝜑 → (𝐶 · 𝑋) ∈ ℝ)
54	33, 53	readdcld 10672	. . . 4 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + (𝐶 · 𝑋)) ∈ ℝ)
55	13, 27	remulcld 10673	. . . . . . 7 ⊢ (𝜑 → ((ψ‘𝑌) · (log‘𝑋)) ∈ ℝ)
56		fzfid 13344	. . . . . . . 8 ⊢ (𝜑 → (1...(⌊‘𝑋)) ∈ Fin)
57	10	simp2d 1139	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 ≤ 𝑌)
58		flword2 13186	. . . . . . . . . . . 12 ⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ ∧ 𝑋 ≤ 𝑌) → (⌊‘𝑌) ∈ (ℤ_≥‘(⌊‘𝑋)))
59	4, 11, 57, 58	syl3anc 1367	. . . . . . . . . . 11 ⊢ (𝜑 → (⌊‘𝑌) ∈ (ℤ_≥‘(⌊‘𝑋)))
60		fzss2 12950	. . . . . . . . . . 11 ⊢ ((⌊‘𝑌) ∈ (ℤ_≥‘(⌊‘𝑋)) → (1...(⌊‘𝑋)) ⊆ (1...(⌊‘𝑌)))
61	59, 60	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (1...(⌊‘𝑋)) ⊆ (1...(⌊‘𝑌)))
62	61	sselda 3969	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑋))) → 𝑛 ∈ (1...(⌊‘𝑌)))
63		elfznn 12939	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ (1...(⌊‘𝑌)) → 𝑛 ∈ ℕ)
64	63	adantl 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑛 ∈ ℕ)
65		vmacl 25697	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → (Λ‘𝑛) ∈ ℝ)
66	64, 65	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (Λ‘𝑛) ∈ ℝ)
67		nndivre 11681	. . . . . . . . . . . 12 ⊢ ((𝑋 ∈ ℝ ∧ 𝑛 ∈ ℕ) → (𝑋 / 𝑛) ∈ ℝ)
68	4, 63, 67	syl2an 597	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (𝑋 / 𝑛) ∈ ℝ)
69		chpcl 25703	. . . . . . . . . . 11 ⊢ ((𝑋 / 𝑛) ∈ ℝ → (ψ‘(𝑋 / 𝑛)) ∈ ℝ)
70	68, 69	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (ψ‘(𝑋 / 𝑛)) ∈ ℝ)
71	66, 70	remulcld 10673	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → ((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ∈ ℝ)
72	62, 71	syldan 593	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑋))) → ((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ∈ ℝ)
73	56, 72	fsumrecl 15093	. . . . . . 7 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ∈ ℝ)
74	55, 73	readdcld 10672	. . . . . 6 ⊢ (𝜑 → (((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) ∈ ℝ)
75		remulcl 10624	. . . . . . . . 9 ⊢ ((2 ∈ ℝ ∧ (log‘𝑋) ∈ ℝ) → (2 · (log‘𝑋)) ∈ ℝ)
76	29, 27, 75	sylancr 589	. . . . . . . 8 ⊢ (𝜑 → (2 · (log‘𝑋)) ∈ ℝ)
77	76, 35	resubcld 11070	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝑋)) − 𝐵) ∈ ℝ)
78	77, 4	remulcld 10673	. . . . . 6 ⊢ (𝜑 → (((2 · (log‘𝑋)) − 𝐵) · 𝑋) ∈ ℝ)
79	5, 26	rpmulcld 12450	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 · 𝑋) ∈ ℝ⁺)
80	79	relogcld 25208	. . . . . . . . 9 ⊢ (𝜑 → (log‘(𝐴 · 𝑋)) ∈ ℝ)
81		remulcl 10624	. . . . . . . . 9 ⊢ ((2 ∈ ℝ ∧ (log‘(𝐴 · 𝑋)) ∈ ℝ) → (2 · (log‘(𝐴 · 𝑋))) ∈ ℝ)
82	29, 80, 81	sylancr 589	. . . . . . . 8 ⊢ (𝜑 → (2 · (log‘(𝐴 · 𝑋))) ∈ ℝ)
83	35, 82	readdcld 10672	. . . . . . 7 ⊢ (𝜑 → (𝐵 + (2 · (log‘(𝐴 · 𝑋)))) ∈ ℝ)
84	83, 11	remulcld 10673	. . . . . 6 ⊢ (𝜑 → ((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) ∈ ℝ)
85	15, 27	remulcld 10673	. . . . . . 7 ⊢ (𝜑 → ((ψ‘𝑋) · (log‘𝑋)) ∈ ℝ)
86	85, 73	readdcld 10672	. . . . . 6 ⊢ (𝜑 → (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) ∈ ℝ)
87	17, 4, 11, 25, 57	ltletrd 10802	. . . . . . . . . . 11 ⊢ (𝜑 → 0 < 𝑌)
88	11, 87	elrpd 12431	. . . . . . . . . 10 ⊢ (𝜑 → 𝑌 ∈ ℝ⁺)
89	88	relogcld 25208	. . . . . . . . 9 ⊢ (𝜑 → (log‘𝑌) ∈ ℝ)
90	13, 89	remulcld 10673	. . . . . . . 8 ⊢ (𝜑 → ((ψ‘𝑌) · (log‘𝑌)) ∈ ℝ)
91		fzfid 13344	. . . . . . . . 9 ⊢ (𝜑 → (1...(⌊‘𝑌)) ∈ Fin)
92		nndivre 11681	. . . . . . . . . . . 12 ⊢ ((𝑌 ∈ ℝ ∧ 𝑛 ∈ ℕ) → (𝑌 / 𝑛) ∈ ℝ)
93	11, 63, 92	syl2an 597	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (𝑌 / 𝑛) ∈ ℝ)
94		chpcl 25703	. . . . . . . . . . 11 ⊢ ((𝑌 / 𝑛) ∈ ℝ → (ψ‘(𝑌 / 𝑛)) ∈ ℝ)
95	93, 94	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (ψ‘(𝑌 / 𝑛)) ∈ ℝ)
96	66, 95	remulcld 10673	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → ((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))) ∈ ℝ)
97	91, 96	fsumrecl 15093	. . . . . . . 8 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))) ∈ ℝ)
98	90, 97	readdcld 10672	. . . . . . 7 ⊢ (𝜑 → (((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) ∈ ℝ)
99		chpge0 25705	. . . . . . . . . 10 ⊢ (𝑌 ∈ ℝ → 0 ≤ (ψ‘𝑌))
100	11, 99	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ (ψ‘𝑌))
101	26, 88	logled 25212	. . . . . . . . . 10 ⊢ (𝜑 → (𝑋 ≤ 𝑌 ↔ (log‘𝑋) ≤ (log‘𝑌)))
102	57, 101	mpbid 234	. . . . . . . . 9 ⊢ (𝜑 → (log‘𝑋) ≤ (log‘𝑌))
103	27, 89, 13, 100, 102	lemul2ad 11582	. . . . . . . 8 ⊢ (𝜑 → ((ψ‘𝑌) · (log‘𝑋)) ≤ ((ψ‘𝑌) · (log‘𝑌)))
104	91, 71	fsumrecl 15093	. . . . . . . . 9 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ∈ ℝ)
105		vmage0 25700	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ → 0 ≤ (Λ‘𝑛))
106	64, 105	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 0 ≤ (Λ‘𝑛))
107		chpge0 25705	. . . . . . . . . . . 12 ⊢ ((𝑋 / 𝑛) ∈ ℝ → 0 ≤ (ψ‘(𝑋 / 𝑛)))
108	68, 107	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 0 ≤ (ψ‘(𝑋 / 𝑛)))
109	66, 70, 106, 108	mulge0d 11219	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 0 ≤ ((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))
110	91, 71, 109, 61	fsumless 15153	. . . . . . . . 9 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))
111	4	adantr 483	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑋 ∈ ℝ)
112	11	adantr 483	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑌 ∈ ℝ)
113	64	nnrpd 12432	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑛 ∈ ℝ⁺)
114	57	adantr 483	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑋 ≤ 𝑌)
115	111, 112, 113, 114	lediv1dd 12492	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (𝑋 / 𝑛) ≤ (𝑌 / 𝑛))
116		chpwordi 25736	. . . . . . . . . . . 12 ⊢ (((𝑋 / 𝑛) ∈ ℝ ∧ (𝑌 / 𝑛) ∈ ℝ ∧ (𝑋 / 𝑛) ≤ (𝑌 / 𝑛)) → (ψ‘(𝑋 / 𝑛)) ≤ (ψ‘(𝑌 / 𝑛)))
117	68, 93, 115, 116	syl3anc 1367	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (ψ‘(𝑋 / 𝑛)) ≤ (ψ‘(𝑌 / 𝑛)))
118	70, 95, 66, 106, 117	lemul2ad 11582	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → ((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ≤ ((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
119	91, 71, 96, 118	fsumle 15156	. . . . . . . . 9 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
120	73, 104, 97, 110, 119	letrd 10799	. . . . . . . 8 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
121	55, 73, 90, 97, 103, 120	le2addd 11261	. . . . . . 7 ⊢ (𝜑 → (((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) ≤ (((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))))
122	98, 88	rerpdivcld 12465	. . . . . . . . 9 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) ∈ ℝ)
123		remulcl 10624	. . . . . . . . . . 11 ⊢ ((2 ∈ ℝ ∧ (log‘𝑌) ∈ ℝ) → (2 · (log‘𝑌)) ∈ ℝ)
124	29, 89, 123	sylancr 589	. . . . . . . . . 10 ⊢ (𝜑 → (2 · (log‘𝑌)) ∈ ℝ)
125	35, 124	readdcld 10672	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + (2 · (log‘𝑌))) ∈ ℝ)
126	122, 124	resubcld 11070	. . . . . . . . . . 11 ⊢ (𝜑 → (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))) ∈ ℝ)
127	126	recnd 10671	. . . . . . . . . . . 12 ⊢ (𝜑 → (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))) ∈ ℂ)
128	127	abscld 14798	. . . . . . . . . . 11 ⊢ (𝜑 → (abs‘(((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌)))) ∈ ℝ)
129	126	leabsd 14776	. . . . . . . . . . 11 ⊢ (𝜑 → (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))) ≤ (abs‘(((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌)))))
130		fveq2 6672	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = 𝑌 → (ψ‘𝑧) = (ψ‘𝑌))
131		fveq2 6672	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = 𝑌 → (log‘𝑧) = (log‘𝑌))
132	130, 131	oveq12d 7176	. . . . . . . . . . . . . . . . 17 ⊢ (𝑧 = 𝑌 → ((ψ‘𝑧) · (log‘𝑧)) = ((ψ‘𝑌) · (log‘𝑌)))
133		fveq2 6672	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 = 𝑛 → (Λ‘𝑚) = (Λ‘𝑛))
134		oveq2 7166	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑚 = 𝑛 → (𝑧 / 𝑚) = (𝑧 / 𝑛))
135	134	fveq2d 6676	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑚 = 𝑛 → (ψ‘(𝑧 / 𝑚)) = (ψ‘(𝑧 / 𝑛)))
136	133, 135	oveq12d 7176	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑚 = 𝑛 → ((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚))) = ((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛))))
137	136	cbvsumv 15055	. . . . . . . . . . . . . . . . . 18 ⊢ Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚))) = Σ𝑛 ∈ (1...(⌊‘𝑧))((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛)))
138		fveq2 6672	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 = 𝑌 → (⌊‘𝑧) = (⌊‘𝑌))
139	138	oveq2d 7174	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = 𝑌 → (1...(⌊‘𝑧)) = (1...(⌊‘𝑌)))
140		simpl 485	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑧 = 𝑌 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → 𝑧 = 𝑌)
141	140	fvoveq1d 7180	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑧 = 𝑌 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → (ψ‘(𝑧 / 𝑛)) = (ψ‘(𝑌 / 𝑛)))
142	141	oveq2d 7174	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑧 = 𝑌 ∧ 𝑛 ∈ (1...(⌊‘𝑌))) → ((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛))) = ((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
143	139, 142	sumeq12rdv 15066	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = 𝑌 → Σ𝑛 ∈ (1...(⌊‘𝑧))((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
144	137, 143	syl5eq 2870	. . . . . . . . . . . . . . . . 17 ⊢ (𝑧 = 𝑌 → Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚))) = Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛))))
145	132, 144	oveq12d 7176	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑌 → (((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) = (((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))))
146		id 22	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑌 → 𝑧 = 𝑌)
147	145, 146	oveq12d 7176	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑌 → ((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) = ((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌))
148	131	oveq2d 7174	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑌 → (2 · (log‘𝑧)) = (2 · (log‘𝑌)))
149	147, 148	oveq12d 7176	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑌 → (((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧))) = (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))))
150	149	fveq2d 6676	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑌 → (abs‘(((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧)))) = (abs‘(((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌)))))
151	150	breq1d 5078	. . . . . . . . . . . 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 10790	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ≤ 𝑋)
154	19, 4, 11, 153, 57	letrd 10799	. . . . . . . . . . . . 13 ⊢ (𝜑 → 1 ≤ 𝑌)
155		elicopnf 12836	. . . . . . . . . . . . . 14 ⊢ (1 ∈ ℝ → (𝑌 ∈ (1[,)+∞) ↔ (𝑌 ∈ ℝ ∧ 1 ≤ 𝑌)))
156	18, 155	ax-mp 5	. . . . . . . . . . . . 13 ⊢ (𝑌 ∈ (1[,)+∞) ↔ (𝑌 ∈ ℝ ∧ 1 ≤ 𝑌))
157	11, 154, 156	sylanbrc 585	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑌 ∈ (1[,)+∞))
158	151, 152, 157	rspcdva 3627	. . . . . . . . . . 11 ⊢ (𝜑 → (abs‘(((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌)))) ≤ 𝐵)
159	126, 128, 35, 129, 158	letrd 10799	. . . . . . . . . 10 ⊢ (𝜑 → (((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))) ≤ 𝐵)
160	122, 124, 35	lesubaddd 11239	. . . . . . . . . 10 ⊢ (𝜑 → ((((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) − (2 · (log‘𝑌))) ≤ 𝐵 ↔ ((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) ≤ (𝐵 + (2 · (log‘𝑌)))))
161	159, 160	mpbid 234	. . . . . . . . 9 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) ≤ (𝐵 + (2 · (log‘𝑌))))
162	10	simp3d 1140	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑌 ≤ (𝐴 · 𝑋))
163	88, 79	logled 25212	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑌 ≤ (𝐴 · 𝑋) ↔ (log‘𝑌) ≤ (log‘(𝐴 · 𝑋))))
164	162, 163	mpbid 234	. . . . . . . . . . 11 ⊢ (𝜑 → (log‘𝑌) ≤ (log‘(𝐴 · 𝑋)))
165		2pos 11743	. . . . . . . . . . . . . 14 ⊢ 0 < 2
166	29, 165	pm3.2i 473	. . . . . . . . . . . . 13 ⊢ (2 ∈ ℝ ∧ 0 < 2)
167	166	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → (2 ∈ ℝ ∧ 0 < 2))
168		lemul2 11495	. . . . . . . . . . . 12 ⊢ (((log‘𝑌) ∈ ℝ ∧ (log‘(𝐴 · 𝑋)) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((log‘𝑌) ≤ (log‘(𝐴 · 𝑋)) ↔ (2 · (log‘𝑌)) ≤ (2 · (log‘(𝐴 · 𝑋)))))
169	89, 80, 167, 168	syl3anc 1367	. . . . . . . . . . 11 ⊢ (𝜑 → ((log‘𝑌) ≤ (log‘(𝐴 · 𝑋)) ↔ (2 · (log‘𝑌)) ≤ (2 · (log‘(𝐴 · 𝑋)))))
170	164, 169	mpbid 234	. . . . . . . . . 10 ⊢ (𝜑 → (2 · (log‘𝑌)) ≤ (2 · (log‘(𝐴 · 𝑋))))
171	124, 82, 35, 170	leadd2dd 11257	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + (2 · (log‘𝑌))) ≤ (𝐵 + (2 · (log‘(𝐴 · 𝑋)))))
172	122, 125, 83, 161, 171	letrd 10799	. . . . . . . 8 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑌)) + Σ𝑛 ∈ (1...(⌊‘𝑌))((Λ‘𝑛) · (ψ‘(𝑌 / 𝑛)))) / 𝑌) ≤ (𝐵 + (2 · (log‘(𝐴 · 𝑋)))))
173	98, 83, 88	ledivmul2d 12488	. . . . . . . 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 10799	. . . . . 6 ⊢ (𝜑 → (((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) ≤ ((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌))
176		fveq2 6672	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑋 → (ψ‘𝑧) = (ψ‘𝑋))
177		fveq2 6672	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑋 → (log‘𝑧) = (log‘𝑋))
178	176, 177	oveq12d 7176	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑋 → ((ψ‘𝑧) · (log‘𝑧)) = ((ψ‘𝑋) · (log‘𝑋)))
179		fveq2 6672	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = 𝑋 → (⌊‘𝑧) = (⌊‘𝑋))
180	179	oveq2d 7174	. . . . . . . . . . . . . . . . 17 ⊢ (𝑧 = 𝑋 → (1...(⌊‘𝑧)) = (1...(⌊‘𝑋)))
181		simpl 485	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑧 = 𝑋 ∧ 𝑛 ∈ (1...(⌊‘𝑋))) → 𝑧 = 𝑋)
182	181	fvoveq1d 7180	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑧 = 𝑋 ∧ 𝑛 ∈ (1...(⌊‘𝑋))) → (ψ‘(𝑧 / 𝑛)) = (ψ‘(𝑋 / 𝑛)))
183	182	oveq2d 7174	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑧 = 𝑋 ∧ 𝑛 ∈ (1...(⌊‘𝑋))) → ((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛))) = ((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))
184	180, 183	sumeq12rdv 15066	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑋 → Σ𝑛 ∈ (1...(⌊‘𝑧))((Λ‘𝑛) · (ψ‘(𝑧 / 𝑛))) = Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))
185	137, 184	syl5eq 2870	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑋 → Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚))) = Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))
186	178, 185	oveq12d 7176	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑋 → (((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) = (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))))
187		id 22	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑋 → 𝑧 = 𝑋)
188	186, 187	oveq12d 7176	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑋 → ((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) = ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋))
189	177	oveq2d 7174	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑋 → (2 · (log‘𝑧)) = (2 · (log‘𝑋)))
190	188, 189	oveq12d 7176	. . . . . . . . . . . 12 ⊢ (𝑧 = 𝑋 → (((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧))) = (((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) − (2 · (log‘𝑋))))
191	190	fveq2d 6676	. . . . . . . . . . 11 ⊢ (𝑧 = 𝑋 → (abs‘(((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧)))) = (abs‘(((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) − (2 · (log‘𝑋)))))
192	191	breq1d 5078	. . . . . . . . . 10 ⊢ (𝑧 = 𝑋 → ((abs‘(((((ψ‘𝑧) · (log‘𝑧)) + Σ𝑚 ∈ (1...(⌊‘𝑧))((Λ‘𝑚) · (ψ‘(𝑧 / 𝑚)))) / 𝑧) − (2 · (log‘𝑧)))) ≤ 𝐵 ↔ (abs‘(((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) − (2 · (log‘𝑋)))) ≤ 𝐵))
193		elicopnf 12836	. . . . . . . . . . . 12 ⊢ (1 ∈ ℝ → (𝑋 ∈ (1[,)+∞) ↔ (𝑋 ∈ ℝ ∧ 1 ≤ 𝑋)))
194	18, 193	ax-mp 5	. . . . . . . . . . 11 ⊢ (𝑋 ∈ (1[,)+∞) ↔ (𝑋 ∈ ℝ ∧ 1 ≤ 𝑋))
195	4, 153, 194	sylanbrc 585	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ (1[,)+∞))
196	192, 152, 195	rspcdva 3627	. . . . . . . . 9 ⊢ (𝜑 → (abs‘(((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) − (2 · (log‘𝑋)))) ≤ 𝐵)
197	86, 26	rerpdivcld 12465	. . . . . . . . . 10 ⊢ (𝜑 → ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋) ∈ ℝ)
198	197, 76, 35	absdifled 14796	. . . . . . . . 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 497	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝑋)) − 𝐵) ≤ ((((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) / 𝑋))
201	77, 86, 26	lemuldivd 12483	. . . . . . 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 11262	. . . . 5 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) − (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))) ≤ (((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) − (((2 · (log‘𝑋)) − 𝐵) · 𝑋)))
204	55	recnd 10671	. . . . . . 7 ⊢ (𝜑 → ((ψ‘𝑌) · (log‘𝑋)) ∈ ℂ)
205	85	recnd 10671	. . . . . . 7 ⊢ (𝜑 → ((ψ‘𝑋) · (log‘𝑋)) ∈ ℂ)
206	73	recnd 10671	. . . . . . 7 ⊢ (𝜑 → Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))) ∈ ℂ)
207	204, 205, 206	pnpcan2d 11037	. . . . . 6 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) − (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))) = (((ψ‘𝑌) · (log‘𝑋)) − ((ψ‘𝑋) · (log‘𝑋))))
208	13	recnd 10671	. . . . . . 7 ⊢ (𝜑 → (ψ‘𝑌) ∈ ℂ)
209	15	recnd 10671	. . . . . . 7 ⊢ (𝜑 → (ψ‘𝑋) ∈ ℂ)
210	27	recnd 10671	. . . . . . 7 ⊢ (𝜑 → (log‘𝑋) ∈ ℂ)
211	208, 209, 210	subdird 11099	. . . . . 6 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) = (((ψ‘𝑌) · (log‘𝑋)) − ((ψ‘𝑋) · (log‘𝑋))))
212	207, 211	eqtr4d 2861	. . . . 5 ⊢ (𝜑 → ((((ψ‘𝑌) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛)))) − (((ψ‘𝑋) · (log‘𝑋)) + Σ𝑛 ∈ (1...(⌊‘𝑋))((Λ‘𝑛) · (ψ‘(𝑋 / 𝑛))))) = (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)))
213	76, 11	remulcld 10673	. . . . . . . 8 ⊢ (𝜑 → ((2 · (log‘𝑋)) · 𝑌) ∈ ℝ)
214	213	recnd 10671	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝑋)) · 𝑌) ∈ ℂ)
215	35, 40	readdcld 10672	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + (2 · (log‘𝐴))) ∈ ℝ)
216	215, 11	remulcld 10673	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 + (2 · (log‘𝐴))) · 𝑌) ∈ ℝ)
217	216	recnd 10671	. . . . . . 7 ⊢ (𝜑 → ((𝐵 + (2 · (log‘𝐴))) · 𝑌) ∈ ℂ)
218	76, 4	remulcld 10673	. . . . . . . 8 ⊢ (𝜑 → ((2 · (log‘𝑋)) · 𝑋) ∈ ℝ)
219	218	recnd 10671	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝑋)) · 𝑋) ∈ ℂ)
220	35, 4	remulcld 10673	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 · 𝑋) ∈ ℝ)
221	220	recnd 10671	. . . . . . . 8 ⊢ (𝜑 → (𝐵 · 𝑋) ∈ ℂ)
222	221	negcld 10986	. . . . . . 7 ⊢ (𝜑 → -(𝐵 · 𝑋) ∈ ℂ)
223	214, 217, 219, 222	addsub4d 11046	. . . . . 6 ⊢ (𝜑 → ((((2 · (log‘𝑋)) · 𝑌) + ((𝐵 + (2 · (log‘𝐴))) · 𝑌)) − (((2 · (log‘𝑋)) · 𝑋) + -(𝐵 · 𝑋))) = ((((2 · (log‘𝑋)) · 𝑌) − ((2 · (log‘𝑋)) · 𝑋)) + (((𝐵 + (2 · (log‘𝐴))) · 𝑌) − -(𝐵 · 𝑋))))
224	38	recnd 10671	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (log‘𝐴) ∈ ℂ)
225	5, 26	relogmuld 25210	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (log‘(𝐴 · 𝑋)) = ((log‘𝐴) + (log‘𝑋)))
226	224, 210, 225	comraddd 10856	. . . . . . . . . . . . 13 ⊢ (𝜑 → (log‘(𝐴 · 𝑋)) = ((log‘𝑋) + (log‘𝐴)))
227	226	oveq2d 7174	. . . . . . . . . . . 12 ⊢ (𝜑 → (2 · (log‘(𝐴 · 𝑋))) = (2 · ((log‘𝑋) + (log‘𝐴))))
228		2cnd 11718	. . . . . . . . . . . . 13 ⊢ (𝜑 → 2 ∈ ℂ)
229	228, 210, 224	adddid 10667	. . . . . . . . . . . 12 ⊢ (𝜑 → (2 · ((log‘𝑋) + (log‘𝐴))) = ((2 · (log‘𝑋)) + (2 · (log‘𝐴))))
230	227, 229	eqtrd 2858	. . . . . . . . . . 11 ⊢ (𝜑 → (2 · (log‘(𝐴 · 𝑋))) = ((2 · (log‘𝑋)) + (2 · (log‘𝐴))))
231	230	oveq2d 7174	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 + (2 · (log‘(𝐴 · 𝑋)))) = (𝐵 + ((2 · (log‘𝑋)) + (2 · (log‘𝐴)))))
232	35	recnd 10671	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐵 ∈ ℂ)
233	76	recnd 10671	. . . . . . . . . . 11 ⊢ (𝜑 → (2 · (log‘𝑋)) ∈ ℂ)
234	40	recnd 10671	. . . . . . . . . . 11 ⊢ (𝜑 → (2 · (log‘𝐴)) ∈ ℂ)
235	232, 233, 234	add12d 10868	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 + ((2 · (log‘𝑋)) + (2 · (log‘𝐴)))) = ((2 · (log‘𝑋)) + (𝐵 + (2 · (log‘𝐴)))))
236	231, 235	eqtrd 2858	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + (2 · (log‘(𝐴 · 𝑋)))) = ((2 · (log‘𝑋)) + (𝐵 + (2 · (log‘𝐴)))))
237	236	oveq1d 7173	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) = (((2 · (log‘𝑋)) + (𝐵 + (2 · (log‘𝐴)))) · 𝑌))
238	215	recnd 10671	. . . . . . . . 9 ⊢ (𝜑 → (𝐵 + (2 · (log‘𝐴))) ∈ ℂ)
239	11	recnd 10671	. . . . . . . . 9 ⊢ (𝜑 → 𝑌 ∈ ℂ)
240	233, 238, 239	adddird 10668	. . . . . . . 8 ⊢ (𝜑 → (((2 · (log‘𝑋)) + (𝐵 + (2 · (log‘𝐴)))) · 𝑌) = (((2 · (log‘𝑋)) · 𝑌) + ((𝐵 + (2 · (log‘𝐴))) · 𝑌)))
241	237, 240	eqtrd 2858	. . . . . . 7 ⊢ (𝜑 → ((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) = (((2 · (log‘𝑋)) · 𝑌) + ((𝐵 + (2 · (log‘𝐴))) · 𝑌)))
242	4	recnd 10671	. . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ ℂ)
243	233, 232, 242	subdird 11099	. . . . . . . 8 ⊢ (𝜑 → (((2 · (log‘𝑋)) − 𝐵) · 𝑋) = (((2 · (log‘𝑋)) · 𝑋) − (𝐵 · 𝑋)))
244	219, 221	negsubd 11005	. . . . . . . 8 ⊢ (𝜑 → (((2 · (log‘𝑋)) · 𝑋) + -(𝐵 · 𝑋)) = (((2 · (log‘𝑋)) · 𝑋) − (𝐵 · 𝑋)))
245	243, 244	eqtr4d 2861	. . . . . . 7 ⊢ (𝜑 → (((2 · (log‘𝑋)) − 𝐵) · 𝑋) = (((2 · (log‘𝑋)) · 𝑋) + -(𝐵 · 𝑋)))
246	241, 245	oveq12d 7176	. . . . . 6 ⊢ (𝜑 → (((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) − (((2 · (log‘𝑋)) − 𝐵) · 𝑋)) = ((((2 · (log‘𝑋)) · 𝑌) + ((𝐵 + (2 · (log‘𝐴))) · 𝑌)) − (((2 · (log‘𝑋)) · 𝑋) + -(𝐵 · 𝑋))))
247	30	recnd 10671	. . . . . . . . 9 ⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℂ)
248	228, 247, 210	mul32d 10852	. . . . . . . 8 ⊢ (𝜑 → ((2 · (𝑌 − 𝑋)) · (log‘𝑋)) = ((2 · (log‘𝑋)) · (𝑌 − 𝑋)))
249	233, 239, 242	subdid 11098	. . . . . . . 8 ⊢ (𝜑 → ((2 · (log‘𝑋)) · (𝑌 − 𝑋)) = (((2 · (log‘𝑋)) · 𝑌) − ((2 · (log‘𝑋)) · 𝑋)))
250	248, 249	eqtrd 2858	. . . . . . 7 ⊢ (𝜑 → ((2 · (𝑌 − 𝑋)) · (log‘𝑋)) = (((2 · (log‘𝑋)) · 𝑌) − ((2 · (log‘𝑋)) · 𝑋)))
251	35, 11	remulcld 10673	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐵 · 𝑌) ∈ ℝ)
252	251	recnd 10671	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 · 𝑌) ∈ ℂ)
253	41	recnd 10671	. . . . . . . . . 10 ⊢ (𝜑 → ((2 · (log‘𝐴)) · 𝑌) ∈ ℂ)
254	252, 221, 253	add32d 10869	. . . . . . . . 9 ⊢ (𝜑 → (((𝐵 · 𝑌) + (𝐵 · 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) = (((𝐵 · 𝑌) + ((2 · (log‘𝐴)) · 𝑌)) + (𝐵 · 𝑋)))
255	232, 239, 242	adddid 10667	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 · (𝑌 + 𝑋)) = ((𝐵 · 𝑌) + (𝐵 · 𝑋)))
256	255	oveq1d 7173	. . . . . . . . 9 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) = (((𝐵 · 𝑌) + (𝐵 · 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)))
257	232, 234, 239	adddird 10668	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐵 + (2 · (log‘𝐴))) · 𝑌) = ((𝐵 · 𝑌) + ((2 · (log‘𝐴)) · 𝑌)))
258	257	oveq1d 7173	. . . . . . . . 9 ⊢ (𝜑 → (((𝐵 + (2 · (log‘𝐴))) · 𝑌) + (𝐵 · 𝑋)) = (((𝐵 · 𝑌) + ((2 · (log‘𝐴)) · 𝑌)) + (𝐵 · 𝑋)))
259	254, 256, 258	3eqtr4d 2868	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) = (((𝐵 + (2 · (log‘𝐴))) · 𝑌) + (𝐵 · 𝑋)))
260	217, 221	subnegd 11006	. . . . . . . 8 ⊢ (𝜑 → (((𝐵 + (2 · (log‘𝐴))) · 𝑌) − -(𝐵 · 𝑋)) = (((𝐵 + (2 · (log‘𝐴))) · 𝑌) + (𝐵 · 𝑋)))
261	259, 260	eqtr4d 2861	. . . . . . 7 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) = (((𝐵 + (2 · (log‘𝐴))) · 𝑌) − -(𝐵 · 𝑋)))
262	250, 261	oveq12d 7176	. . . . . 6 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌))) = ((((2 · (log‘𝑋)) · 𝑌) − ((2 · (log‘𝑋)) · 𝑋)) + (((𝐵 + (2 · (log‘𝐴))) · 𝑌) − -(𝐵 · 𝑋))))
263	223, 246, 262	3eqtr4d 2868	. . . . 5 ⊢ (𝜑 → (((𝐵 + (2 · (log‘(𝐴 · 𝑋)))) · 𝑌) − (((2 · (log‘𝑋)) − 𝐵) · 𝑋)) = (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌))))
264	203, 212, 263	3brtr3d 5099	. . . 4 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) ≤ (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌))))
265	47, 4	remulcld 10673	. . . . . . 7 ⊢ (𝜑 → ((𝐵 · (𝐴 + 1)) · 𝑋) ∈ ℝ)
266	50, 4	remulcld 10673	. . . . . . 7 ⊢ (𝜑 → (((2 · 𝐴) · (log‘𝐴)) · 𝑋) ∈ ℝ)
267	11, 7, 4, 162	leadd1dd 11256	. . . . . . . . . 10 ⊢ (𝜑 → (𝑌 + 𝑋) ≤ ((𝐴 · 𝑋) + 𝑋))
268	6	recnd 10671	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ ℂ)
269	268, 242	adddirp1d 10669	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐴 + 1) · 𝑋) = ((𝐴 · 𝑋) + 𝑋))
270	267, 269	breqtrrd 5096	. . . . . . . . 9 ⊢ (𝜑 → (𝑌 + 𝑋) ≤ ((𝐴 + 1) · 𝑋))
271	46, 4	remulcld 10673	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐴 + 1) · 𝑋) ∈ ℝ)
272	36, 271, 34	lemul2d 12478	. . . . . . . . 9 ⊢ (𝜑 → ((𝑌 + 𝑋) ≤ ((𝐴 + 1) · 𝑋) ↔ (𝐵 · (𝑌 + 𝑋)) ≤ (𝐵 · ((𝐴 + 1) · 𝑋))))
273	270, 272	mpbid 234	. . . . . . . 8 ⊢ (𝜑 → (𝐵 · (𝑌 + 𝑋)) ≤ (𝐵 · ((𝐴 + 1) · 𝑋)))
274	46	recnd 10671	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 + 1) ∈ ℂ)
275	232, 274, 242	mulassd 10666	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 · (𝐴 + 1)) · 𝑋) = (𝐵 · ((𝐴 + 1) · 𝑋)))
276	273, 275	breqtrrd 5096	. . . . . . 7 ⊢ (𝜑 → (𝐵 · (𝑌 + 𝑋)) ≤ ((𝐵 · (𝐴 + 1)) · 𝑋))
277	29	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 2 ∈ ℝ)
278		0le2 11742	. . . . . . . . . . 11 ⊢ 0 ≤ 2
279	278	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 0 ≤ 2)
280		log1 25171	. . . . . . . . . . 11 ⊢ (log‘1) = 0
281		chpdifbnd.1	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ≤ 𝐴)
282		1rp 12396	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℝ⁺
283		logleb 25188	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℝ⁺ ∧ 𝐴 ∈ ℝ⁺) → (1 ≤ 𝐴 ↔ (log‘1) ≤ (log‘𝐴)))
284	282, 5, 283	sylancr 589	. . . . . . . . . . . 12 ⊢ (𝜑 → (1 ≤ 𝐴 ↔ (log‘1) ≤ (log‘𝐴)))
285	281, 284	mpbid 234	. . . . . . . . . . 11 ⊢ (𝜑 → (log‘1) ≤ (log‘𝐴))
286	280, 285	eqbrtrrid 5104	. . . . . . . . . 10 ⊢ (𝜑 → 0 ≤ (log‘𝐴))
287	277, 38, 279, 286	mulge0d 11219	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ (2 · (log‘𝐴)))
288	11, 7, 40, 287, 162	lemul2ad 11582	. . . . . . . 8 ⊢ (𝜑 → ((2 · (log‘𝐴)) · 𝑌) ≤ ((2 · (log‘𝐴)) · (𝐴 · 𝑋)))
289	49	recnd 10671	. . . . . . . . . 10 ⊢ (𝜑 → (2 · 𝐴) ∈ ℂ)
290	289, 224, 242	mulassd 10666	. . . . . . . . 9 ⊢ (𝜑 → (((2 · 𝐴) · (log‘𝐴)) · 𝑋) = ((2 · 𝐴) · ((log‘𝐴) · 𝑋)))
291	228, 268, 224, 242	mul4d 10854	. . . . . . . . 9 ⊢ (𝜑 → ((2 · 𝐴) · ((log‘𝐴) · 𝑋)) = ((2 · (log‘𝐴)) · (𝐴 · 𝑋)))
292	290, 291	eqtrd 2858	. . . . . . . 8 ⊢ (𝜑 → (((2 · 𝐴) · (log‘𝐴)) · 𝑋) = ((2 · (log‘𝐴)) · (𝐴 · 𝑋)))
293	288, 292	breqtrrd 5096	. . . . . . 7 ⊢ (𝜑 → ((2 · (log‘𝐴)) · 𝑌) ≤ (((2 · 𝐴) · (log‘𝐴)) · 𝑋))
294	37, 41, 265, 266, 276, 293	le2addd 11261	. . . . . 6 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) ≤ (((𝐵 · (𝐴 + 1)) · 𝑋) + (((2 · 𝐴) · (log‘𝐴)) · 𝑋)))
295	44	oveq1i 7168	. . . . . . 7 ⊢ (𝐶 · 𝑋) = (((𝐵 · (𝐴 + 1)) + ((2 · 𝐴) · (log‘𝐴))) · 𝑋)
296	47	recnd 10671	. . . . . . . 8 ⊢ (𝜑 → (𝐵 · (𝐴 + 1)) ∈ ℂ)
297	50	recnd 10671	. . . . . . . 8 ⊢ (𝜑 → ((2 · 𝐴) · (log‘𝐴)) ∈ ℂ)
298	296, 297, 242	adddird 10668	. . . . . . 7 ⊢ (𝜑 → (((𝐵 · (𝐴 + 1)) + ((2 · 𝐴) · (log‘𝐴))) · 𝑋) = (((𝐵 · (𝐴 + 1)) · 𝑋) + (((2 · 𝐴) · (log‘𝐴)) · 𝑋)))
299	295, 298	syl5eq 2870	. . . . . 6 ⊢ (𝜑 → (𝐶 · 𝑋) = (((𝐵 · (𝐴 + 1)) · 𝑋) + (((2 · 𝐴) · (log‘𝐴)) · 𝑋)))
300	294, 299	breqtrrd 5096	. . . . 5 ⊢ (𝜑 → ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌)) ≤ (𝐶 · 𝑋))
301	42, 53, 33, 300	leadd2dd 11257	. . . 4 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐵 · (𝑌 + 𝑋)) + ((2 · (log‘𝐴)) · 𝑌))) ≤ (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + (𝐶 · 𝑋)))
302	28, 43, 54, 264, 301	letrd 10799	. . 3 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) ≤ (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + (𝐶 · 𝑋)))
303	32	recnd 10671	. . . . 5 ⊢ (𝜑 → (2 · (𝑌 − 𝑋)) ∈ ℂ)
304	4, 24	rplogcld 25214	. . . . . . . 8 ⊢ (𝜑 → (log‘𝑋) ∈ ℝ⁺)
305	4, 304	rerpdivcld 12465	. . . . . . 7 ⊢ (𝜑 → (𝑋 / (log‘𝑋)) ∈ ℝ)
306	52, 305	remulcld 10673	. . . . . 6 ⊢ (𝜑 → (𝐶 · (𝑋 / (log‘𝑋))) ∈ ℝ)
307	306	recnd 10671	. . . . 5 ⊢ (𝜑 → (𝐶 · (𝑋 / (log‘𝑋))) ∈ ℂ)
308	303, 307, 210	adddird 10668	. . . 4 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))) · (log‘𝑋)) = (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐶 · (𝑋 / (log‘𝑋))) · (log‘𝑋))))
309	52	recnd 10671	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ ℂ)
310	305	recnd 10671	. . . . . . 7 ⊢ (𝜑 → (𝑋 / (log‘𝑋)) ∈ ℂ)
311	309, 310, 210	mulassd 10666	. . . . . 6 ⊢ (𝜑 → ((𝐶 · (𝑋 / (log‘𝑋))) · (log‘𝑋)) = (𝐶 · ((𝑋 / (log‘𝑋)) · (log‘𝑋))))
312	304	rpne0d 12439	. . . . . . . 8 ⊢ (𝜑 → (log‘𝑋) ≠ 0)
313	242, 210, 312	divcan1d 11419	. . . . . . 7 ⊢ (𝜑 → ((𝑋 / (log‘𝑋)) · (log‘𝑋)) = 𝑋)
314	313	oveq2d 7174	. . . . . 6 ⊢ (𝜑 → (𝐶 · ((𝑋 / (log‘𝑋)) · (log‘𝑋))) = (𝐶 · 𝑋))
315	311, 314	eqtrd 2858	. . . . 5 ⊢ (𝜑 → ((𝐶 · (𝑋 / (log‘𝑋))) · (log‘𝑋)) = (𝐶 · 𝑋))
316	315	oveq2d 7174	. . . 4 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + ((𝐶 · (𝑋 / (log‘𝑋))) · (log‘𝑋))) = (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + (𝐶 · 𝑋)))
317	308, 316	eqtrd 2858	. . 3 ⊢ (𝜑 → (((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))) · (log‘𝑋)) = (((2 · (𝑌 − 𝑋)) · (log‘𝑋)) + (𝐶 · 𝑋)))
318	302, 317	breqtrrd 5096	. 2 ⊢ (𝜑 → (((ψ‘𝑌) − (ψ‘𝑋)) · (log‘𝑋)) ≤ (((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))) · (log‘𝑋)))
319	32, 306	readdcld 10672	. . 3 ⊢ (𝜑 → ((2 · (𝑌 − 𝑋)) + (𝐶 · (𝑋 / (log‘𝑋)))) ∈ ℝ)
320	16, 319, 304	lemul1d 12477	. 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 398 ∧ w3a 1083 = wceq 1537 ∈ wcel 2114 ∀wral 3140 ⊆ wss 3938 class class class wbr 5068 ‘cfv 6357 (class class class)co 7158 ℝcr 10538 0cc0 10539 1c1 10540 + caddc 10542 · cmul 10544 +∞cpnf 10674 < clt 10677 ≤ cle 10678 − cmin 10872 -cneg 10873 / cdiv 11299 ℕcn 11640 2c2 11695 ℤ_≥cuz 12246 ℝ⁺crp 12392 (,)cioo 12741 [,)cico 12743 [,]cicc 12744 ...cfz 12895 ⌊cfl 13163 abscabs 14595 Σcsu 15044 logclog 25140 Λcvma 25671 ψcchp 25672

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2795 ax-rep 5192 ax-sep 5205 ax-nul 5212 ax-pow 5268 ax-pr 5332 ax-un 7463 ax-inf2 9106 ax-cnex 10595 ax-resscn 10596 ax-1cn 10597 ax-icn 10598 ax-addcl 10599 ax-addrcl 10600 ax-mulcl 10601 ax-mulrcl 10602 ax-mulcom 10603 ax-addass 10604 ax-mulass 10605 ax-distr 10606 ax-i2m1 10607 ax-1ne0 10608 ax-1rid 10609 ax-rnegex 10610 ax-rrecex 10611 ax-cnre 10612 ax-pre-lttri 10613 ax-pre-lttrn 10614 ax-pre-ltadd 10615 ax-pre-mulgt0 10616 ax-pre-sup 10617 ax-addf 10618 ax-mulf 10619

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1540 df-fal 1550 df-ex 1781 df-nf 1785 df-sb 2070 df-mo 2622 df-eu 2654 df-clab 2802 df-cleq 2816 df-clel 2895 df-nfc 2965 df-ne 3019 df-nel 3126 df-ral 3145 df-rex 3146 df-reu 3147 df-rmo 3148 df-rab 3149 df-v 3498 df-sbc 3775 df-csb 3886 df-dif 3941 df-un 3943 df-in 3945 df-ss 3954 df-pss 3956 df-nul 4294 df-if 4470 df-pw 4543 df-sn 4570 df-pr 4572 df-tp 4574 df-op 4576 df-uni 4841 df-int 4879 df-iun 4923 df-iin 4924 df-br 5069 df-opab 5131 df-mpt 5149 df-tr 5175 df-id 5462 df-eprel 5467 df-po 5476 df-so 5477 df-fr 5516 df-se 5517 df-we 5518 df-xp 5563 df-rel 5564 df-cnv 5565 df-co 5566 df-dm 5567 df-rn 5568 df-res 5569 df-ima 5570 df-pred 6150 df-ord 6196 df-on 6197 df-lim 6198 df-suc 6199 df-iota 6316 df-fun 6359 df-fn 6360 df-f 6361 df-f1 6362 df-fo 6363 df-f1o 6364 df-fv 6365 df-isom 6366 df-riota 7116 df-ov 7161 df-oprab 7162 df-mpo 7163 df-of 7411 df-om 7583 df-1st 7691 df-2nd 7692 df-supp 7833 df-wrecs 7949 df-recs 8010 df-rdg 8048 df-1o 8104 df-2o 8105 df-oadd 8108 df-er 8291 df-map 8410 df-pm 8411 df-ixp 8464 df-en 8512 df-dom 8513 df-sdom 8514 df-fin 8515 df-fsupp 8836 df-fi 8877 df-sup 8908 df-inf 8909 df-oi 8976 df-dju 9332 df-card 9370 df-pnf 10679 df-mnf 10680 df-xr 10681 df-ltxr 10682 df-le 10683 df-sub 10874 df-neg 10875 df-div 11300 df-nn 11641 df-2 11703 df-3 11704 df-4 11705 df-5 11706 df-6 11707 df-7 11708 df-8 11709 df-9 11710 df-n0 11901 df-z 11985 df-dec 12102 df-uz 12247 df-q 12352 df-rp 12393 df-xneg 12510 df-xadd 12511 df-xmul 12512 df-ioo 12745 df-ioc 12746 df-ico 12747 df-icc 12748 df-fz 12896 df-fzo 13037 df-fl 13165 df-mod 13241 df-seq 13373 df-exp 13433 df-fac 13637 df-bc 13666 df-hash 13694 df-shft 14428 df-cj 14460 df-re 14461 df-im 14462 df-sqrt 14596 df-abs 14597 df-limsup 14830 df-clim 14847 df-rlim 14848 df-sum 15045 df-ef 15423 df-sin 15425 df-cos 15426 df-pi 15428 df-dvds 15610 df-gcd 15846 df-prm 16018 df-pc 16176 df-struct 16487 df-ndx 16488 df-slot 16489 df-base 16491 df-sets 16492 df-ress 16493 df-plusg 16580 df-mulr 16581 df-starv 16582 df-sca 16583 df-vsca 16584 df-ip 16585 df-tset 16586 df-ple 16587 df-ds 16589 df-unif 16590 df-hom 16591 df-cco 16592 df-rest 16698 df-topn 16699 df-0g 16717 df-gsum 16718 df-topgen 16719 df-pt 16720 df-prds 16723 df-xrs 16777 df-qtop 16782 df-imas 16783 df-xps 16785 df-mre 16859 df-mrc 16860 df-acs 16862 df-mgm 17854 df-sgrp 17903 df-mnd 17914 df-submnd 17959 df-mulg 18227 df-cntz 18449 df-cmn 18910 df-psmet 20539 df-xmet 20540 df-met 20541 df-bl 20542 df-mopn 20543 df-fbas 20544 df-fg 20545 df-cnfld 20548 df-top 21504 df-topon 21521 df-topsp 21543 df-bases 21556 df-cld 21629 df-ntr 21630 df-cls 21631 df-nei 21708 df-lp 21746 df-perf 21747 df-cn 21837 df-cnp 21838 df-haus 21925 df-tx 22172 df-hmeo 22365 df-fil 22456 df-fm 22548 df-flim 22549 df-flf 22550 df-xms 22932 df-ms 22933 df-tms 22934 df-cncf 23488 df-limc 24466 df-dv 24467 df-log 25142 df-vma 25677 df-chp 25678

This theorem is referenced by: chpdifbndlem2 26132

W3C validator