harmonicbnd4 - Metamath Proof Explorer

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

Theorem harmonicbnd4 27371

Description: The asymptotic behavior of Σ𝑚 ≤ 𝐴, 1 / 𝑚 = log𝐴 + γ + 𝑂(1 / 𝐴). (Contributed by Mario Carneiro, 14-May-2016.)

**Assertion**
Ref	Expression
harmonicbnd4	⊢ (𝐴 ∈ ℝ⁺ → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ≤ (1 / 𝐴))

Distinct variable group: 𝐴,𝑚

**Proof of Theorem harmonicbnd4**
Step	Hyp	Ref	Expression
1		fzfid 14146	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (1...(⌊‘𝐴)) ∈ Fin)
2		elfznn 13717	. . . . . . . 8 ⊢ (𝑚 ∈ (1...(⌊‘𝐴)) → 𝑚 ∈ ℕ)
3	2	adantl 487	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ⁺ ∧ 𝑚 ∈ (1...(⌊‘𝐴))) → 𝑚 ∈ ℕ)
4	3	nnrecred 12419	. . . . . 6 ⊢ ((𝐴 ∈ ℝ⁺ ∧ 𝑚 ∈ (1...(⌊‘𝐴))) → (1 / 𝑚) ∈ ℝ)
5	1, 4	fsumrecl 15932	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) ∈ ℝ)
6	5	recnd 11367	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) ∈ ℂ)
7		relogcl 26936	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → (log‘𝐴) ∈ ℝ)
8	7	recnd 11367	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → (log‘𝐴) ∈ ℂ)
9		emre 27366	. . . . . 6 ⊢ γ ∈ ℝ
10	9	a1i 11	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → γ ∈ ℝ)
11	10	recnd 11367	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → γ ∈ ℂ)
12	6, 8, 11	subsub4d 11730	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → ((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) − γ) = (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))
13	12	fveq2d 6915	. 2 ⊢ (𝐴 ∈ ℝ⁺ → (abs‘((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) − γ)) = (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))))
14		rpreccl 13178	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (1 / 𝐴) ∈ ℝ⁺)
15	14	rpred 13194	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → (1 / 𝐴) ∈ ℝ)
16		resubcl 11652	. . . . 5 ⊢ ((γ ∈ ℝ ∧ (1 / 𝐴) ∈ ℝ) → (γ − (1 / 𝐴)) ∈ ℝ)
17	9, 15, 16	sylancr 599	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → (γ − (1 / 𝐴)) ∈ ℝ)
18		rprege0 13166	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (𝐴 ∈ ℝ ∧ 0 ≤ 𝐴))
19		flge0nn0 13990	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ ∧ 0 ≤ 𝐴) → (⌊‘𝐴) ∈ ℕ₀)
20	18, 19	syl 18	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (⌊‘𝐴) ∈ ℕ₀)
21		nn0p1nn 12675	. . . . . . . 8 ⊢ ((⌊‘𝐴) ∈ ℕ₀ → ((⌊‘𝐴) + 1) ∈ ℕ)
22	20, 21	syl 18	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → ((⌊‘𝐴) + 1) ∈ ℕ)
23	22	nnrpd 13192	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → ((⌊‘𝐴) + 1) ∈ ℝ⁺)
24		relogcl 26936	. . . . . 6 ⊢ (((⌊‘𝐴) + 1) ∈ ℝ⁺ → (log‘((⌊‘𝐴) + 1)) ∈ ℝ)
25	23, 24	syl 18	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → (log‘((⌊‘𝐴) + 1)) ∈ ℝ)
26	5, 25	resubcld 11774	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ ℝ)
27	5, 7	resubcld 11774	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) ∈ ℝ)
28	22	nnrecred 12419	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (1 / ((⌊‘𝐴) + 1)) ∈ ℝ)
29		fzfid 14146	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (1...((⌊‘𝐴) + 1)) ∈ Fin)
30		elfznn 13717	. . . . . . . . . 10 ⊢ (𝑚 ∈ (1...((⌊‘𝐴) + 1)) → 𝑚 ∈ ℕ)
31	30	adantl 487	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ⁺ ∧ 𝑚 ∈ (1...((⌊‘𝐴) + 1))) → 𝑚 ∈ ℕ)
32	31	nnrecred 12419	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ⁺ ∧ 𝑚 ∈ (1...((⌊‘𝐴) + 1))) → (1 / 𝑚) ∈ ℝ)
33	29, 32	fsumrecl 15932	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) ∈ ℝ)
34	33, 25	resubcld 11774	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ ℝ)
35		harmonicbnd 27364	. . . . . . . 8 ⊢ (((⌊‘𝐴) + 1) ∈ ℕ → (Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ (γ[,]1))
36	22, 35	syl 18	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ (γ[,]1))
37		1re 11338	. . . . . . . . 9 ⊢ 1 ∈ ℝ
38	9, 37	elicc2i 13573	. . . . . . . 8 ⊢ ((Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ (γ[,]1) ↔ ((Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ ℝ ∧ γ ≤ (Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∧ (Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ≤ 1))
39	38	simp2bi 1164	. . . . . . 7 ⊢ ((Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ (γ[,]1) → γ ≤ (Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))))
40	36, 39	syl 18	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → γ ≤ (Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))))
41		rpre 13159	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ ℝ)
42		fllep1 13971	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → 𝐴 ≤ ((⌊‘𝐴) + 1))
43	41, 42	syl 18	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ≤ ((⌊‘𝐴) + 1))
44		rpregt0 13165	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (𝐴 ∈ ℝ ∧ 0 < 𝐴))
45	22	nnred 12380	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → ((⌊‘𝐴) + 1) ∈ ℝ)
46	22	nngt0d 12417	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → 0 < ((⌊‘𝐴) + 1))
47		lerec 12230	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ ∧ 0 < 𝐴) ∧ (((⌊‘𝐴) + 1) ∈ ℝ ∧ 0 < ((⌊‘𝐴) + 1))) → (𝐴 ≤ ((⌊‘𝐴) + 1) ↔ (1 / ((⌊‘𝐴) + 1)) ≤ (1 / 𝐴)))
48	44, 45, 46, 47	syl12anc 850	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (𝐴 ≤ ((⌊‘𝐴) + 1) ↔ (1 / ((⌊‘𝐴) + 1)) ≤ (1 / 𝐴)))
49	43, 48	mpbid 235	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (1 / ((⌊‘𝐴) + 1)) ≤ (1 / 𝐴))
50	10, 28, 34, 15, 40, 49	le2subd 11966	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → (γ − (1 / 𝐴)) ≤ ((Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) − (1 / ((⌊‘𝐴) + 1))))
51	33	recnd 11367	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) ∈ ℂ)
52	25	recnd 11367	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (log‘((⌊‘𝐴) + 1)) ∈ ℂ)
53	28	recnd 11367	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (1 / ((⌊‘𝐴) + 1)) ∈ ℂ)
54	51, 52, 53	sub32d 11731	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → ((Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) − (1 / ((⌊‘𝐴) + 1))) = ((Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (1 / ((⌊‘𝐴) + 1))) − (log‘((⌊‘𝐴) + 1))))
55		nnuz 13034	. . . . . . . . . . 11 ⊢ ℕ = (ℤ_≥‘1)
56	22, 55	eleqtrdi 2874	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → ((⌊‘𝐴) + 1) ∈ (ℤ_≥‘1))
57	32	recnd 11367	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ⁺ ∧ 𝑚 ∈ (1...((⌊‘𝐴) + 1))) → (1 / 𝑚) ∈ ℂ)
58		oveq2 7454	. . . . . . . . . 10 ⊢ (𝑚 = ((⌊‘𝐴) + 1) → (1 / 𝑚) = (1 / ((⌊‘𝐴) + 1)))
59	56, 57, 58	fsumm1 15949	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) = (Σ𝑚 ∈ (1...(((⌊‘𝐴) + 1) − 1))(1 / 𝑚) + (1 / ((⌊‘𝐴) + 1))))
60	20	nn0cnd 12699	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → (⌊‘𝐴) ∈ ℂ)
61		ax-1cn 11288	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℂ
62		pncan 11593	. . . . . . . . . . . . 13 ⊢ (((⌊‘𝐴) ∈ ℂ ∧ 1 ∈ ℂ) → (((⌊‘𝐴) + 1) − 1) = (⌊‘𝐴))
63	60, 61, 62	sylancl 598	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (((⌊‘𝐴) + 1) − 1) = (⌊‘𝐴))
64	63	oveq2d 7462	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (1...(((⌊‘𝐴) + 1) − 1)) = (1...(⌊‘𝐴)))
65	64	sumeq1d 15899	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → Σ𝑚 ∈ (1...(((⌊‘𝐴) + 1) − 1))(1 / 𝑚) = Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚))
66	65	oveq1d 7461	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...(((⌊‘𝐴) + 1) − 1))(1 / 𝑚) + (1 / ((⌊‘𝐴) + 1))) = (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) + (1 / ((⌊‘𝐴) + 1))))
67	59, 66	eqtrd 2798	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) = (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) + (1 / ((⌊‘𝐴) + 1))))
68	6, 53, 67	mvrraddd 11757	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (1 / ((⌊‘𝐴) + 1))) = Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚))
69	68	oveq1d 7461	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → ((Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (1 / ((⌊‘𝐴) + 1))) − (log‘((⌊‘𝐴) + 1))) = (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))))
70	54, 69	eqtrd 2798	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → ((Σ𝑚 ∈ (1...((⌊‘𝐴) + 1))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) − (1 / ((⌊‘𝐴) + 1))) = (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))))
71	50, 70	breqtrd 5135	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → (γ − (1 / 𝐴)) ≤ (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))))
72		logleb 26964	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ⁺ ∧ ((⌊‘𝐴) + 1) ∈ ℝ⁺) → (𝐴 ≤ ((⌊‘𝐴) + 1) ↔ (log‘𝐴) ≤ (log‘((⌊‘𝐴) + 1))))
73	23, 72	mpdan 700	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (𝐴 ≤ ((⌊‘𝐴) + 1) ↔ (log‘𝐴) ≤ (log‘((⌊‘𝐴) + 1))))
74	43, 73	mpbid 235	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → (log‘𝐴) ≤ (log‘((⌊‘𝐴) + 1)))
75	7, 25, 5, 74	lesub2dd 11963	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ≤ (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)))
76	17, 26, 27, 71, 75	letrd 11497	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → (γ − (1 / 𝐴)) ≤ (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)))
77	27, 15	resubcld 11774	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → ((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) − (1 / 𝐴)) ∈ ℝ)
78	15	recnd 11367	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (1 / 𝐴) ∈ ℂ)
79	6, 8, 78	subsub4d 11730	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → ((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) − (1 / 𝐴)) = (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + (1 / 𝐴))))
80	7, 15	readdcld 11368	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → ((log‘𝐴) + (1 / 𝐴)) ∈ ℝ)
81		id 23	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ ℝ⁺)
82	23, 81	relogdivd 26987	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (log‘(((⌊‘𝐴) + 1) / 𝐴)) = ((log‘((⌊‘𝐴) + 1)) − (log‘𝐴)))
83		rerpdivcl 13182	. . . . . . . . . . . . 13 ⊢ ((((⌊‘𝐴) + 1) ∈ ℝ ∧ 𝐴 ∈ ℝ⁺) → (((⌊‘𝐴) + 1) / 𝐴) ∈ ℝ)
84	45, 83	mpancom 701	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (((⌊‘𝐴) + 1) / 𝐴) ∈ ℝ)
85	37	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → 1 ∈ ℝ)
86	85, 15	readdcld 11368	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (1 + (1 / 𝐴)) ∈ ℝ)
87	15	reefcld 16286	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (exp‘(1 / 𝐴)) ∈ ℝ)
88	61	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → 1 ∈ ℂ)
89		rpcnne0 13169	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → (𝐴 ∈ ℂ ∧ 𝐴 ≠ 0))
90		divdir 12029	. . . . . . . . . . . . . 14 ⊢ (((⌊‘𝐴) ∈ ℂ ∧ 1 ∈ ℂ ∧ (𝐴 ∈ ℂ ∧ 𝐴 ≠ 0)) → (((⌊‘𝐴) + 1) / 𝐴) = (((⌊‘𝐴) / 𝐴) + (1 / 𝐴)))
91	60, 88, 89, 90	syl3anc 1399	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → (((⌊‘𝐴) + 1) / 𝐴) = (((⌊‘𝐴) / 𝐴) + (1 / 𝐴)))
92		reflcl 13966	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ ℝ → (⌊‘𝐴) ∈ ℝ)
93	41, 92	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℝ⁺ → (⌊‘𝐴) ∈ ℝ)
94		rerpdivcl 13182	. . . . . . . . . . . . . . 15 ⊢ (((⌊‘𝐴) ∈ ℝ ∧ 𝐴 ∈ ℝ⁺) → ((⌊‘𝐴) / 𝐴) ∈ ℝ)
95	93, 94	mpancom 701	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → ((⌊‘𝐴) / 𝐴) ∈ ℝ)
96		flle 13969	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ ℝ → (⌊‘𝐴) ≤ 𝐴)
97	41, 96	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ ℝ⁺ → (⌊‘𝐴) ≤ 𝐴)
98		rpcn 13161	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ ℝ⁺ → 𝐴 ∈ ℂ)
99	98	mulridd 11356	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ ℝ⁺ → (𝐴 · 1) = 𝐴)
100	97, 99	breqtrrd 5137	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℝ⁺ → (⌊‘𝐴) ≤ (𝐴 · 1))
101		ledivmul 12223	. . . . . . . . . . . . . . . 16 ⊢ (((⌊‘𝐴) ∈ ℝ ∧ 1 ∈ ℝ ∧ (𝐴 ∈ ℝ ∧ 0 < 𝐴)) → (((⌊‘𝐴) / 𝐴) ≤ 1 ↔ (⌊‘𝐴) ≤ (𝐴 · 1)))
102	93, 85, 44, 101	syl3anc 1399	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ ℝ⁺ → (((⌊‘𝐴) / 𝐴) ≤ 1 ↔ (⌊‘𝐴) ≤ (𝐴 · 1)))
103	100, 102	mpbird 260	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ ℝ⁺ → ((⌊‘𝐴) / 𝐴) ≤ 1)
104	95, 85, 15, 103	leadd1dd 11960	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → (((⌊‘𝐴) / 𝐴) + (1 / 𝐴)) ≤ (1 + (1 / 𝐴)))
105	91, 104	eqbrtrd 5131	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (((⌊‘𝐴) + 1) / 𝐴) ≤ (1 + (1 / 𝐴)))
106		efgt1p 16315	. . . . . . . . . . . . . 14 ⊢ ((1 / 𝐴) ∈ ℝ⁺ → (1 + (1 / 𝐴)) < (exp‘(1 / 𝐴)))
107	14, 106	syl 18	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ ℝ⁺ → (1 + (1 / 𝐴)) < (exp‘(1 / 𝐴)))
108	86, 87, 107	ltled 11488	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (1 + (1 / 𝐴)) ≤ (exp‘(1 / 𝐴)))
109	84, 86, 87, 105, 108	letrd 11497	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → (((⌊‘𝐴) + 1) / 𝐴) ≤ (exp‘(1 / 𝐴)))
110		rpdivcl 13177	. . . . . . . . . . . . 13 ⊢ ((((⌊‘𝐴) + 1) ∈ ℝ⁺ ∧ 𝐴 ∈ ℝ⁺) → (((⌊‘𝐴) + 1) / 𝐴) ∈ ℝ⁺)
111	23, 110	mpancom 701	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (((⌊‘𝐴) + 1) / 𝐴) ∈ ℝ⁺)
112	15	rpefcld 16305	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ⁺ → (exp‘(1 / 𝐴)) ∈ ℝ⁺)
113	111, 112	logled 26988	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ⁺ → ((((⌊‘𝐴) + 1) / 𝐴) ≤ (exp‘(1 / 𝐴)) ↔ (log‘(((⌊‘𝐴) + 1) / 𝐴)) ≤ (log‘(exp‘(1 / 𝐴)))))
114	109, 113	mpbid 235	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (log‘(((⌊‘𝐴) + 1) / 𝐴)) ≤ (log‘(exp‘(1 / 𝐴))))
115	15	relogefd 26989	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ⁺ → (log‘(exp‘(1 / 𝐴))) = (1 / 𝐴))
116	114, 115	breqtrd 5135	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ⁺ → (log‘(((⌊‘𝐴) + 1) / 𝐴)) ≤ (1 / 𝐴))
117	82, 116	eqbrtrrd 5133	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → ((log‘((⌊‘𝐴) + 1)) − (log‘𝐴)) ≤ (1 / 𝐴))
118	25, 7, 15	lesubadd2d 11945	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ⁺ → (((log‘((⌊‘𝐴) + 1)) − (log‘𝐴)) ≤ (1 / 𝐴) ↔ (log‘((⌊‘𝐴) + 1)) ≤ ((log‘𝐴) + (1 / 𝐴))))
119	117, 118	mpbid 235	. . . . . . 7 ⊢ (𝐴 ∈ ℝ⁺ → (log‘((⌊‘𝐴) + 1)) ≤ ((log‘𝐴) + (1 / 𝐴)))
120	25, 80, 5, 119	lesub2dd 11963	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + (1 / 𝐴))) ≤ (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))))
121	79, 120	eqbrtrd 5131	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → ((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) − (1 / 𝐴)) ≤ (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))))
122		harmonicbnd3 27368	. . . . . . 7 ⊢ ((⌊‘𝐴) ∈ ℕ₀ → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ (0[,]γ))
123	20, 122	syl 18	. . . . . 6 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ (0[,]γ))
124		0re 11340	. . . . . . . 8 ⊢ 0 ∈ ℝ
125	124, 9	elicc2i 13573	. . . . . . 7 ⊢ ((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ (0[,]γ) ↔ ((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ ℝ ∧ 0 ≤ (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∧ (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ≤ γ))
126	125	simp3bi 1165	. . . . . 6 ⊢ ((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ∈ (0[,]γ) → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ≤ γ)
127	123, 126	syl 18	. . . . 5 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘((⌊‘𝐴) + 1))) ≤ γ)
128	77, 26, 10, 121, 127	letrd 11497	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → ((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) − (1 / 𝐴)) ≤ γ)
129	27, 15, 10	lesubaddd 11943	. . . 4 ⊢ (𝐴 ∈ ℝ⁺ → (((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) − (1 / 𝐴)) ≤ γ ↔ (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) ≤ (γ + (1 / 𝐴))))
130	128, 129	mpbid 235	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) ≤ (γ + (1 / 𝐴)))
131	27, 10, 15	absdifled 15636	. . 3 ⊢ (𝐴 ∈ ℝ⁺ → ((abs‘((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) − γ)) ≤ (1 / 𝐴) ↔ ((γ − (1 / 𝐴)) ≤ (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) ∧ (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) ≤ (γ + (1 / 𝐴)))))
132	76, 130, 131	mpbir2and 726	. 2 ⊢ (𝐴 ∈ ℝ⁺ → (abs‘((Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − (log‘𝐴)) − γ)) ≤ (1 / 𝐴))
133	13, 132	eqbrtrrd 5133	1 ⊢ (𝐴 ∈ ℝ⁺ → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ≤ (1 / 𝐴))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 = wceq 1570 ∈ wcel 2147 ≠ wne 2959 class class class wbr 5106 ‘cfv 6561 (class class class)co 7446 ℂcc 11228 ℝcr 11229 0cc0 11230 1c1 11231 + caddc 11233 · cmul 11235 < clt 11373 ≤ cle 11374 − cmin 11571 / cdiv 12003 ℕcn 12365 ℕ₀cn0 12636 ℤ_≥cuz 12995 ℝ⁺crp 13150 [,]cicc 13509 ...cfz 13669 ⌊cfl 13960 abscabs 15433 Σcsu 15885 expce 16259 logclog 26915 γcem 27352

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1945 ax-6 2002 ax-7 2043 ax-8 2149 ax-9 2157 ax-10 2180 ax-11 2197 ax-12 2216 ax-ext 2735 ax-rep 5236 ax-sep 5253 ax-nul 5264 ax-pow 5332 ax-pr 5396 ax-un 7778 ax-inf2 9672 ax-cnex 11286 ax-resscn 11287 ax-1cn 11288 ax-icn 11289 ax-addcl 11290 ax-addrcl 11291 ax-mulcl 11292 ax-mulrcl 11293 ax-mulcom 11294 ax-addass 11295 ax-mulass 11296 ax-distr 11297 ax-i2m1 11298 ax-1ne0 11299 ax-1rid 11300 ax-rnegex 11301 ax-rrecex 11302 ax-cnre 11303 ax-pre-lttri 11304 ax-pre-lttrn 11305 ax-pre-ltadd 11306 ax-pre-mulgt0 11307 ax-pre-sup 11308 ax-addf 11309

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2102 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-nel 3066 df-ral 3081 df-rex 3091 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3456 df-sbc 3743 df-csb 3852 df-ss 3901 df-pss 4017 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-pw 4562 df-sn 4589 df-pr 4591 df-tp 4593 df-op 4839 df-uni 4871 df-int 4911 df-iun 4956 df-iin 4957 df-br 5107 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5551 df-eprel 5556 df-po 5564 df-so 5565 df-fr 5609 df-se 5610 df-we 5611 df-xp 5662 df-rel 5663 df-cnv 5664 df-co 5665 df-dm 5666 df-rn 5667 df-res 5668 df-ima 5669 df-pred 6325 df-ord 6386 df-on 6387 df-lim 6388 df-suc 6389 df-iota 6515 df-fun 6563 df-fn 6564 df-f 6565 df-f1 6566 df-fo 6567 df-f1o 6568 df-fv 6569 df-isom 6570 df-riota 7403 df-ov 7449 df-oprab 7450 df-mpo 7451 df-of 7720 df-om 7905 df-1st 8028 df-2nd 8029 df-supp 8208 df-frecs 8330 df-wrecs 8361 df-recs 8410 df-rdg 8449 df-1o 8507 df-2o 8508 df-oadd 8511 df-er 8748 df-map 8880 df-pm 8881 df-ixp 8957 df-en 9005 df-dom 9006 df-sdom 9007 df-fin 9008 df-fsupp 9385 df-fi 9433 df-sup 9464 df-inf 9465 df-oi 9534 df-card 10050 df-pnf 11375 df-mnf 11376 df-xr 11377 df-ltxr 11378 df-le 11379 df-sub 11573 df-neg 11574 df-div 12004 df-nn 12366 df-2 12435 df-3 12436 df-4 12437 df-5 12438 df-6 12439 df-7 12440 df-8 12441 df-9 12442 df-n0 12637 df-xnn0 12710 df-z 12724 df-dec 12845 df-uz 12996 df-q 13106 df-rp 13151 df-xneg 13271 df-xadd 13272 df-xmul 13273 df-ioo 13510 df-ioc 13511 df-ico 13512 df-icc 13513 df-fz 13670 df-fzo 13819 df-fl 13962 df-mod 14040 df-seq 14175 df-exp 14235 df-fac 14448 df-bc 14477 df-hash 14505 df-shft 15252 df-cj 15298 df-re 15299 df-im 15300 df-sqrt 15434 df-abs 15435 df-limsup 15670 df-clim 15687 df-rlim 15688 df-sum 15886 df-ef 16265 df-e 16266 df-sin 16267 df-cos 16268 df-tan 16269 df-pi 16270 df-dvds 16455 df-struct 17357 df-sets 17374 df-slot 17392 df-ndx 17404 df-base 17420 df-ress 17441 df-plusg 17473 df-mulr 17474 df-starv 17475 df-sca 17476 df-vsca 17477 df-ip 17478 df-tset 17479 df-ple 17480 df-ds 17482 df-unif 17483 df-hom 17484 df-cco 17485 df-rest 17625 df-topn 17626 df-0g 17644 df-gsum 17645 df-topgen 17646 df-pt 17647 df-prds 17650 df-xrs 17706 df-qtop 17711 df-imas 17712 df-xps 17714 df-mre 17788 df-mrc 17789 df-acs 17791 df-mgm 18848 df-sgrp 18940 df-mnd 18956 df-submnd 19011 df-mulg 19310 df-cntz 19564 df-cmn 20029 df-psmet 21703 df-xmet 21704 df-met 21705 df-bl 21706 df-mopn 21707 df-fbas 21708 df-fg 21709 df-cnfld 21712 df-top 23245 df-topon 23262 df-topsp 23284 df-bases 23297 df-cld 23370 df-ntr 23371 df-cls 23372 df-nei 23449 df-lp 23487 df-perf 23488 df-cn 23578 df-cnp 23579 df-haus 23666 df-cmp 23738 df-tx 23914 df-hmeo 24107 df-fil 24198 df-fm 24290 df-flim 24291 df-flf 24292 df-xms 24672 df-ms 24673 df-tms 24674 df-cncf 25232 df-limc 26219 df-dv 26220 df-ulm 26737 df-log 26917 df-atan 27228 df-em 27353

This theorem is used by: mulogsumlem 27891 mulog2sumlem1 27894

W3C validator