Step |
Hyp |
Ref |
Expression |
1 |
|
rpvmasum.z |
β’ π = ( β€/nβ€ β π ) |
2 |
|
rpvmasum.l |
β’ πΏ = ( β€RHom β π ) |
3 |
|
rpvmasum.a |
β’ ( π β π β β ) |
4 |
|
dchrmusum.g |
β’ πΊ = ( DChr β π ) |
5 |
|
dchrmusum.d |
β’ π· = ( Base β πΊ ) |
6 |
|
dchrmusum.1 |
β’ 1 = ( 0g β πΊ ) |
7 |
|
dchrmusum.b |
β’ ( π β π β π· ) |
8 |
|
dchrmusum.n1 |
β’ ( π β π β 1 ) |
9 |
|
dchrmusum.f |
β’ πΉ = ( π β β β¦ ( ( π β ( πΏ β π ) ) / π ) ) |
10 |
|
dchrmusum.c |
β’ ( π β πΆ β ( 0 [,) +β ) ) |
11 |
|
dchrmusum.t |
β’ ( π β seq 1 ( + , πΉ ) β π ) |
12 |
|
dchrmusum.2 |
β’ ( π β β π¦ β ( 1 [,) +β ) ( abs β ( ( seq 1 ( + , πΉ ) β ( β β π¦ ) ) β π ) ) β€ ( πΆ / π¦ ) ) |
13 |
|
fzfid |
β’ ( ( π β§ π₯ β β+ ) β ( 1 ... ( β β π₯ ) ) β Fin ) |
14 |
7
|
ad2antrr |
β’ ( ( ( π β§ π₯ β β+ ) β§ π β ( 1 ... ( β β π₯ ) ) ) β π β π· ) |
15 |
|
elfzelz |
β’ ( π β ( 1 ... ( β β π₯ ) ) β π β β€ ) |
16 |
15
|
adantl |
β’ ( ( ( π β§ π₯ β β+ ) β§ π β ( 1 ... ( β β π₯ ) ) ) β π β β€ ) |
17 |
4 1 5 2 14 16
|
dchrzrhcl |
β’ ( ( ( π β§ π₯ β β+ ) β§ π β ( 1 ... ( β β π₯ ) ) ) β ( π β ( πΏ β π ) ) β β ) |
18 |
|
elfznn |
β’ ( π β ( 1 ... ( β β π₯ ) ) β π β β ) |
19 |
18
|
adantl |
β’ ( ( ( π β§ π₯ β β+ ) β§ π β ( 1 ... ( β β π₯ ) ) ) β π β β ) |
20 |
|
mucl |
β’ ( π β β β ( ΞΌ β π ) β β€ ) |
21 |
19 20
|
syl |
β’ ( ( ( π β§ π₯ β β+ ) β§ π β ( 1 ... ( β β π₯ ) ) ) β ( ΞΌ β π ) β β€ ) |
22 |
21
|
zred |
β’ ( ( ( π β§ π₯ β β+ ) β§ π β ( 1 ... ( β β π₯ ) ) ) β ( ΞΌ β π ) β β ) |
23 |
22 19
|
nndivred |
β’ ( ( ( π β§ π₯ β β+ ) β§ π β ( 1 ... ( β β π₯ ) ) ) β ( ( ΞΌ β π ) / π ) β β ) |
24 |
23
|
recnd |
β’ ( ( ( π β§ π₯ β β+ ) β§ π β ( 1 ... ( β β π₯ ) ) ) β ( ( ΞΌ β π ) / π ) β β ) |
25 |
17 24
|
mulcld |
β’ ( ( ( π β§ π₯ β β+ ) β§ π β ( 1 ... ( β β π₯ ) ) ) β ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) β β ) |
26 |
13 25
|
fsumcl |
β’ ( ( π β§ π₯ β β+ ) β Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) β β ) |
27 |
|
climcl |
β’ ( seq 1 ( + , πΉ ) β π β π β β ) |
28 |
11 27
|
syl |
β’ ( π β π β β ) |
29 |
28
|
adantr |
β’ ( ( π β§ π₯ β β+ ) β π β β ) |
30 |
26 29
|
mulcld |
β’ ( ( π β§ π₯ β β+ ) β ( Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) Β· π ) β β ) |
31 |
1 2 3 4 5 6 7 8 9 10 11 12
|
dchrisumn0 |
β’ ( π β π β 0 ) |
32 |
31
|
adantr |
β’ ( ( π β§ π₯ β β+ ) β π β 0 ) |
33 |
30 29 32
|
divrecd |
β’ ( ( π β§ π₯ β β+ ) β ( ( Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) Β· π ) / π ) = ( ( Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) Β· π ) Β· ( 1 / π ) ) ) |
34 |
26 29 32
|
divcan4d |
β’ ( ( π β§ π₯ β β+ ) β ( ( Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) Β· π ) / π ) = Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) ) |
35 |
33 34
|
eqtr3d |
β’ ( ( π β§ π₯ β β+ ) β ( ( Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) Β· π ) Β· ( 1 / π ) ) = Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) ) |
36 |
35
|
mpteq2dva |
β’ ( π β ( π₯ β β+ β¦ ( ( Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) Β· π ) Β· ( 1 / π ) ) ) = ( π₯ β β+ β¦ Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) ) ) |
37 |
28 31
|
reccld |
β’ ( π β ( 1 / π ) β β ) |
38 |
37
|
adantr |
β’ ( ( π β§ π₯ β β+ ) β ( 1 / π ) β β ) |
39 |
1 2 3 4 5 6 7 8 9 10 11 12
|
dchrmusum2 |
β’ ( π β ( π₯ β β+ β¦ ( Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) Β· π ) ) β π(1) ) |
40 |
|
rpssre |
β’ β+ β β |
41 |
|
o1const |
β’ ( ( β+ β β β§ ( 1 / π ) β β ) β ( π₯ β β+ β¦ ( 1 / π ) ) β π(1) ) |
42 |
40 37 41
|
sylancr |
β’ ( π β ( π₯ β β+ β¦ ( 1 / π ) ) β π(1) ) |
43 |
30 38 39 42
|
o1mul2 |
β’ ( π β ( π₯ β β+ β¦ ( ( Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) Β· π ) Β· ( 1 / π ) ) ) β π(1) ) |
44 |
36 43
|
eqeltrrd |
β’ ( π β ( π₯ β β+ β¦ Ξ£ π β ( 1 ... ( β β π₯ ) ) ( ( π β ( πΏ β π ) ) Β· ( ( ΞΌ β π ) / π ) ) ) β π(1) ) |