Metamath Proof Explorer


Theorem logfacrlim

Description: Combine the estimates logfacubnd and logfaclbnd , to get log ( x ! ) = x log x + O ( x ) . Equation 9.2.9 of Shapiro, p. 329. This is a weak form of the even stronger statement, log ( x ! ) = x log x - x + O ( log x ) . (Contributed by Mario Carneiro, 16-Apr-2016) (Revised by Mario Carneiro, 21-May-2016)

Ref Expression
Assertion logfacrlim ⊢ x ∈ ℝ + ⟼ log ⁡ x − log ⁡ x ! x ⇝ℝ 1

Proof

Step Hyp Ref Expression
1 1red ⊢ ⊤ → 1 ∈ ℝ
2 1cnd ⊢ ⊤ → 1 ∈ ℂ
3 relogcl ⊢ x ∈ ℝ + → log ⁡ x ∈ ℝ
4 3 adantl ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x ∈ ℝ
5 4 recnd ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x ∈ ℂ
6 1cnd ⊢ ⊤ ∧ x ∈ ℝ + → 1 ∈ ℂ
7 rpcnne0 ⊢ x ∈ ℝ + → x ∈ ℂ ∧ x ≠ 0
8 7 adantl ⊢ ⊤ ∧ x ∈ ℝ + → x ∈ ℂ ∧ x ≠ 0
9 divdir ⊢ log ⁡ x ∈ ℂ ∧ 1 ∈ ℂ ∧ x ∈ ℂ ∧ x ≠ 0 → log ⁡ x + 1 x = log ⁡ x x + 1 x
10 5 6 8 9 syl3anc ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x + 1 x = log ⁡ x x + 1 x
11 10 mpteq2dva ⊢ ⊤ → x ∈ ℝ + ⟼ log ⁡ x + 1 x = x ∈ ℝ + ⟼ log ⁡ x x + 1 x
12 simpr ⊢ ⊤ ∧ x ∈ ℝ + → x ∈ ℝ +
13 4 12 rerpdivcld ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x x ∈ ℝ
14 rpreccl ⊢ x ∈ ℝ + → 1 x ∈ ℝ +
15 14 adantl ⊢ ⊤ ∧ x ∈ ℝ + → 1 x ∈ ℝ +
16 15 rpred ⊢ ⊤ ∧ x ∈ ℝ + → 1 x ∈ ℝ
17 8 simpld ⊢ ⊤ ∧ x ∈ ℝ + → x ∈ ℂ
18 17 cxp1d ⊢ ⊤ ∧ x ∈ ℝ + → x 1 = x
19 18 oveq2d ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x x 1 = log ⁡ x x
20 19 mpteq2dva ⊢ ⊤ → x ∈ ℝ + ⟼ log ⁡ x x 1 = x ∈ ℝ + ⟼ log ⁡ x x
21 1rp ⊢ 1 ∈ ℝ +
22 cxploglim ⊢ 1 ∈ ℝ + → x ∈ ℝ + ⟼ log ⁡ x x 1 ⇝ℝ 0
23 21 22 mp1i ⊢ ⊤ → x ∈ ℝ + ⟼ log ⁡ x x 1 ⇝ℝ 0
24 20 23 eqbrtrrd ⊢ ⊤ → x ∈ ℝ + ⟼ log ⁡ x x ⇝ℝ 0
25 ax-1cn ⊢ 1 ∈ ℂ
26 divrcnv ⊢ 1 ∈ ℂ → x ∈ ℝ + ⟼ 1 x ⇝ℝ 0
27 25 26 mp1i ⊢ ⊤ → x ∈ ℝ + ⟼ 1 x ⇝ℝ 0
28 13 16 24 27 rlimadd ⊢ ⊤ → x ∈ ℝ + ⟼ log ⁡ x x + 1 x ⇝ℝ 0 + 0
29 11 28 eqbrtrd ⊢ ⊤ → x ∈ ℝ + ⟼ log ⁡ x + 1 x ⇝ℝ 0 + 0
30 00id ⊢ 0 + 0 = 0
31 29 30 breqtrdi ⊢ ⊤ → x ∈ ℝ + ⟼ log ⁡ x + 1 x ⇝ℝ 0
32 peano2re ⊢ log ⁡ x ∈ ℝ → log ⁡ x + 1 ∈ ℝ
33 4 32 syl ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x + 1 ∈ ℝ
34 33 12 rerpdivcld ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x + 1 x ∈ ℝ
35 34 recnd ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x + 1 x ∈ ℂ
36 rprege0 ⊢ x ∈ ℝ + → x ∈ ℝ ∧ 0 ≤ x
37 36 adantl ⊢ ⊤ ∧ x ∈ ℝ + → x ∈ ℝ ∧ 0 ≤ x
38 flge0nn0 ⊢ x ∈ ℝ ∧ 0 ≤ x → x ∈ ℕ 0
39 faccl ⊢ x ∈ ℕ 0 → x ! ∈ ℕ
40 37 38 39 3syl ⊢ ⊤ ∧ x ∈ ℝ + → x ! ∈ ℕ
41 40 nnrpd ⊢ ⊤ ∧ x ∈ ℝ + → x ! ∈ ℝ +
42 relogcl ⊢ x ! ∈ ℝ + → log ⁡ x ! ∈ ℝ
43 41 42 syl ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x ! ∈ ℝ
44 43 12 rerpdivcld ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x ! x ∈ ℝ
45 44 recnd ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x ! x ∈ ℂ
46 5 45 subcld ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x − log ⁡ x ! x ∈ ℂ
47 logfacbnd3 ⊢ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x ! − x ⁢ log ⁡ x − 1 ≤ log ⁡ x + 1
48 47 adantl ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x ! − x ⁢ log ⁡ x − 1 ≤ log ⁡ x + 1
49 43 recnd ⊢ ⊤ ∧ x ∈ ℝ + → log ⁡ x ! ∈ ℂ
50 49 adantrr ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x ! ∈ ℂ
51 7 ad2antrl ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ∈ ℂ ∧ x ≠ 0
52 51 simpld ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ∈ ℂ
53 5 adantrr ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x ∈ ℂ
54 subcl ⊢ log ⁡ x ∈ ℂ ∧ 1 ∈ ℂ → log ⁡ x − 1 ∈ ℂ
55 53 25 54 sylancl ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x − 1 ∈ ℂ
56 52 55 mulcld ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ⁢ log ⁡ x − 1 ∈ ℂ
57 50 56 subcld ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x ! − x ⁢ log ⁡ x − 1 ∈ ℂ
58 57 abscld ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x ! − x ⁢ log ⁡ x − 1 ∈ ℝ
59 4 adantrr ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x ∈ ℝ
60 59 32 syl ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x + 1 ∈ ℝ
61 rpregt0 ⊢ x ∈ ℝ + → x ∈ ℝ ∧ 0 < x
62 61 ad2antrl ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ∈ ℝ ∧ 0 < x
63 lediv1 ⊢ log ⁡ x ! − x ⁢ log ⁡ x − 1 ∈ ℝ ∧ log ⁡ x + 1 ∈ ℝ ∧ x ∈ ℝ ∧ 0 < x → log ⁡ x ! − x ⁢ log ⁡ x − 1 ≤ log ⁡ x + 1 ↔ log ⁡ x ! − x ⁢ log ⁡ x − 1 x ≤ log ⁡ x + 1 x
64 58 60 62 63 syl3anc ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x ! − x ⁢ log ⁡ x − 1 ≤ log ⁡ x + 1 ↔ log ⁡ x ! − x ⁢ log ⁡ x − 1 x ≤ log ⁡ x + 1 x
65 48 64 mpbid ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x ! − x ⁢ log ⁡ x − 1 x ≤ log ⁡ x + 1 x
66 51 simprd ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ≠ 0
67 55 52 66 divcan3d ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ⁢ log ⁡ x − 1 x = log ⁡ x − 1
68 67 oveq1d ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ⁢ log ⁡ x − 1 x − log ⁡ x ! x = log ⁡ x - 1 - log ⁡ x ! x
69 divsubdir ⊢ x ⁢ log ⁡ x − 1 ∈ ℂ ∧ log ⁡ x ! ∈ ℂ ∧ x ∈ ℂ ∧ x ≠ 0 → x ⁢ log ⁡ x − 1 − log ⁡ x ! x = x ⁢ log ⁡ x − 1 x − log ⁡ x ! x
70 56 50 51 69 syl3anc ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ⁢ log ⁡ x − 1 − log ⁡ x ! x = x ⁢ log ⁡ x − 1 x − log ⁡ x ! x
71 45 adantrr ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x ! x ∈ ℂ
72 1cnd ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → 1 ∈ ℂ
73 53 71 72 sub32d ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x - log ⁡ x ! x - 1 = log ⁡ x - 1 - log ⁡ x ! x
74 68 70 73 3eqtr4rd ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x - log ⁡ x ! x - 1 = x ⁢ log ⁡ x − 1 − log ⁡ x ! x
75 74 fveq2d ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x - log ⁡ x ! x - 1 = x ⁢ log ⁡ x − 1 − log ⁡ x ! x
76 56 50 subcld ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ⁢ log ⁡ x − 1 − log ⁡ x ! ∈ ℂ
77 76 52 66 absdivd ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ⁢ log ⁡ x − 1 − log ⁡ x ! x = x ⁢ log ⁡ x − 1 − log ⁡ x ! x
78 56 50 abssubd ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ⁢ log ⁡ x − 1 − log ⁡ x ! = log ⁡ x ! − x ⁢ log ⁡ x − 1
79 36 ad2antrl ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ∈ ℝ ∧ 0 ≤ x
80 absid ⊢ x ∈ ℝ ∧ 0 ≤ x → x = x
81 79 80 syl ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x = x
82 78 81 oveq12d ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ⁢ log ⁡ x − 1 − log ⁡ x ! x = log ⁡ x ! − x ⁢ log ⁡ x − 1 x
83 75 77 82 3eqtrd ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x - log ⁡ x ! x - 1 = log ⁡ x ! − x ⁢ log ⁡ x − 1 x
84 35 adantrr ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x + 1 x ∈ ℂ
85 84 subid1d ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x + 1 x − 0 = log ⁡ x + 1 x
86 85 fveq2d ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x + 1 x − 0 = log ⁡ x + 1 x
87 log1 ⊢ log ⁡ 1 = 0
88 simprr ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → 1 ≤ x
89 12 adantrr ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → x ∈ ℝ +
90 logleb ⊢ 1 ∈ ℝ + ∧ x ∈ ℝ + → 1 ≤ x ↔ log ⁡ 1 ≤ log ⁡ x
91 21 89 90 sylancr ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → 1 ≤ x ↔ log ⁡ 1 ≤ log ⁡ x
92 88 91 mpbid ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ 1 ≤ log ⁡ x
93 87 92 eqbrtrrid ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → 0 ≤ log ⁡ x
94 59 93 ge0p1rpd ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x + 1 ∈ ℝ +
95 94 89 rpdivcld ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x + 1 x ∈ ℝ +
96 rprege0 ⊢ log ⁡ x + 1 x ∈ ℝ + → log ⁡ x + 1 x ∈ ℝ ∧ 0 ≤ log ⁡ x + 1 x
97 absid ⊢ log ⁡ x + 1 x ∈ ℝ ∧ 0 ≤ log ⁡ x + 1 x → log ⁡ x + 1 x = log ⁡ x + 1 x
98 95 96 97 3syl ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x + 1 x = log ⁡ x + 1 x
99 86 98 eqtrd ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x + 1 x − 0 = log ⁡ x + 1 x
100 65 83 99 3brtr4d ⊢ ⊤ ∧ x ∈ ℝ + ∧ 1 ≤ x → log ⁡ x - log ⁡ x ! x - 1 ≤ log ⁡ x + 1 x − 0
101 1 2 31 35 46 100 rlimsqzlem ⊢ ⊤ → x ∈ ℝ + ⟼ log ⁡ x − log ⁡ x ! x ⇝ℝ 1
102 101 mptru ⊢ x ∈ ℝ + ⟼ log ⁡ x − log ⁡ x ! x ⇝ℝ 1