Metamath Proof Explorer


Theorem stirlinglem13

Description: B is decreasing and has a lower bound, then it converges. Since B is log A , in another theorem it is proven that A converges as well. (Contributed by Glauco Siliprandi, 29-Jun-2017)

Ref Expression
Hypotheses stirlinglem13.1 A = n n ! 2 n n e n
stirlinglem13.2 B = n log A n
Assertion stirlinglem13 d B d

Proof

Step Hyp Ref Expression
1 stirlinglem13.1 A = n n ! 2 n n e n
2 stirlinglem13.2 B = n log A n
3 vex y V
4 2 elrnmpt y V y ran B n y = log A n
5 3 4 ax-mp y ran B n y = log A n
6 simpr n y = log A n y = log A n
7 1 stirlinglem2 n A n +
8 7 relogcld n log A n
9 8 adantr n y = log A n log A n
10 6 9 eqeltrd n y = log A n y
11 10 rexlimiva n y = log A n y
12 5 11 sylbi y ran B y
13 12 ssriv ran B
14 1nn 1
15 1 stirlinglem2 1 A 1 +
16 relogcl A 1 + log A 1
17 14 15 16 mp2b log A 1
18 nfcv _ n 1
19 nfcv _ n log
20 nfmpt1 _ n n n ! 2 n n e n
21 1 20 nfcxfr _ n A
22 21 18 nffv _ n A 1
23 19 22 nffv _ n log A 1
24 2fveq3 n = 1 log A n = log A 1
25 18 23 24 2 fvmptf 1 log A 1 B 1 = log A 1
26 14 17 25 mp2an B 1 = log A 1
27 2fveq3 j = 1 log A j = log A 1
28 27 rspceeqv 1 B 1 = log A 1 j B 1 = log A j
29 14 26 28 mp2an j B 1 = log A j
30 26 17 eqeltri B 1
31 nfcv _ j log A n
32 nfcv _ n j
33 21 32 nffv _ n A j
34 19 33 nffv _ n log A j
35 2fveq3 n = j log A n = log A j
36 31 34 35 cbvmpt n log A n = j log A j
37 2 36 eqtri B = j log A j
38 37 elrnmpt B 1 B 1 ran B j B 1 = log A j
39 30 38 ax-mp B 1 ran B j B 1 = log A j
40 29 39 mpbir B 1 ran B
41 40 ne0ii ran B
42 4re 4
43 4ne0 4 0
44 42 43 rereccli 1 4
45 30 44 resubcli B 1 1 4
46 eqid n 1 n n + 1 = n 1 n n + 1
47 1 2 46 stirlinglem12 j B 1 1 4 B j
48 47 rgen j B 1 1 4 B j
49 breq1 x = B 1 1 4 x B j B 1 1 4 B j
50 49 ralbidv x = B 1 1 4 j x B j j B 1 1 4 B j
51 50 rspcev B 1 1 4 j B 1 1 4 B j x j x B j
52 45 48 51 mp2an x j x B j
53 8 rgen n log A n
54 2 fnmpt n log A n B Fn
55 fvelrnb B Fn y ran B j B j = y
56 53 54 55 mp2b y ran B j B j = y
57 56 bilani j x B j y ran B j B j = y
58 nfra1 j j x B j
59 nfv j y ran B
60 58 59 nfan j j x B j y ran B
61 nfv j x y
62 simp1l j x B j y ran B j B j = y j x B j
63 simp2 j x B j y ran B j B j = y j
64 rsp j x B j j x B j
65 62 63 64 sylc j x B j y ran B j B j = y x B j
66 simp3 j x B j y ran B j B j = y B j = y
67 65 66 breqtrd j x B j y ran B j B j = y x y
68 67 3exp j x B j y ran B j B j = y x y
69 60 61 68 rexlimd j x B j y ran B j B j = y x y
70 57 69 mpd j x B j y ran B x y
71 70 ralrimiva j x B j y ran B x y
72 71 reximi x j x B j x y ran B x y
73 52 72 ax-mp x y ran B x y
74 infrecl ran B ran B x y ran B x y inf ran B <
75 13 41 73 74 mp3an inf ran B <
76 nnuz = 1
77 1zzd 1
78 2 8 fmpti B :
79 78 a1i B :
80 peano2nn j j + 1
81 1 a1i j A = n n ! 2 n n e n
82 simpr j n = j + 1 n = j + 1
83 82 fveq2d j n = j + 1 n ! = j + 1 !
84 82 oveq2d j n = j + 1 2 n = 2 j + 1
85 84 fveq2d j n = j + 1 2 n = 2 j + 1
86 82 oveq1d j n = j + 1 n e = j + 1 e
87 86 82 oveq12d j n = j + 1 n e n = j + 1 e j + 1
88 85 87 oveq12d j n = j + 1 2 n n e n = 2 j + 1 j + 1 e j + 1
89 83 88 oveq12d j n = j + 1 n ! 2 n n e n = j + 1 ! 2 j + 1 j + 1 e j + 1
90 80 nnnn0d j j + 1 0
91 faccl j + 1 0 j + 1 !
92 nncn j + 1 ! j + 1 !
93 90 91 92 3syl j j + 1 !
94 2cnd j 2
95 nncn j j
96 1cnd j 1
97 95 96 addcld j j + 1
98 94 97 mulcld j 2 j + 1
99 98 sqrtcld j 2 j + 1
100 ere e
101 100 recni e
102 101 a1i j e
103 0re 0
104 epos 0 < e
105 103 104 gtneii e 0
106 105 a1i j e 0
107 97 102 106 divcld j j + 1 e
108 107 90 expcld j j + 1 e j + 1
109 99 108 mulcld j 2 j + 1 j + 1 e j + 1
110 2rp 2 +
111 110 a1i j 2 +
112 nnre j j
113 103 a1i j 0
114 1red j 1
115 0le1 0 1
116 115 a1i j 0 1
117 nnge1 j 1 j
118 113 114 112 116 117 letrd j 0 j
119 112 118 ge0p1rpd j j + 1 +
120 111 119 rpmulcld j 2 j + 1 +
121 120 sqrtgt0d j 0 < 2 j + 1
122 121 gt0ne0d j 2 j + 1 0
123 80 nnne0d j j + 1 0
124 97 102 123 106 divne0d j j + 1 e 0
125 nnz j j
126 125 peano2zd j j + 1
127 107 124 126 expne0d j j + 1 e j + 1 0
128 99 108 122 127 mulne0d j 2 j + 1 j + 1 e j + 1 0
129 93 109 128 divcld j j + 1 ! 2 j + 1 j + 1 e j + 1
130 81 89 80 129 fvmptd j A j + 1 = j + 1 ! 2 j + 1 j + 1 e j + 1
131 nnrp j + 1 ! j + 1 ! +
132 90 91 131 3syl j j + 1 ! +
133 120 rpsqrtcld j 2 j + 1 +
134 epr e +
135 134 a1i j e +
136 119 135 rpdivcld j j + 1 e +
137 136 126 rpexpcld j j + 1 e j + 1 +
138 133 137 rpmulcld j 2 j + 1 j + 1 e j + 1 +
139 132 138 rpdivcld j j + 1 ! 2 j + 1 j + 1 e j + 1 +
140 130 139 eqeltrd j A j + 1 +
141 140 relogcld j log A j + 1
142 nfcv _ n j + 1
143 21 142 nffv _ n A j + 1
144 19 143 nffv _ n log A j + 1
145 2fveq3 n = j + 1 log A n = log A j + 1
146 142 144 145 2 fvmptf j + 1 log A j + 1 B j + 1 = log A j + 1
147 80 141 146 syl2anc j B j + 1 = log A j + 1
148 147 141 eqeltrd j B j + 1
149 78 ffvelcdmi j B j
150 eqid z 1 2 z + 1 1 2 j + 1 2 z = z 1 2 z + 1 1 2 j + 1 2 z
151 1 2 150 stirlinglem11 j B j + 1 < B j
152 148 149 151 ltled j B j + 1 B j
153 152 adantl j B j + 1 B j
154 52 a1i x j x B j
155 76 77 79 153 154 climinf B inf ran B <
156 155 mptru B inf ran B <
157 breq2 d = inf ran B < B d B inf ran B <
158 157 rspcev inf ran B < B inf ran B < d B d
159 75 156 158 mp2an d B d