MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  pntrlog2bndlem1 Structured version   Unicode version

Theorem pntrlog2bndlem1 23879
Description: The sum of selberg3r 23871 and selberg4r 23872. (Contributed by Mario Carneiro, 31-May-2016.)
Hypotheses
Ref Expression
pntsval.1  |-  S  =  ( a  e.  RR  |->  sum_ i  e.  ( 1 ... ( |_ `  a ) ) ( (Λ `  i )  x.  ( ( log `  i
)  +  (ψ `  ( a  /  i
) ) ) ) )
pntrlog2bnd.r  |-  R  =  ( a  e.  RR+  |->  ( (ψ `  a )  -  a ) )
Assertion
Ref Expression
pntrlog2bndlem1  |-  ( x  e.  ( 1 (,) +oo )  |->  ( ( ( ( abs `  ( R `  x )
)  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )  /  x ) )  e.  <_O(1)
Distinct variable groups:    i, a, n, x    S, n, x    R, n, x
Allowed substitution hints:    R( i, a)    S( i, a)

Proof of Theorem pntrlog2bndlem1
Dummy variables  k  m  y are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 1red 9522 . . 3  |-  ( T. 
->  1  e.  RR )
2 pntrlog2bnd.r . . . . 5  |-  R  =  ( a  e.  RR+  |->  ( (ψ `  a )  -  a ) )
32selberg34r 23873 . . . 4  |-  ( x  e.  ( 1 (,) +oo )  |->  ( ( ( ( R `  x )  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) )  /  x ) )  e.  O(1)
4 elioore 11480 . . . . . . . . . . . 12  |-  ( x  e.  ( 1 (,) +oo )  ->  x  e.  RR )
54adantl 464 . . . . . . . . . . 11  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  x  e.  RR )
6 1rp 11143 . . . . . . . . . . . 12  |-  1  e.  RR+
76a1i 11 . . . . . . . . . . 11  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  1  e.  RR+ )
8 1red 9522 . . . . . . . . . . . 12  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  1  e.  RR )
9 eliooord 11505 . . . . . . . . . . . . . 14  |-  ( x  e.  ( 1 (,) +oo )  ->  ( 1  <  x  /\  x  < +oo ) )
109adantl 464 . . . . . . . . . . . . 13  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
1  <  x  /\  x  < +oo ) )
1110simpld 457 . . . . . . . . . . . 12  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  1  <  x )
128, 5, 11ltled 9644 . . . . . . . . . . 11  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  1  <_  x )
135, 7, 12rpgecld 11212 . . . . . . . . . 10  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  x  e.  RR+ )
142pntrf 23865 . . . . . . . . . . 11  |-  R : RR+
--> RR
1514ffvelrni 5932 . . . . . . . . . 10  |-  ( x  e.  RR+  ->  ( R `
 x )  e.  RR )
1613, 15syl 16 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( R `  x )  e.  RR )
1713relogcld 23095 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( log `  x )  e.  RR )
1816, 17remulcld 9535 . . . . . . . 8  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( R `  x
)  x.  ( log `  x ) )  e.  RR )
19 fzfid 11986 . . . . . . . . . 10  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
1 ... ( |_ `  x ) )  e. 
Fin )
2013adantr 463 . . . . . . . . . . . . 13  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  x  e.  RR+ )
21 elfznn 11635 . . . . . . . . . . . . . . 15  |-  ( n  e.  ( 1 ... ( |_ `  x
) )  ->  n  e.  NN )
2221adantl 464 . . . . . . . . . . . . . 14  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  n  e.  NN )
2322nnrpd 11175 . . . . . . . . . . . . 13  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  n  e.  RR+ )
2420, 23rpdivcld 11194 . . . . . . . . . . . 12  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( x  /  n )  e.  RR+ )
2514ffvelrni 5932 . . . . . . . . . . . 12  |-  ( ( x  /  n )  e.  RR+  ->  ( R `
 ( x  /  n ) )  e.  RR )
2624, 25syl 16 . . . . . . . . . . 11  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( R `  ( x  /  n
) )  e.  RR )
27 fzfid 11986 . . . . . . . . . . . . . 14  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( 1 ... n )  e. 
Fin )
28 sgmss 23497 . . . . . . . . . . . . . . 15  |-  ( n  e.  NN  ->  { y  e.  NN  |  y 
||  n }  C_  ( 1 ... n
) )
2922, 28syl 16 . . . . . . . . . . . . . 14  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  { y  e.  NN  |  y  ||  n }  C_  ( 1 ... n ) )
30 ssfi 7656 . . . . . . . . . . . . . 14  |-  ( ( ( 1 ... n
)  e.  Fin  /\  { y  e.  NN  | 
y  ||  n }  C_  ( 1 ... n
) )  ->  { y  e.  NN  |  y 
||  n }  e.  Fin )
3127, 29, 30syl2anc 659 . . . . . . . . . . . . 13  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  { y  e.  NN  |  y  ||  n }  e.  Fin )
32 ssrab2 3499 . . . . . . . . . . . . . . . 16  |-  { y  e.  NN  |  y 
||  n }  C_  NN
33 simpr 459 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  m  e. 
{ y  e.  NN  |  y  ||  n }
)  ->  m  e.  { y  e.  NN  | 
y  ||  n }
)
3432, 33sseldi 3415 . . . . . . . . . . . . . . 15  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  m  e. 
{ y  e.  NN  |  y  ||  n }
)  ->  m  e.  NN )
35 vmacl 23509 . . . . . . . . . . . . . . 15  |-  ( m  e.  NN  ->  (Λ `  m )  e.  RR )
3634, 35syl 16 . . . . . . . . . . . . . 14  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  m  e. 
{ y  e.  NN  |  y  ||  n }
)  ->  (Λ `  m
)  e.  RR )
37 dvdsdivcl 23574 . . . . . . . . . . . . . . . . 17  |-  ( ( n  e.  NN  /\  m  e.  { y  e.  NN  |  y  ||  n } )  ->  (
n  /  m )  e.  { y  e.  NN  |  y  ||  n } )
3822, 37sylan 469 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  m  e. 
{ y  e.  NN  |  y  ||  n }
)  ->  ( n  /  m )  e.  {
y  e.  NN  | 
y  ||  n }
)
3932, 38sseldi 3415 . . . . . . . . . . . . . . 15  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  m  e. 
{ y  e.  NN  |  y  ||  n }
)  ->  ( n  /  m )  e.  NN )
40 vmacl 23509 . . . . . . . . . . . . . . 15  |-  ( ( n  /  m )  e.  NN  ->  (Λ `  ( n  /  m
) )  e.  RR )
4139, 40syl 16 . . . . . . . . . . . . . 14  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  m  e. 
{ y  e.  NN  |  y  ||  n }
)  ->  (Λ `  (
n  /  m ) )  e.  RR )
4236, 41remulcld 9535 . . . . . . . . . . . . 13  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  m  e. 
{ y  e.  NN  |  y  ||  n }
)  ->  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  e.  RR )
4331, 42fsumrecl 13558 . . . . . . . . . . . 12  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  sum_ m  e. 
{ y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  e.  RR )
44 vmacl 23509 . . . . . . . . . . . . . 14  |-  ( n  e.  NN  ->  (Λ `  n )  e.  RR )
4522, 44syl 16 . . . . . . . . . . . . 13  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  (Λ `  n
)  e.  RR )
4623relogcld 23095 . . . . . . . . . . . . 13  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( log `  n )  e.  RR )
4745, 46remulcld 9535 . . . . . . . . . . . 12  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (Λ `  n )  x.  ( log `  n ) )  e.  RR )
4843, 47resubcld 9905 . . . . . . . . . . 11  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) )  e.  RR )
4926, 48remulcld 9535 . . . . . . . . . 10  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( ( R `  ( x  /  n ) )  x.  ( sum_ m  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  e.  RR )
5019, 49fsumrecl 13558 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  e.  RR )
515, 11rplogcld 23101 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( log `  x )  e.  RR+ )
5250, 51rerpdivcld 11204 . . . . . . . 8  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) )  e.  RR )
5318, 52resubcld 9905 . . . . . . 7  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( R `  x )  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) )  e.  RR )
5453, 13rerpdivcld 11204 . . . . . 6  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) )  /  x )  e.  RR )
5554recnd 9533 . . . . 5  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) )  /  x )  e.  CC )
5655lo1o12 13358 . . . 4  |-  ( T. 
->  ( ( x  e.  ( 1 (,) +oo )  |->  ( ( ( ( R `  x
)  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) )  /  x ) )  e.  O(1)  <->  ( x  e.  ( 1 (,) +oo )  |->  ( abs `  (
( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) )  /  x ) ) )  e.  <_O(1) ) )
573, 56mpbii 211 . . 3  |-  ( T. 
->  ( x  e.  ( 1 (,) +oo )  |->  ( abs `  (
( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) )  /  x ) ) )  e.  <_O(1) )
5855abscld 13269 . . 3  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  ( ( ( ( R `  x
)  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) )  /  x ) )  e.  RR )
5916recnd 9533 . . . . . . 7  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( R `  x )  e.  CC )
6059abscld 13269 . . . . . 6  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  ( R `  x ) )  e.  RR )
6160, 17remulcld 9535 . . . . 5  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( abs `  ( R `  x )
)  x.  ( log `  x ) )  e.  RR )
6226recnd 9533 . . . . . . . . 9  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( R `  ( x  /  n
) )  e.  CC )
6362abscld 13269 . . . . . . . 8  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( abs `  ( R `  (
x  /  n ) ) )  e.  RR )
6422nnred 10467 . . . . . . . . . 10  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  n  e.  RR )
65 pntsval.1 . . . . . . . . . . . 12  |-  S  =  ( a  e.  RR  |->  sum_ i  e.  ( 1 ... ( |_ `  a ) ) ( (Λ `  i )  x.  ( ( log `  i
)  +  (ψ `  ( a  /  i
) ) ) ) )
6665pntsf 23875 . . . . . . . . . . 11  |-  S : RR
--> RR
6766ffvelrni 5932 . . . . . . . . . 10  |-  ( n  e.  RR  ->  ( S `  n )  e.  RR )
6864, 67syl 16 . . . . . . . . 9  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( S `  n )  e.  RR )
69 1red 9522 . . . . . . . . . . 11  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  1  e.  RR )
7064, 69resubcld 9905 . . . . . . . . . 10  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( n  -  1 )  e.  RR )
7166ffvelrni 5932 . . . . . . . . . 10  |-  ( ( n  -  1 )  e.  RR  ->  ( S `  ( n  -  1 ) )  e.  RR )
7270, 71syl 16 . . . . . . . . 9  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( S `  ( n  -  1 ) )  e.  RR )
7368, 72resubcld 9905 . . . . . . . 8  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( ( S `  n )  -  ( S `  ( n  -  1
) ) )  e.  RR )
7463, 73remulcld 9535 . . . . . . 7  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( ( abs `  ( R `  ( x  /  n
) ) )  x.  ( ( S `  n )  -  ( S `  ( n  -  1 ) ) ) )  e.  RR )
7519, 74fsumrecl 13558 . . . . . 6  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  e.  RR )
7675, 51rerpdivcld 11204 . . . . 5  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) )  e.  RR )
7761, 76resubcld 9905 . . . 4  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( abs `  ( R `  x )
)  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )  e.  RR )
7877, 13rerpdivcld 11204 . . 3  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( ( abs `  ( R `  x
) )  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )  /  x )  e.  RR )
7917recnd 9533 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( log `  x )  e.  CC )
8059, 79mulcld 9527 . . . . . . . 8  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( R `  x
)  x.  ( log `  x ) )  e.  CC )
8150recnd 9533 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  e.  CC )
8251rpne0d 11182 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( log `  x )  =/=  0 )
8381, 79, 82divcld 10237 . . . . . . . 8  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) )  e.  CC )
8480, 83subcld 9844 . . . . . . 7  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( R `  x )  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) )  e.  CC )
8584abscld 13269 . . . . . 6  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  ( ( ( R `  x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) ) )  e.  RR )
8681abscld 13269 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  e.  RR )
8786, 51rerpdivcld 11204 . . . . . . . 8  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( abs `  sum_ n  e.  ( 1 ... ( |_ `  x
) ) ( ( R `  ( x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  /  ( log `  x ) )  e.  RR )
8861, 87resubcld 9905 . . . . . . 7  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( abs `  ( R `  x )
)  x.  ( log `  x ) )  -  ( ( abs `  sum_ n  e.  ( 1 ... ( |_ `  x
) ) ( ( R `  ( x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  /  ( log `  x ) ) )  e.  RR )
8949recnd 9533 . . . . . . . . . . . 12  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( ( R `  ( x  /  n ) )  x.  ( sum_ m  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  e.  CC )
9089abscld 13269 . . . . . . . . . . 11  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( abs `  ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  e.  RR )
9119, 90fsumrecl 13558 . . . . . . . . . 10  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( abs `  (
( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) ) )  e.  RR )
9219, 89fsumabs 13617 . . . . . . . . . 10  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  <_  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( abs `  (
( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) ) ) )
9348recnd 9533 . . . . . . . . . . . . 13  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) )  e.  CC )
9462, 93absmuld 13287 . . . . . . . . . . . 12  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( abs `  ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  =  ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( abs `  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) ) )
9593abscld 13269 . . . . . . . . . . . . 13  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( abs `  ( sum_ m  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  e.  RR )
9662absge0d 13277 . . . . . . . . . . . . 13  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  0  <_  ( abs `  ( R `
 ( x  /  n ) ) ) )
9743recnd 9533 . . . . . . . . . . . . . . 15  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  sum_ m  e. 
{ y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  e.  CC )
9847recnd 9533 . . . . . . . . . . . . . . 15  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (Λ `  n )  x.  ( log `  n ) )  e.  CC )
9997, 98abs2dif2d 13291 . . . . . . . . . . . . . 14  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( abs `  ( sum_ m  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  <_  ( ( abs `  sum_ m  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) ) )  +  ( abs `  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )
10072recnd 9533 . . . . . . . . . . . . . . . 16  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( S `  ( n  -  1 ) )  e.  CC )
10197, 98addcld 9526 . . . . . . . . . . . . . . . 16  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) )  e.  CC )
102100, 101pncan2d 9846 . . . . . . . . . . . . . . 15  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (
( S `  (
n  -  1 ) )  +  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  -  ( S `
 ( n  - 
1 ) ) )  =  ( sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) )
103 elfzuz 11605 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  ( 1 ... ( |_ `  x
) )  ->  n  e.  ( ZZ>= `  1 )
)
104103adantl 464 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  n  e.  ( ZZ>= `  1 )
)
105 elfznn 11635 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( k  e.  ( 1 ... n )  ->  k  e.  NN )
106105adantl 464 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  k  e.  NN )
107 vmacl 23509 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( k  e.  NN  ->  (Λ `  k )  e.  RR )
108106, 107syl 16 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  (Λ `  k )  e.  RR )
109106nnrpd 11175 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  k  e.  RR+ )
110109relogcld 23095 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  ( log `  k )  e.  RR )
111108, 110remulcld 9535 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  (
(Λ `  k )  x.  ( log `  k
) )  e.  RR )
112 fzfid 11986 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  (
1 ... k )  e. 
Fin )
113 sgmss 23497 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( k  e.  NN  ->  { y  e.  NN  |  y 
||  k }  C_  ( 1 ... k
) )
114106, 113syl 16 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  { y  e.  NN  |  y 
||  k }  C_  ( 1 ... k
) )
115 ssfi 7656 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( 1 ... k
)  e.  Fin  /\  { y  e.  NN  | 
y  ||  k }  C_  ( 1 ... k
) )  ->  { y  e.  NN  |  y 
||  k }  e.  Fin )
116112, 114, 115syl2anc 659 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  { y  e.  NN  |  y 
||  k }  e.  Fin )
117 ssrab2 3499 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  { y  e.  NN  |  y 
||  k }  C_  NN
118 simpr 459 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ( T. 
/\  x  e.  ( 1 (,) +oo )
)  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  k  e.  ( 1 ... n
) )  /\  m  e.  { y  e.  NN  |  y  ||  k } )  ->  m  e.  { y  e.  NN  | 
y  ||  k }
)
119117, 118sseldi 3415 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( T. 
/\  x  e.  ( 1 (,) +oo )
)  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  k  e.  ( 1 ... n
) )  /\  m  e.  { y  e.  NN  |  y  ||  k } )  ->  m  e.  NN )
120119, 35syl 16 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( T. 
/\  x  e.  ( 1 (,) +oo )
)  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  k  e.  ( 1 ... n
) )  /\  m  e.  { y  e.  NN  |  y  ||  k } )  ->  (Λ `  m
)  e.  RR )
121 dvdsdivcl 23574 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( k  e.  NN  /\  m  e.  { y  e.  NN  |  y  ||  k } )  ->  (
k  /  m )  e.  { y  e.  NN  |  y  ||  k } )
122106, 121sylan 469 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ( T. 
/\  x  e.  ( 1 (,) +oo )
)  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  k  e.  ( 1 ... n
) )  /\  m  e.  { y  e.  NN  |  y  ||  k } )  ->  ( k  /  m )  e.  {
y  e.  NN  | 
y  ||  k }
)
123117, 122sseldi 3415 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( T. 
/\  x  e.  ( 1 (,) +oo )
)  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  k  e.  ( 1 ... n
) )  /\  m  e.  { y  e.  NN  |  y  ||  k } )  ->  ( k  /  m )  e.  NN )
124 vmacl 23509 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( k  /  m )  e.  NN  ->  (Λ `  ( k  /  m
) )  e.  RR )
125123, 124syl 16 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( T. 
/\  x  e.  ( 1 (,) +oo )
)  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  k  e.  ( 1 ... n
) )  /\  m  e.  { y  e.  NN  |  y  ||  k } )  ->  (Λ `  (
k  /  m ) )  e.  RR )
126120, 125remulcld 9535 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ( T. 
/\  x  e.  ( 1 (,) +oo )
)  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  k  e.  ( 1 ... n
) )  /\  m  e.  { y  e.  NN  |  y  ||  k } )  ->  ( (Λ `  m )  x.  (Λ `  ( k  /  m
) ) )  e.  RR )
127116, 126fsumrecl 13558 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  sum_ m  e.  { y  e.  NN  |  y  ||  k }  ( (Λ `  m
)  x.  (Λ `  (
k  /  m ) ) )  e.  RR )
128111, 127readdcld 9534 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  (
( (Λ `  k )  x.  ( log `  k
) )  +  sum_ m  e.  { y  e.  NN  |  y  ||  k }  ( (Λ `  m )  x.  (Λ `  ( k  /  m
) ) ) )  e.  RR )
129128recnd 9533 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  k  e.  ( 1 ... n
) )  ->  (
( (Λ `  k )  x.  ( log `  k
) )  +  sum_ m  e.  { y  e.  NN  |  y  ||  k }  ( (Λ `  m )  x.  (Λ `  ( k  /  m
) ) ) )  e.  CC )
130 fveq2 5774 . . . . . . . . . . . . . . . . . . . 20  |-  ( k  =  n  ->  (Λ `  k )  =  (Λ `  n ) )
131 fveq2 5774 . . . . . . . . . . . . . . . . . . . 20  |-  ( k  =  n  ->  ( log `  k )  =  ( log `  n
) )
132130, 131oveq12d 6214 . . . . . . . . . . . . . . . . . . 19  |-  ( k  =  n  ->  (
(Λ `  k )  x.  ( log `  k
) )  =  ( (Λ `  n )  x.  ( log `  n
) ) )
133 breq2 4371 . . . . . . . . . . . . . . . . . . . . 21  |-  ( k  =  n  ->  (
y  ||  k  <->  y  ||  n ) )
134133rabbidv 3026 . . . . . . . . . . . . . . . . . . . 20  |-  ( k  =  n  ->  { y  e.  NN  |  y 
||  k }  =  { y  e.  NN  |  y  ||  n }
)
135 oveq1 6203 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( k  =  n  ->  (
k  /  m )  =  ( n  /  m ) )
136135fveq2d 5778 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( k  =  n  ->  (Λ `  ( k  /  m
) )  =  (Λ `  ( n  /  m
) ) )
137136oveq2d 6212 . . . . . . . . . . . . . . . . . . . . 21  |-  ( k  =  n  ->  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) )  =  ( (Λ `  m
)  x.  (Λ `  (
n  /  m ) ) ) )
138137adantr 463 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( k  =  n  /\  m  e.  { y  e.  NN  |  y  ||  n } )  ->  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) )  =  ( (Λ `  m
)  x.  (Λ `  (
n  /  m ) ) ) )
139134, 138sumeq12rdv 13531 . . . . . . . . . . . . . . . . . . 19  |-  ( k  =  n  ->  sum_ m  e.  { y  e.  NN  |  y  ||  k }  ( (Λ `  m
)  x.  (Λ `  (
k  /  m ) ) )  =  sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) ) )
140132, 139oveq12d 6214 . . . . . . . . . . . . . . . . . 18  |-  ( k  =  n  ->  (
( (Λ `  k )  x.  ( log `  k
) )  +  sum_ m  e.  { y  e.  NN  |  y  ||  k }  ( (Λ `  m )  x.  (Λ `  ( k  /  m
) ) ) )  =  ( ( (Λ `  n )  x.  ( log `  n ) )  +  sum_ m  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) ) ) )
141104, 129, 140fsumm1 13568 . . . . . . . . . . . . . . . . 17  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  sum_ k  e.  ( 1 ... n
) ( ( (Λ `  k )  x.  ( log `  k ) )  +  sum_ m  e.  {
y  e.  NN  | 
y  ||  k } 
( (Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) )  =  ( sum_ k  e.  ( 1 ... ( n  - 
1 ) ) ( ( (Λ `  k
)  x.  ( log `  k ) )  + 
sum_ m  e.  { y  e.  NN  |  y 
||  k }  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) )  +  ( ( (Λ `  n )  x.  ( log `  n
) )  +  sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) ) ) ) )
14265pntsval2 23878 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  RR  ->  ( S `  n )  =  sum_ k  e.  ( 1 ... ( |_
`  n ) ) ( ( (Λ `  k
)  x.  ( log `  k ) )  + 
sum_ m  e.  { y  e.  NN  |  y 
||  k }  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) ) )
14364, 142syl 16 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( S `  n )  =  sum_ k  e.  ( 1 ... ( |_ `  n ) ) ( ( (Λ `  k
)  x.  ( log `  k ) )  + 
sum_ m  e.  { y  e.  NN  |  y 
||  k }  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) ) )
14422nnzd 10883 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  n  e.  ZZ )
145 flid 11844 . . . . . . . . . . . . . . . . . . . . 21  |-  ( n  e.  ZZ  ->  ( |_ `  n )  =  n )
146144, 145syl 16 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( |_ `  n )  =  n )
147146oveq2d 6212 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( 1 ... ( |_ `  n ) )  =  ( 1 ... n
) )
148147sumeq1d 13525 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  sum_ k  e.  ( 1 ... ( |_ `  n ) ) ( ( (Λ `  k
)  x.  ( log `  k ) )  + 
sum_ m  e.  { y  e.  NN  |  y 
||  k }  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) )  =  sum_ k  e.  ( 1 ... n
) ( ( (Λ `  k )  x.  ( log `  k ) )  +  sum_ m  e.  {
y  e.  NN  | 
y  ||  k } 
( (Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) ) )
149143, 148eqtrd 2423 . . . . . . . . . . . . . . . . 17  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( S `  n )  =  sum_ k  e.  ( 1 ... n ) ( ( (Λ `  k
)  x.  ( log `  k ) )  + 
sum_ m  e.  { y  e.  NN  |  y 
||  k }  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) ) )
15065pntsval2 23878 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  -  1 )  e.  RR  ->  ( S `  ( n  -  1 ) )  =  sum_ k  e.  ( 1 ... ( |_
`  ( n  - 
1 ) ) ) ( ( (Λ `  k
)  x.  ( log `  k ) )  + 
sum_ m  e.  { y  e.  NN  |  y 
||  k }  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) ) )
15170, 150syl 16 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( S `  ( n  -  1 ) )  =  sum_ k  e.  ( 1 ... ( |_ `  ( n  -  1
) ) ) ( ( (Λ `  k
)  x.  ( log `  k ) )  + 
sum_ m  e.  { y  e.  NN  |  y 
||  k }  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) ) )
152 1zzd 10812 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  1  e.  ZZ )
153144, 152zsubcld 10889 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( n  -  1 )  e.  ZZ )
154 flid 11844 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( n  -  1 )  e.  ZZ  ->  ( |_ `  ( n  - 
1 ) )  =  ( n  -  1 ) )
155153, 154syl 16 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( |_ `  ( n  -  1 ) )  =  ( n  -  1 ) )
156155oveq2d 6212 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( 1 ... ( |_ `  ( n  -  1
) ) )  =  ( 1 ... (
n  -  1 ) ) )
157156sumeq1d 13525 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  sum_ k  e.  ( 1 ... ( |_ `  ( n  - 
1 ) ) ) ( ( (Λ `  k
)  x.  ( log `  k ) )  + 
sum_ m  e.  { y  e.  NN  |  y 
||  k }  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) )  =  sum_ k  e.  ( 1 ... (
n  -  1 ) ) ( ( (Λ `  k )  x.  ( log `  k ) )  +  sum_ m  e.  {
y  e.  NN  | 
y  ||  k } 
( (Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) ) )
158151, 157eqtrd 2423 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( S `  ( n  -  1 ) )  =  sum_ k  e.  ( 1 ... ( n  - 
1 ) ) ( ( (Λ `  k
)  x.  ( log `  k ) )  + 
sum_ m  e.  { y  e.  NN  |  y 
||  k }  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) ) )
15997, 98addcomd 9693 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) )  =  ( ( (Λ `  n )  x.  ( log `  n ) )  +  sum_ m  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) ) ) )
160158, 159oveq12d 6214 . . . . . . . . . . . . . . . . 17  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( ( S `  ( n  -  1 ) )  +  ( sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  =  ( sum_ k  e.  ( 1 ... ( n  - 
1 ) ) ( ( (Λ `  k
)  x.  ( log `  k ) )  + 
sum_ m  e.  { y  e.  NN  |  y 
||  k }  (
(Λ `  m )  x.  (Λ `  ( k  /  m ) ) ) )  +  ( ( (Λ `  n )  x.  ( log `  n
) )  +  sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) ) ) ) )
161141, 149, 1603eqtr4d 2433 . . . . . . . . . . . . . . . 16  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( S `  n )  =  ( ( S `  (
n  -  1 ) )  +  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )
162161oveq1d 6211 . . . . . . . . . . . . . . 15  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( ( S `  n )  -  ( S `  ( n  -  1
) ) )  =  ( ( ( S `
 ( n  - 
1 ) )  +  ( sum_ m  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  -  ( S `
 ( n  - 
1 ) ) ) )
163 vmage0 23512 . . . . . . . . . . . . . . . . . . . 20  |-  ( m  e.  NN  ->  0  <_  (Λ `  m )
)
16434, 163syl 16 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  m  e. 
{ y  e.  NN  |  y  ||  n }
)  ->  0  <_  (Λ `  m ) )
165 vmage0 23512 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  /  m )  e.  NN  ->  0  <_  (Λ `  ( n  /  m ) ) )
16639, 165syl 16 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  m  e. 
{ y  e.  NN  |  y  ||  n }
)  ->  0  <_  (Λ `  ( n  /  m
) ) )
16736, 41, 164, 166mulge0d 10046 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_
`  x ) ) )  /\  m  e. 
{ y  e.  NN  |  y  ||  n }
)  ->  0  <_  ( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) ) )
16831, 42, 167fsumge0 13611 . . . . . . . . . . . . . . . . 17  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  0  <_  sum_
m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) ) )
16943, 168absidd 13256 . . . . . . . . . . . . . . . 16  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( abs ` 
sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) ) )  =  sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) ) )
170 vmage0 23512 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN  ->  0  <_  (Λ `  n )
)
17122, 170syl 16 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  0  <_  (Λ `  n ) )
17222nnge1d 10495 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  1  <_  n )
17364, 172logge0d 23102 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  0  <_  ( log `  n ) )
17445, 46, 171, 173mulge0d 10046 . . . . . . . . . . . . . . . . 17  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  0  <_  ( (Λ `  n )  x.  ( log `  n
) ) )
17547, 174absidd 13256 . . . . . . . . . . . . . . . 16  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( abs `  ( (Λ `  n
)  x.  ( log `  n ) ) )  =  ( (Λ `  n
)  x.  ( log `  n ) ) )
176169, 175oveq12d 6214 . . . . . . . . . . . . . . 15  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( ( abs `  sum_ m  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) ) )  +  ( abs `  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  =  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) )
177102, 162, 1763eqtr4d 2433 . . . . . . . . . . . . . 14  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( ( S `  n )  -  ( S `  ( n  -  1
) ) )  =  ( ( abs `  sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) ) )  +  ( abs `  (
(Λ `  n )  x.  ( log `  n
) ) ) ) )
17899, 177breqtrrd 4393 . . . . . . . . . . . . 13  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( abs `  ( sum_ m  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  <_  ( ( S `  n )  -  ( S `  ( n  -  1
) ) ) )
17995, 73, 63, 96, 178lemul2ad 10402 . . . . . . . . . . . 12  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( ( abs `  ( R `  ( x  /  n
) ) )  x.  ( abs `  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  <_  (
( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) ) )
18094, 179eqbrtrd 4387 . . . . . . . . . . 11  |-  ( ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( abs `  ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  <_  (
( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) ) )
18119, 90, 74, 180fsumle 13615 . . . . . . . . . 10  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( abs `  (
( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) ) )  <_  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) ) )
18286, 91, 75, 92, 181letrd 9650 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  <_  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) ) )
18386, 75, 51, 182lediv1dd 11231 . . . . . . . 8  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( abs `  sum_ n  e.  ( 1 ... ( |_ `  x
) ) ( ( R `  ( x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  /  ( log `  x ) )  <_  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )
18487, 76, 61, 183lesub2dd 10086 . . . . . . 7  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( abs `  ( R `  x )
)  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )  <_  ( (
( abs `  ( R `  x )
)  x.  ( log `  x ) )  -  ( ( abs `  sum_ n  e.  ( 1 ... ( |_ `  x
) ) ( ( R `  ( x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  /  ( log `  x ) ) ) )
18559, 79absmuld 13287 . . . . . . . . . 10  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  ( ( R `
 x )  x.  ( log `  x
) ) )  =  ( ( abs `  ( R `  x )
)  x.  ( abs `  ( log `  x
) ) ) )
1865, 12logge0d 23102 . . . . . . . . . . . 12  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  0  <_  ( log `  x
) )
18717, 186absidd 13256 . . . . . . . . . . 11  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  ( log `  x
) )  =  ( log `  x ) )
188187oveq2d 6212 . . . . . . . . . 10  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( abs `  ( R `  x )
)  x.  ( abs `  ( log `  x
) ) )  =  ( ( abs `  ( R `  x )
)  x.  ( log `  x ) ) )
189185, 188eqtrd 2423 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  ( ( R `
 x )  x.  ( log `  x
) ) )  =  ( ( abs `  ( R `  x )
)  x.  ( log `  x ) ) )
19081, 79, 82absdivd 13288 . . . . . . . . . 10  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) )  =  ( ( abs `  sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  /  ( abs `  ( log `  x
) ) ) )
191187oveq2d 6212 . . . . . . . . . 10  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( abs `  sum_ n  e.  ( 1 ... ( |_ `  x
) ) ( ( R `  ( x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  /  ( abs `  ( log `  x
) ) )  =  ( ( abs `  sum_ n  e.  ( 1 ... ( |_ `  x
) ) ( ( R `  ( x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  /  ( log `  x ) ) )
192190, 191eqtrd 2423 . . . . . . . . 9  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) )  =  ( ( abs `  sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  /  ( log `  x ) ) )
193189, 192oveq12d 6214 . . . . . . . 8  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( abs `  (
( R `  x
)  x.  ( log `  x ) ) )  -  ( abs `  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) ) )  =  ( ( ( abs `  ( R `
 x ) )  x.  ( log `  x
) )  -  (
( abs `  sum_ n  e.  ( 1 ... ( |_ `  x
) ) ( ( R `  ( x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  /  ( log `  x ) ) ) )
19480, 83abs2difd 13290 . . . . . . . 8  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( abs `  (
( R `  x
)  x.  ( log `  x ) ) )  -  ( abs `  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) ) )  <_  ( abs `  (
( ( R `  x )  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) ) ) )
195193, 194eqbrtrrd 4389 . . . . . . 7  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( abs `  ( R `  x )
)  x.  ( log `  x ) )  -  ( ( abs `  sum_ n  e.  ( 1 ... ( |_ `  x
) ) ( ( R `  ( x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) ) )  /  ( log `  x ) ) )  <_  ( abs `  ( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) ) ) )
19677, 88, 85, 184, 195letrd 9650 . . . . . 6  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( abs `  ( R `  x )
)  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )  <_  ( abs `  ( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) ) ) )
19777, 85, 13, 196lediv1dd 11231 . . . . 5  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( ( abs `  ( R `  x
) )  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )  /  x )  <_  ( ( abs `  ( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) ) )  /  x ) )
19853recnd 9533 . . . . . . 7  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( R `  x )  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) )  e.  CC )
1995recnd 9533 . . . . . . 7  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  x  e.  CC )
20013rpne0d 11182 . . . . . . 7  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  x  =/=  0 )
201198, 199, 200absdivd 13288 . . . . . 6  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  ( ( ( ( R `  x
)  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) )  /  x ) )  =  ( ( abs `  ( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) ) )  /  ( abs `  x
) ) )
20213rpge0d 11181 . . . . . . . 8  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  0  <_  x )
2035, 202absidd 13256 . . . . . . 7  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  x )  =  x )
204203oveq2d 6212 . . . . . 6  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( abs `  (
( ( R `  x )  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) ) )  /  ( abs `  x ) )  =  ( ( abs `  (
( ( R `  x )  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) ) )  /  x ) )
205201, 204eqtrd 2423 . . . . 5  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  ( abs `  ( ( ( ( R `  x
)  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( R `  ( x  /  n
) )  x.  ( sum_ m  e.  { y  e.  NN  |  y 
||  n }  (
(Λ `  m )  x.  (Λ `  ( n  /  m ) ) )  -  ( (Λ `  n
)  x.  ( log `  n ) ) ) )  /  ( log `  x ) ) )  /  x ) )  =  ( ( abs `  ( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) ) )  /  x ) )
206197, 205breqtrrd 4393 . . . 4  |-  ( ( T.  /\  x  e.  ( 1 (,) +oo ) )  ->  (
( ( ( abs `  ( R `  x
) )  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )  /  x )  <_  ( abs `  (
( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) )  /  x ) ) )
207206adantrr 714 . . 3  |-  ( ( T.  /\  ( x  e.  ( 1 (,) +oo )  /\  1  <_  x ) )  -> 
( ( ( ( abs `  ( R `
 x ) )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )  /  x )  <_  ( abs `  (
( ( ( R `
 x )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( R `  (
x  /  n ) )  x.  ( sum_ m  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  m )  x.  (Λ `  ( n  /  m
) ) )  -  ( (Λ `  n )  x.  ( log `  n
) ) ) )  /  ( log `  x
) ) )  /  x ) ) )
2081, 57, 58, 78, 207lo1le 13476 . 2  |-  ( T. 
->  ( x  e.  ( 1 (,) +oo )  |->  ( ( ( ( abs `  ( R `
 x ) )  x.  ( log `  x
) )  -  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )  /  x ) )  e.  <_O(1) )
209208trud 1408 1  |-  ( x  e.  ( 1 (,) +oo )  |->  ( ( ( ( abs `  ( R `  x )
)  x.  ( log `  x ) )  -  ( sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( ( abs `  ( R `  ( x  /  n ) ) )  x.  ( ( S `
 n )  -  ( S `  ( n  -  1 ) ) ) )  /  ( log `  x ) ) )  /  x ) )  e.  <_O(1)
Colors of variables: wff setvar class
Syntax hints:    /\ wa 367    = wceq 1399   T. wtru 1400    e. wcel 1826   {crab 2736    C_ wss 3389   class class class wbr 4367    |-> cmpt 4425   ` cfv 5496  (class class class)co 6196   Fincfn 7435   RRcr 9402   0cc0 9403   1c1 9404    + caddc 9406    x. cmul 9408   +oocpnf 9536    < clt 9539    <_ cle 9540    - cmin 9718    / cdiv 10123   NNcn 10452   ZZcz 10781   ZZ>=cuz 11001   RR+crp 11139   (,)cioo 11450   ...cfz 11593   |_cfl 11826   abscabs 13069   O(1)co1 13311   <_O(1)clo1 13312   sum_csu 13510    || cdvds 13988   logclog 23027  Λcvma 23482  ψcchp 23483
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1626  ax-4 1639  ax-5 1712  ax-6 1755  ax-7 1798  ax-8 1828  ax-9 1830  ax-10 1845  ax-11 1850  ax-12 1862  ax-13 2006  ax-ext 2360  ax-rep 4478  ax-sep 4488  ax-nul 4496  ax-pow 4543  ax-pr 4601  ax-un 6491  ax-inf2 7972  ax-cnex 9459  ax-resscn 9460  ax-1cn 9461  ax-icn 9462  ax-addcl 9463  ax-addrcl 9464  ax-mulcl 9465  ax-mulrcl 9466  ax-mulcom 9467  ax-addass 9468  ax-mulass 9469  ax-distr 9470  ax-i2m1 9471  ax-1ne0 9472  ax-1rid 9473  ax-rnegex 9474  ax-rrecex 9475  ax-cnre 9476  ax-pre-lttri 9477  ax-pre-lttrn 9478  ax-pre-ltadd 9479  ax-pre-mulgt0 9480  ax-pre-sup 9481  ax-addf 9482  ax-mulf 9483
This theorem depends on definitions:  df-bi 185  df-or 368  df-an 369  df-3or 972  df-3an 973  df-tru 1402  df-fal 1405  df-ex 1621  df-nf 1625  df-sb 1748  df-eu 2222  df-mo 2223  df-clab 2368  df-cleq 2374  df-clel 2377  df-nfc 2532  df-ne 2579  df-nel 2580  df-ral 2737  df-rex 2738  df-reu 2739  df-rmo 2740  df-rab 2741  df-v 3036  df-sbc 3253  df-csb 3349  df-dif 3392  df-un 3394  df-in 3396  df-ss 3403  df-pss 3405  df-nul 3712  df-if 3858  df-pw 3929  df-sn 3945  df-pr 3947  df-tp 3949  df-op 3951  df-uni 4164  df-int 4200  df-iun 4245  df-iin 4246  df-disj 4339  df-br 4368  df-opab 4426  df-mpt 4427  df-tr 4461  df-eprel 4705  df-id 4709  df-po 4714  df-so 4715  df-fr 4752  df-se 4753  df-we 4754  df-ord 4795  df-on 4796  df-lim 4797  df-suc 4798  df-xp 4919  df-rel 4920  df-cnv 4921  df-co 4922  df-dm 4923  df-rn 4924  df-res 4925  df-ima 4926  df-iota 5460  df-fun 5498  df-fn 5499  df-f 5500  df-f1 5501  df-fo 5502  df-f1o 5503  df-fv 5504  df-isom 5505  df-riota 6158  df-ov 6199  df-oprab 6200  df-mpt2 6201  df-of 6439  df-om 6600  df-1st 6699  df-2nd 6700  df-supp 6818  df-recs 6960  df-rdg 6994  df-1o 7048  df-2o 7049  df-oadd 7052  df-er 7229  df-map 7340  df-pm 7341  df-ixp 7389  df-en 7436  df-dom 7437  df-sdom 7438  df-fin 7439  df-fsupp 7745  df-fi 7786  df-sup 7816  df-oi 7850  df-card 8233  df-cda 8461  df-pnf 9541  df-mnf 9542  df-xr 9543  df-ltxr 9544  df-le 9545  df-sub 9720  df-neg 9721  df-div 10124  df-nn 10453  df-2 10511  df-3 10512  df-4 10513  df-5 10514  df-6 10515  df-7 10516  df-8 10517  df-9 10518  df-10 10519  df-n0 10713  df-z 10782  df-dec 10896  df-uz 11002  df-q 11102  df-rp 11140  df-xneg 11239  df-xadd 11240  df-xmul 11241  df-ioo 11454  df-ioc 11455  df-ico 11456  df-icc 11457  df-fz 11594  df-fzo 11718  df-fl 11828  df-mod 11897  df-seq 12011  df-exp 12070  df-fac 12256  df-bc 12283  df-hash 12308  df-shft 12902  df-cj 12934  df-re 12935  df-im 12936  df-sqrt 13070  df-abs 13071  df-limsup 13296  df-clim 13313  df-rlim 13314  df-o1 13315  df-lo1 13316  df-sum 13511  df-ef 13805  df-e 13806  df-sin 13807  df-cos 13808  df-pi 13810  df-dvds 13989  df-gcd 14147  df-prm 14220  df-pc 14363  df-struct 14636  df-ndx 14637  df-slot 14638  df-base 14639  df-sets 14640  df-ress 14641  df-plusg 14715  df-mulr 14716  df-starv 14717  df-sca 14718  df-vsca 14719  df-ip 14720  df-tset 14721  df-ple 14722  df-ds 14724  df-unif 14725  df-hom 14726  df-cco 14727  df-rest 14830  df-topn 14831  df-0g 14849  df-gsum 14850  df-topgen 14851  df-pt 14852  df-prds 14855  df-xrs 14909  df-qtop 14914  df-imas 14915  df-xps 14917  df-mre 14993  df-mrc 14994  df-acs 14996  df-mgm 15989  df-sgrp 16028  df-mnd 16038  df-submnd 16084  df-mulg 16177  df-cntz 16472  df-cmn 16917  df-psmet 18524  df-xmet 18525  df-met 18526  df-bl 18527  df-mopn 18528  df-fbas 18529  df-fg 18530  df-cnfld 18534  df-top 19484  df-bases 19486  df-topon 19487  df-topsp 19488  df-cld 19605  df-ntr 19606  df-cls 19607  df-nei 19685  df-lp 19723  df-perf 19724  df-cn 19814  df-cnp 19815  df-haus 19902  df-cmp 19973  df-tx 20148  df-hmeo 20341  df-fil 20432  df-fm 20524  df-flim 20525  df-flf 20526  df-xms 20908  df-ms 20909  df-tms 20910  df-cncf 21467  df-limc 22355  df-dv 22356  df-log 23029  df-cxp 23030  df-em 23439  df-cht 23487  df-vma 23488  df-chp 23489  df-ppi 23490  df-mu 23491
This theorem is referenced by:  pntrlog2bndlem4  23882
  Copyright terms: Public domain W3C validator