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

Theorem selberg 22929
Description: Selberg's symmetry formula. The statement has many forms, and this one is equivalent to the statement that  sum_
n  <_  x , Λ ( n ) log n  +  sum_ m  x.  n  <_  x , Λ ( m )Λ ( n )  =  2 x log x  +  O
( x ). Equation 10.4.10 of [Shapiro], p. 419. (Contributed by Mario Carneiro, 23-May-2016.)
Assertion
Ref Expression
selberg  |-  ( x  e.  RR+  |->  ( (
sum_ n  e.  (
1 ... ( |_ `  x ) ) ( (Λ `  n )  x.  ( ( log `  n
)  +  (ψ `  ( x  /  n
) ) ) )  /  x )  -  ( 2  x.  ( log `  x ) ) ) )  e.  O(1)
Distinct variable group:    x, n

Proof of Theorem selberg
Dummy variables  d  m  y are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveq2 5798 . . . . . . . . . . . . 13  |-  ( n  =  d  ->  (Λ `  n )  =  (Λ `  d ) )
2 oveq2 6207 . . . . . . . . . . . . . 14  |-  ( n  =  d  ->  (
x  /  n )  =  ( x  / 
d ) )
32fveq2d 5802 . . . . . . . . . . . . 13  |-  ( n  =  d  ->  (ψ `  ( x  /  n
) )  =  (ψ `  ( x  /  d
) ) )
41, 3oveq12d 6217 . . . . . . . . . . . 12  |-  ( n  =  d  ->  (
(Λ `  n )  x.  (ψ `  ( x  /  n ) ) )  =  ( (Λ `  d
)  x.  (ψ `  ( x  /  d
) ) ) )
54cbvsumv 13290 . . . . . . . . . . 11  |-  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( (Λ `  n
)  x.  (ψ `  ( x  /  n
) ) )  = 
sum_ d  e.  ( 1 ... ( |_
`  x ) ) ( (Λ `  d
)  x.  (ψ `  ( x  /  d
) ) )
6 fzfid 11911 . . . . . . . . . . . . . 14  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( 1 ... ( |_ `  ( x  /  d
) ) )  e. 
Fin )
7 elfznn 11594 . . . . . . . . . . . . . . . . 17  |-  ( d  e.  ( 1 ... ( |_ `  x
) )  ->  d  e.  NN )
87adantl 466 . . . . . . . . . . . . . . . 16  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  d  e.  NN )
9 vmacl 22588 . . . . . . . . . . . . . . . 16  |-  ( d  e.  NN  ->  (Λ `  d )  e.  RR )
108, 9syl 16 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  (Λ `  d
)  e.  RR )
1110recnd 9522 . . . . . . . . . . . . . 14  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  (Λ `  d
)  e.  CC )
12 elfznn 11594 . . . . . . . . . . . . . . . . 17  |-  ( m  e.  ( 1 ... ( |_ `  (
x  /  d ) ) )  ->  m  e.  NN )
1312adantl 466 . . . . . . . . . . . . . . . 16  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  m  e.  NN )
14 vmacl 22588 . . . . . . . . . . . . . . . 16  |-  ( m  e.  NN  ->  (Λ `  m )  e.  RR )
1513, 14syl 16 . . . . . . . . . . . . . . 15  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  (Λ `  m
)  e.  RR )
1615recnd 9522 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  (Λ `  m
)  e.  CC )
176, 11, 16fsummulc2 13368 . . . . . . . . . . . . 13  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (Λ `  d )  x.  sum_ m  e.  ( 1 ... ( |_ `  (
x  /  d ) ) ) (Λ `  m
) )  =  sum_ m  e.  ( 1 ... ( |_ `  (
x  /  d ) ) ) ( (Λ `  d )  x.  (Λ `  m ) ) )
187nnrpd 11136 . . . . . . . . . . . . . . . . 17  |-  ( d  e.  ( 1 ... ( |_ `  x
) )  ->  d  e.  RR+ )
19 rpdivcl 11123 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  RR+  /\  d  e.  RR+ )  ->  (
x  /  d )  e.  RR+ )
2018, 19sylan2 474 . . . . . . . . . . . . . . . 16  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( x  /  d )  e.  RR+ )
2120rpred 11137 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( x  /  d )  e.  RR )
22 chpval 22592 . . . . . . . . . . . . . . 15  |-  ( ( x  /  d )  e.  RR  ->  (ψ `  ( x  /  d
) )  =  sum_ m  e.  ( 1 ... ( |_ `  (
x  /  d ) ) ) (Λ `  m
) )
2321, 22syl 16 . . . . . . . . . . . . . 14  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  (ψ `  (
x  /  d ) )  =  sum_ m  e.  ( 1 ... ( |_ `  ( x  / 
d ) ) ) (Λ `  m )
)
2423oveq2d 6215 . . . . . . . . . . . . 13  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (Λ `  d )  x.  (ψ `  ( x  /  d
) ) )  =  ( (Λ `  d
)  x.  sum_ m  e.  ( 1 ... ( |_ `  ( x  / 
d ) ) ) (Λ `  m )
) )
2513nncnd 10448 . . . . . . . . . . . . . . . . 17  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  m  e.  CC )
267ad2antlr 726 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  d  e.  NN )
2726nncnd 10448 . . . . . . . . . . . . . . . . 17  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  d  e.  CC )
2826nnne0d 10476 . . . . . . . . . . . . . . . . 17  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  d  =/=  0 )
2925, 27, 28divcan3d 10222 . . . . . . . . . . . . . . . 16  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  ( (
d  x.  m )  /  d )  =  m )
3029fveq2d 5802 . . . . . . . . . . . . . . 15  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  (Λ `  (
( d  x.  m
)  /  d ) )  =  (Λ `  m
) )
3130oveq2d 6215 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  ( (Λ `  d )  x.  (Λ `  ( ( d  x.  m )  /  d
) ) )  =  ( (Λ `  d
)  x.  (Λ `  m
) ) )
3231sumeq2dv 13297 . . . . . . . . . . . . 13  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  sum_ m  e.  ( 1 ... ( |_ `  ( x  / 
d ) ) ) ( (Λ `  d
)  x.  (Λ `  (
( d  x.  m
)  /  d ) ) )  =  sum_ m  e.  ( 1 ... ( |_ `  (
x  /  d ) ) ) ( (Λ `  d )  x.  (Λ `  m ) ) )
3317, 24, 323eqtr4d 2505 . . . . . . . . . . . 12  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (Λ `  d )  x.  (ψ `  ( x  /  d
) ) )  = 
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( (Λ `  d )  x.  (Λ `  ( (
d  x.  m )  /  d ) ) ) )
3433sumeq2dv 13297 . . . . . . . . . . 11  |-  ( x  e.  RR+  ->  sum_ d  e.  ( 1 ... ( |_ `  x ) ) ( (Λ `  d
)  x.  (ψ `  ( x  /  d
) ) )  = 
sum_ d  e.  ( 1 ... ( |_
`  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( (Λ `  d )  x.  (Λ `  ( (
d  x.  m )  /  d ) ) ) )
355, 34syl5eq 2507 . . . . . . . . . 10  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( (Λ `  n
)  x.  (ψ `  ( x  /  n
) ) )  = 
sum_ d  e.  ( 1 ... ( |_
`  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( (Λ `  d )  x.  (Λ `  ( (
d  x.  m )  /  d ) ) ) )
36 oveq1 6206 . . . . . . . . . . . . 13  |-  ( n  =  ( d  x.  m )  ->  (
n  /  d )  =  ( ( d  x.  m )  / 
d ) )
3736fveq2d 5802 . . . . . . . . . . . 12  |-  ( n  =  ( d  x.  m )  ->  (Λ `  ( n  /  d
) )  =  (Λ `  ( ( d  x.  m )  /  d
) ) )
3837oveq2d 6215 . . . . . . . . . . 11  |-  ( n  =  ( d  x.  m )  ->  (
(Λ `  d )  x.  (Λ `  ( n  /  d ) ) )  =  ( (Λ `  d )  x.  (Λ `  ( ( d  x.  m )  /  d
) ) ) )
39 rpre 11107 . . . . . . . . . . 11  |-  ( x  e.  RR+  ->  x  e.  RR )
40 ssrab2 3544 . . . . . . . . . . . . . . . . 17  |-  { y  e.  NN  |  y 
||  n }  C_  NN
41 simprr 756 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  -> 
d  e.  { y  e.  NN  |  y 
||  n } )
4240, 41sseldi 3461 . . . . . . . . . . . . . . . 16  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  -> 
d  e.  NN )
4342anassrs 648 . . . . . . . . . . . . . . 15  |-  ( ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  d  e.  {
y  e.  NN  | 
y  ||  n }
)  ->  d  e.  NN )
4443, 9syl 16 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  d  e.  {
y  e.  NN  | 
y  ||  n }
)  ->  (Λ `  d
)  e.  RR )
45 elfznn 11594 . . . . . . . . . . . . . . . . . 18  |-  ( n  e.  ( 1 ... ( |_ `  x
) )  ->  n  e.  NN )
4645adantl 466 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  n  e.  NN )
47 dvdsdivcl 22653 . . . . . . . . . . . . . . . . 17  |-  ( ( n  e.  NN  /\  d  e.  { y  e.  NN  |  y  ||  n } )  ->  (
n  /  d )  e.  { y  e.  NN  |  y  ||  n } )
4846, 47sylan 471 . . . . . . . . . . . . . . . 16  |-  ( ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  d  e.  {
y  e.  NN  | 
y  ||  n }
)  ->  ( n  /  d )  e. 
{ y  e.  NN  |  y  ||  n }
)
4940, 48sseldi 3461 . . . . . . . . . . . . . . 15  |-  ( ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  d  e.  {
y  e.  NN  | 
y  ||  n }
)  ->  ( n  /  d )  e.  NN )
50 vmacl 22588 . . . . . . . . . . . . . . 15  |-  ( ( n  /  d )  e.  NN  ->  (Λ `  ( n  /  d
) )  e.  RR )
5149, 50syl 16 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  d  e.  {
y  e.  NN  | 
y  ||  n }
)  ->  (Λ `  (
n  /  d ) )  e.  RR )
5244, 51remulcld 9524 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  d  e.  {
y  e.  NN  | 
y  ||  n }
)  ->  ( (Λ `  d )  x.  (Λ `  ( n  /  d
) ) )  e.  RR )
5352recnd 9522 . . . . . . . . . . . 12  |-  ( ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  /\  d  e.  {
y  e.  NN  | 
y  ||  n }
)  ->  ( (Λ `  d )  x.  (Λ `  ( n  /  d
) ) )  e.  CC )
5453anasss 647 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  -> 
( (Λ `  d )  x.  (Λ `  ( n  /  d ) ) )  e.  CC )
5538, 39, 54dvdsflsumcom 22660 . . . . . . . . . 10  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) )
sum_ d  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  d )  x.  (Λ `  ( n  /  d ) ) )  =  sum_ d  e.  ( 1 ... ( |_ `  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( (Λ `  d )  x.  (Λ `  ( (
d  x.  m )  /  d ) ) ) )
5635, 55eqtr4d 2498 . . . . . . . . 9  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( (Λ `  n
)  x.  (ψ `  ( x  /  n
) ) )  = 
sum_ n  e.  (
1 ... ( |_ `  x ) ) sum_ d  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  d )  x.  (Λ `  ( n  /  d
) ) ) )
5756oveq1d 6214 . . . . . . . 8  |-  ( x  e.  RR+  ->  ( sum_ n  e.  ( 1 ... ( |_ `  x
) ) ( (Λ `  n )  x.  (ψ `  ( x  /  n
) ) )  + 
sum_ n  e.  (
1 ... ( |_ `  x ) ) ( (Λ `  n )  x.  ( log `  n
) ) )  =  ( sum_ n  e.  ( 1 ... ( |_
`  x ) )
sum_ d  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  d )  x.  (Λ `  ( n  /  d ) ) )  +  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( (Λ `  n
)  x.  ( log `  n ) ) ) )
58 fzfid 11911 . . . . . . . . 9  |-  ( x  e.  RR+  ->  ( 1 ... ( |_ `  x ) )  e. 
Fin )
59 vmacl 22588 . . . . . . . . . . . 12  |-  ( n  e.  NN  ->  (Λ `  n )  e.  RR )
6046, 59syl 16 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  (Λ `  n
)  e.  RR )
6160recnd 9522 . . . . . . . . . 10  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  (Λ `  n
)  e.  CC )
6245nnrpd 11136 . . . . . . . . . . . . . 14  |-  ( n  e.  ( 1 ... ( |_ `  x
) )  ->  n  e.  RR+ )
63 rpdivcl 11123 . . . . . . . . . . . . . 14  |-  ( ( x  e.  RR+  /\  n  e.  RR+ )  ->  (
x  /  n )  e.  RR+ )
6462, 63sylan2 474 . . . . . . . . . . . . 13  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( x  /  n )  e.  RR+ )
6564rpred 11137 . . . . . . . . . . . 12  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( x  /  n )  e.  RR )
66 chpcl 22594 . . . . . . . . . . . 12  |-  ( ( x  /  n )  e.  RR  ->  (ψ `  ( x  /  n
) )  e.  RR )
6765, 66syl 16 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  (ψ `  (
x  /  n ) )  e.  RR )
6867recnd 9522 . . . . . . . . . 10  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  (ψ `  (
x  /  n ) )  e.  CC )
6961, 68mulcld 9516 . . . . . . . . 9  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (Λ `  n )  x.  (ψ `  ( x  /  n
) ) )  e.  CC )
7046nnrpd 11136 . . . . . . . . . . . 12  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  n  e.  RR+ )
71 relogcl 22159 . . . . . . . . . . . 12  |-  ( n  e.  RR+  ->  ( log `  n )  e.  RR )
7270, 71syl 16 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( log `  n )  e.  RR )
7372recnd 9522 . . . . . . . . . 10  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( log `  n )  e.  CC )
7461, 73mulcld 9516 . . . . . . . . 9  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (Λ `  n )  x.  ( log `  n ) )  e.  CC )
7558, 69, 74fsumadd 13332 . . . . . . . 8  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( (Λ `  n
)  x.  (ψ `  ( x  /  n
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) )  =  ( sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( (Λ `  n
)  x.  (ψ `  ( x  /  n
) ) )  + 
sum_ n  e.  (
1 ... ( |_ `  x ) ) ( (Λ `  n )  x.  ( log `  n
) ) ) )
76 fzfid 11911 . . . . . . . . . . . 12  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( 1 ... n )  e. 
Fin )
77 sgmss 22576 . . . . . . . . . . . . 13  |-  ( n  e.  NN  ->  { y  e.  NN  |  y 
||  n }  C_  ( 1 ... n
) )
7846, 77syl 16 . . . . . . . . . . . 12  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  { y  e.  NN  |  y  ||  n }  C_  ( 1 ... n ) )
79 ssfi 7643 . . . . . . . . . . . 12  |-  ( ( ( 1 ... n
)  e.  Fin  /\  { y  e.  NN  | 
y  ||  n }  C_  ( 1 ... n
) )  ->  { y  e.  NN  |  y 
||  n }  e.  Fin )
8076, 78, 79syl2anc 661 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  { y  e.  NN  |  y  ||  n }  e.  Fin )
8180, 52fsumrecl 13328 . . . . . . . . . 10  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  sum_ d  e. 
{ y  e.  NN  |  y  ||  n } 
( (Λ `  d )  x.  (Λ `  ( n  /  d ) ) )  e.  RR )
8281recnd 9522 . . . . . . . . 9  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  sum_ d  e. 
{ y  e.  NN  |  y  ||  n } 
( (Λ `  d )  x.  (Λ `  ( n  /  d ) ) )  e.  CC )
8358, 82, 74fsumadd 13332 . . . . . . . 8  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( sum_ d  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  d )  x.  (Λ `  ( n  /  d ) ) )  +  ( (Λ `  n )  x.  ( log `  n ) ) )  =  ( sum_ n  e.  ( 1 ... ( |_ `  x
) ) sum_ d  e.  { y  e.  NN  |  y  ||  n } 
( (Λ `  d )  x.  (Λ `  ( n  /  d ) ) )  +  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( (Λ `  n
)  x.  ( log `  n ) ) ) )
8457, 75, 833eqtr4d 2505 . . . . . . 7  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( ( (Λ `  n
)  x.  (ψ `  ( x  /  n
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) )  =  sum_ n  e.  ( 1 ... ( |_
`  x ) ) ( sum_ d  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  d )  x.  (Λ `  ( n  /  d ) ) )  +  ( (Λ `  n )  x.  ( log `  n ) ) ) )
8573, 68addcomd 9681 . . . . . . . . . 10  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( ( log `  n )  +  (ψ `  ( x  /  n ) ) )  =  ( (ψ `  ( x  /  n
) )  +  ( log `  n ) ) )
8685oveq2d 6215 . . . . . . . . 9  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (Λ `  n )  x.  (
( log `  n
)  +  (ψ `  ( x  /  n
) ) ) )  =  ( (Λ `  n
)  x.  ( (ψ `  ( x  /  n
) )  +  ( log `  n ) ) ) )
8761, 68, 73adddid 9520 . . . . . . . . 9  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (Λ `  n )  x.  (
(ψ `  ( x  /  n ) )  +  ( log `  n
) ) )  =  ( ( (Λ `  n
)  x.  (ψ `  ( x  /  n
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) )
8886, 87eqtrd 2495 . . . . . . . 8  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  ( (Λ `  n )  x.  (
( log `  n
)  +  (ψ `  ( x  /  n
) ) ) )  =  ( ( (Λ `  n )  x.  (ψ `  ( x  /  n
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) )
8988sumeq2dv 13297 . . . . . . 7  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( (Λ `  n
)  x.  ( ( log `  n )  +  (ψ `  (
x  /  n ) ) ) )  = 
sum_ n  e.  (
1 ... ( |_ `  x ) ) ( ( (Λ `  n
)  x.  (ψ `  ( x  /  n
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) )
90 logsqvma2 22924 . . . . . . . . 9  |-  ( n  e.  NN  ->  sum_ d  e.  { y  e.  NN  |  y  ||  n } 
( ( mmu `  d )  x.  (
( log `  (
n  /  d ) ) ^ 2 ) )  =  ( sum_ d  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  d )  x.  (Λ `  ( n  /  d
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) )
9146, 90syl 16 . . . . . . . 8  |-  ( ( x  e.  RR+  /\  n  e.  ( 1 ... ( |_ `  x ) ) )  ->  sum_ d  e. 
{ y  e.  NN  |  y  ||  n } 
( ( mmu `  d )  x.  (
( log `  (
n  /  d ) ) ^ 2 ) )  =  ( sum_ d  e.  { y  e.  NN  |  y  ||  n }  ( (Λ `  d )  x.  (Λ `  ( n  /  d
) ) )  +  ( (Λ `  n
)  x.  ( log `  n ) ) ) )
9291sumeq2dv 13297 . . . . . . 7  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) )
sum_ d  e.  {
y  e.  NN  | 
y  ||  n } 
( ( mmu `  d )  x.  (
( log `  (
n  /  d ) ) ^ 2 ) )  =  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( sum_ d  e.  {
y  e.  NN  | 
y  ||  n } 
( (Λ `  d )  x.  (Λ `  ( n  /  d ) ) )  +  ( (Λ `  n )  x.  ( log `  n ) ) ) )
9384, 89, 923eqtr4d 2505 . . . . . 6  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( (Λ `  n
)  x.  ( ( log `  n )  +  (ψ `  (
x  /  n ) ) ) )  = 
sum_ n  e.  (
1 ... ( |_ `  x ) ) sum_ d  e.  { y  e.  NN  |  y  ||  n }  ( (
mmu `  d )  x.  ( ( log `  (
n  /  d ) ) ^ 2 ) ) )
9436fveq2d 5802 . . . . . . . . 9  |-  ( n  =  ( d  x.  m )  ->  ( log `  ( n  / 
d ) )  =  ( log `  (
( d  x.  m
)  /  d ) ) )
9594oveq1d 6214 . . . . . . . 8  |-  ( n  =  ( d  x.  m )  ->  (
( log `  (
n  /  d ) ) ^ 2 )  =  ( ( log `  ( ( d  x.  m )  /  d
) ) ^ 2 ) )
9695oveq2d 6215 . . . . . . 7  |-  ( n  =  ( d  x.  m )  ->  (
( mmu `  d
)  x.  ( ( log `  ( n  /  d ) ) ^ 2 ) )  =  ( ( mmu `  d )  x.  (
( log `  (
( d  x.  m
)  /  d ) ) ^ 2 ) ) )
97 mucl 22611 . . . . . . . . . 10  |-  ( d  e.  NN  ->  (
mmu `  d )  e.  ZZ )
9842, 97syl 16 . . . . . . . . 9  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  -> 
( mmu `  d
)  e.  ZZ )
9998zcnd 10858 . . . . . . . 8  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  -> 
( mmu `  d
)  e.  CC )
10062ad2antrl 727 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  ->  n  e.  RR+ )
10142nnrpd 11136 . . . . . . . . . . 11  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  -> 
d  e.  RR+ )
102100, 101rpdivcld 11154 . . . . . . . . . 10  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  -> 
( n  /  d
)  e.  RR+ )
103 relogcl 22159 . . . . . . . . . . 11  |-  ( ( n  /  d )  e.  RR+  ->  ( log `  ( n  /  d
) )  e.  RR )
104103recnd 9522 . . . . . . . . . 10  |-  ( ( n  /  d )  e.  RR+  ->  ( log `  ( n  /  d
) )  e.  CC )
105102, 104syl 16 . . . . . . . . 9  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  -> 
( log `  (
n  /  d ) )  e.  CC )
106105sqcld 12122 . . . . . . . 8  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  -> 
( ( log `  (
n  /  d ) ) ^ 2 )  e.  CC )
10799, 106mulcld 9516 . . . . . . 7  |-  ( ( x  e.  RR+  /\  (
n  e.  ( 1 ... ( |_ `  x ) )  /\  d  e.  { y  e.  NN  |  y  ||  n } ) )  -> 
( ( mmu `  d )  x.  (
( log `  (
n  /  d ) ) ^ 2 ) )  e.  CC )
10896, 39, 107dvdsflsumcom 22660 . . . . . 6  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) )
sum_ d  e.  {
y  e.  NN  | 
y  ||  n } 
( ( mmu `  d )  x.  (
( log `  (
n  /  d ) ) ^ 2 ) )  =  sum_ d  e.  ( 1 ... ( |_ `  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( ( mmu `  d
)  x.  ( ( log `  ( ( d  x.  m )  /  d ) ) ^ 2 ) ) )
10929fveq2d 5802 . . . . . . . . . 10  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  ( log `  ( ( d  x.  m )  /  d
) )  =  ( log `  m ) )
110109oveq1d 6214 . . . . . . . . 9  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  ( ( log `  ( ( d  x.  m )  / 
d ) ) ^
2 )  =  ( ( log `  m
) ^ 2 ) )
111110oveq2d 6215 . . . . . . . 8  |-  ( ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  /\  m  e.  ( 1 ... ( |_
`  ( x  / 
d ) ) ) )  ->  ( (
mmu `  d )  x.  ( ( log `  (
( d  x.  m
)  /  d ) ) ^ 2 ) )  =  ( ( mmu `  d )  x.  ( ( log `  m ) ^ 2 ) ) )
112111sumeq2dv 13297 . . . . . . 7  |-  ( ( x  e.  RR+  /\  d  e.  ( 1 ... ( |_ `  x ) ) )  ->  sum_ m  e.  ( 1 ... ( |_ `  ( x  / 
d ) ) ) ( ( mmu `  d )  x.  (
( log `  (
( d  x.  m
)  /  d ) ) ^ 2 ) )  =  sum_ m  e.  ( 1 ... ( |_ `  ( x  / 
d ) ) ) ( ( mmu `  d )  x.  (
( log `  m
) ^ 2 ) ) )
113112sumeq2dv 13297 . . . . . 6  |-  ( x  e.  RR+  ->  sum_ d  e.  ( 1 ... ( |_ `  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( ( mmu `  d
)  x.  ( ( log `  ( ( d  x.  m )  /  d ) ) ^ 2 ) )  =  sum_ d  e.  ( 1 ... ( |_
`  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( ( mmu `  d
)  x.  ( ( log `  m ) ^ 2 ) ) )
11493, 108, 1133eqtrd 2499 . . . . 5  |-  ( x  e.  RR+  ->  sum_ n  e.  ( 1 ... ( |_ `  x ) ) ( (Λ `  n
)  x.  ( ( log `  n )  +  (ψ `  (
x  /  n ) ) ) )  = 
sum_ d  e.  ( 1 ... ( |_
`  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( ( mmu `  d
)  x.  ( ( log `  m ) ^ 2 ) ) )
115114oveq1d 6214 . . . 4  |-  ( x  e.  RR+  ->  ( sum_ n  e.  ( 1 ... ( |_ `  x
) ) ( (Λ `  n )  x.  (
( log `  n
)  +  (ψ `  ( x  /  n
) ) ) )  /  x )  =  ( sum_ d  e.  ( 1 ... ( |_
`  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( ( mmu `  d
)  x.  ( ( log `  m ) ^ 2 ) )  /  x ) )
116115oveq1d 6214 . . 3  |-  ( x  e.  RR+  ->  ( (
sum_ n  e.  (
1 ... ( |_ `  x ) ) ( (Λ `  n )  x.  ( ( log `  n
)  +  (ψ `  ( x  /  n
) ) ) )  /  x )  -  ( 2  x.  ( log `  x ) ) )  =  ( (
sum_ d  e.  ( 1 ... ( |_
`  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( ( mmu `  d
)  x.  ( ( log `  m ) ^ 2 ) )  /  x )  -  ( 2  x.  ( log `  x ) ) ) )
117116mpteq2ia 4481 . 2  |-  ( x  e.  RR+  |->  ( (
sum_ n  e.  (
1 ... ( |_ `  x ) ) ( (Λ `  n )  x.  ( ( log `  n
)  +  (ψ `  ( x  /  n
) ) ) )  /  x )  -  ( 2  x.  ( log `  x ) ) ) )  =  ( x  e.  RR+  |->  ( (
sum_ d  e.  ( 1 ... ( |_
`  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( ( mmu `  d
)  x.  ( ( log `  m ) ^ 2 ) )  /  x )  -  ( 2  x.  ( log `  x ) ) ) )
118 eqid 2454 . . 3  |-  ( ( ( ( log `  (
x  /  d ) ) ^ 2 )  +  ( 2  -  ( 2  x.  ( log `  ( x  / 
d ) ) ) ) )  /  d
)  =  ( ( ( ( log `  (
x  /  d ) ) ^ 2 )  +  ( 2  -  ( 2  x.  ( log `  ( x  / 
d ) ) ) ) )  /  d
)
119118selberglem2 22927 . 2  |-  ( x  e.  RR+  |->  ( (
sum_ d  e.  ( 1 ... ( |_
`  x ) )
sum_ m  e.  (
1 ... ( |_ `  ( x  /  d
) ) ) ( ( mmu `  d
)  x.  ( ( log `  m ) ^ 2 ) )  /  x )  -  ( 2  x.  ( log `  x ) ) ) )  e.  O(1)
120117, 119eqeltri 2538 1  |-  ( x  e.  RR+  |->  ( (
sum_ n  e.  (
1 ... ( |_ `  x ) ) ( (Λ `  n )  x.  ( ( log `  n
)  +  (ψ `  ( x  /  n
) ) ) )  /  x )  -  ( 2  x.  ( log `  x ) ) ) )  e.  O(1)
Colors of variables: wff setvar class
Syntax hints:    /\ wa 369    = wceq 1370    e. wcel 1758   {crab 2802    C_ wss 3435   class class class wbr 4399    |-> cmpt 4457   ` cfv 5525  (class class class)co 6199   Fincfn 7419   CCcc 9390   RRcr 9391   1c1 9393    + caddc 9395    x. cmul 9397    - cmin 9705    / cdiv 10103   NNcn 10432   2c2 10481   ZZcz 10756   RR+crp 11101   ...cfz 11553   |_cfl 11756   ^cexp 11981   O(1)co1 13081   sum_csu 13280    || cdivides 13652   logclog 22138  Λcvma 22561  ψcchp 22562   mmucmu 22564
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1592  ax-4 1603  ax-5 1671  ax-6 1710  ax-7 1730  ax-8 1760  ax-9 1762  ax-10 1777  ax-11 1782  ax-12 1794  ax-13 1955  ax-ext 2432  ax-rep 4510  ax-sep 4520  ax-nul 4528  ax-pow 4577  ax-pr 4638  ax-un 6481  ax-inf2 7957  ax-cnex 9448  ax-resscn 9449  ax-1cn 9450  ax-icn 9451  ax-addcl 9452  ax-addrcl 9453  ax-mulcl 9454  ax-mulrcl 9455  ax-mulcom 9456  ax-addass 9457  ax-mulass 9458  ax-distr 9459  ax-i2m1 9460  ax-1ne0 9461  ax-1rid 9462  ax-rnegex 9463  ax-rrecex 9464  ax-cnre 9465  ax-pre-lttri 9466  ax-pre-lttrn 9467  ax-pre-ltadd 9468  ax-pre-mulgt0 9469  ax-pre-sup 9470  ax-addf 9471  ax-mulf 9472
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 966  df-3an 967  df-tru 1373  df-fal 1376  df-ex 1588  df-nf 1591  df-sb 1703  df-eu 2266  df-mo 2267  df-clab 2440  df-cleq 2446  df-clel 2449  df-nfc 2604  df-ne 2649  df-nel 2650  df-ral 2803  df-rex 2804  df-reu 2805  df-rmo 2806  df-rab 2807  df-v 3078  df-sbc 3293  df-csb 3395  df-dif 3438  df-un 3440  df-in 3442  df-ss 3449  df-pss 3451  df-nul 3745  df-if 3899  df-pw 3969  df-sn 3985  df-pr 3987  df-tp 3989  df-op 3991  df-uni 4199  df-int 4236  df-iun 4280  df-iin 4281  df-disj 4370  df-br 4400  df-opab 4458  df-mpt 4459  df-tr 4493  df-eprel 4739  df-id 4743  df-po 4748  df-so 4749  df-fr 4786  df-se 4787  df-we 4788  df-ord 4829  df-on 4830  df-lim 4831  df-suc 4832  df-xp 4953  df-rel 4954  df-cnv 4955  df-co 4956  df-dm 4957  df-rn 4958  df-res 4959  df-ima 4960  df-iota 5488  df-fun 5527  df-fn 5528  df-f 5529  df-f1 5530  df-fo 5531  df-f1o 5532  df-fv 5533  df-isom 5534  df-riota 6160  df-ov 6202  df-oprab 6203  df-mpt2 6204  df-of 6429  df-om 6586  df-1st 6686  df-2nd 6687  df-supp 6800  df-recs 6941  df-rdg 6975  df-1o 7029  df-2o 7030  df-oadd 7033  df-er 7210  df-map 7325  df-pm 7326  df-ixp 7373  df-en 7420  df-dom 7421  df-sdom 7422  df-fin 7423  df-fsupp 7731  df-fi 7771  df-sup 7801  df-oi 7834  df-card 8219  df-cda 8447  df-pnf 9530  df-mnf 9531  df-xr 9532  df-ltxr 9533  df-le 9534  df-sub 9707  df-neg 9708  df-div 10104  df-nn 10433  df-2 10490  df-3 10491  df-4 10492  df-5 10493  df-6 10494  df-7 10495  df-8 10496  df-9 10497  df-10 10498  df-n0 10690  df-z 10757  df-dec 10866  df-uz 10972  df-q 11064  df-rp 11102  df-xneg 11199  df-xadd 11200  df-xmul 11201  df-ioo 11414  df-ioc 11415  df-ico 11416  df-icc 11417  df-fz 11554  df-fzo 11665  df-fl 11758  df-mod 11825  df-seq 11923  df-exp 11982  df-fac 12168  df-bc 12195  df-hash 12220  df-shft 12673  df-cj 12705  df-re 12706  df-im 12707  df-sqr 12841  df-abs 12842  df-limsup 13066  df-clim 13083  df-rlim 13084  df-o1 13085  df-lo1 13086  df-sum 13281  df-ef 13470  df-e 13471  df-sin 13472  df-cos 13473  df-pi 13475  df-dvds 13653  df-gcd 13808  df-prm 13881  df-pc 14021  df-struct 14293  df-ndx 14294  df-slot 14295  df-base 14296  df-sets 14297  df-ress 14298  df-plusg 14369  df-mulr 14370  df-starv 14371  df-sca 14372  df-vsca 14373  df-ip 14374  df-tset 14375  df-ple 14376  df-ds 14378  df-unif 14379  df-hom 14380  df-cco 14381  df-rest 14479  df-topn 14480  df-0g 14498  df-gsum 14499  df-topgen 14500  df-pt 14501  df-prds 14504  df-xrs 14558  df-qtop 14563  df-imas 14564  df-xps 14566  df-mre 14642  df-mrc 14643  df-acs 14645  df-mnd 15533  df-submnd 15583  df-mulg 15666  df-cntz 15953  df-cmn 16399  df-psmet 17933  df-xmet 17934  df-met 17935  df-bl 17936  df-mopn 17937  df-fbas 17938  df-fg 17939  df-cnfld 17943  df-top 18634  df-bases 18636  df-topon 18637  df-topsp 18638  df-cld 18754  df-ntr 18755  df-cls 18756  df-nei 18833  df-lp 18871  df-perf 18872  df-cn 18962  df-cnp 18963  df-haus 19050  df-cmp 19121  df-tx 19266  df-hmeo 19459  df-fil 19550  df-fm 19642  df-flim 19643  df-flf 19644  df-xms 20026  df-ms 20027  df-tms 20028  df-cncf 20585  df-limc 21473  df-dv 21474  df-log 22140  df-cxp 22141  df-em 22518  df-vma 22567  df-chp 22568  df-mu 22570
This theorem is referenced by:  selbergb  22930  selberg2  22932  selbergs  22955
  Copyright terms: Public domain W3C validator