Step | Hyp | Ref
| Expression |
1 | | simp3 1138 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ โ) |
2 | | nnnn0 12475 |
. . . . . 6
โข (๐ โ โ โ ๐ โ
โ0) |
3 | 2 | 3ad2ant1 1133 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ
โ0) |
4 | 3 | faccld 14240 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐) โ
โ) |
5 | 4 | nnzd 12581 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐) โ
โค) |
6 | 4 | nnne0d 12258 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐) โ 0) |
7 | | fznn0sub 13529 |
. . . . . 6
โข (๐พ โ (0...๐) โ (๐ โ ๐พ) โ
โ0) |
8 | 7 | 3ad2ant2 1134 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ โ ๐พ) โ
โ0) |
9 | 8 | faccld 14240 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ(๐ โ ๐พ)) โ โ) |
10 | | elfznn0 13590 |
. . . . . 6
โข (๐พ โ (0...๐) โ ๐พ โ
โ0) |
11 | 10 | 3ad2ant2 1134 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐พ โ
โ0) |
12 | 11 | faccld 14240 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐พ) โ
โ) |
13 | 9, 12 | nnmulcld 12261 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)) โ โ) |
14 | | pcdiv 16781 |
. . 3
โข ((๐ โ โ โง
((!โ๐) โ โค
โง (!โ๐) โ 0)
โง ((!โ(๐ โ
๐พ)) ยท (!โ๐พ)) โ โ) โ (๐ pCnt ((!โ๐) / ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)))) = ((๐ pCnt (!โ๐)) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))))) |
15 | 1, 5, 6, 13, 14 | syl121anc 1375 |
. 2
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt ((!โ๐) / ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)))) = ((๐ pCnt (!โ๐)) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))))) |
16 | | bcval2 14261 |
. . . 4
โข (๐พ โ (0...๐) โ (๐C๐พ) = ((!โ๐) / ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)))) |
17 | 16 | 3ad2ant2 1134 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐C๐พ) = ((!โ๐) / ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)))) |
18 | 17 | oveq2d 7421 |
. 2
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt (๐C๐พ)) = (๐ pCnt ((!โ๐) / ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))))) |
19 | | fzfid 13934 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (1...๐) โ Fin) |
20 | | nnre 12215 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โ) |
21 | 20 | 3ad2ant1 1133 |
. . . . . . . 8
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ โ) |
22 | 21 | adantr 481 |
. . . . . . 7
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐ โ โ) |
23 | | simpl3 1193 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐ โ โ) |
24 | | prmnn 16607 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โ) |
25 | 23, 24 | syl 17 |
. . . . . . . 8
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐ โ โ) |
26 | | elfznn 13526 |
. . . . . . . . . 10
โข (๐ โ (1...๐) โ ๐ โ โ) |
27 | 26 | nnnn0d 12528 |
. . . . . . . . 9
โข (๐ โ (1...๐) โ ๐ โ โ0) |
28 | 27 | adantl 482 |
. . . . . . . 8
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐ โ โ0) |
29 | 25, 28 | nnexpcld 14204 |
. . . . . . 7
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (๐โ๐) โ โ) |
30 | 22, 29 | nndivred 12262 |
. . . . . 6
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (๐ / (๐โ๐)) โ โ) |
31 | 30 | flcld 13759 |
. . . . 5
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ(๐ / (๐โ๐))) โ โค) |
32 | 31 | zcnd 12663 |
. . . 4
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ(๐ / (๐โ๐))) โ โ) |
33 | 11 | nn0red 12529 |
. . . . . . . . . 10
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐พ โ โ) |
34 | 21, 33 | resubcld 11638 |
. . . . . . . . 9
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ โ ๐พ) โ โ) |
35 | 34 | adantr 481 |
. . . . . . . 8
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (๐ โ ๐พ) โ โ) |
36 | 35, 29 | nndivred 12262 |
. . . . . . 7
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ((๐ โ ๐พ) / (๐โ๐)) โ โ) |
37 | 36 | flcld 13759 |
. . . . . 6
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ((๐ โ ๐พ) / (๐โ๐))) โ โค) |
38 | 37 | zcnd 12663 |
. . . . 5
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ((๐ โ ๐พ) / (๐โ๐))) โ โ) |
39 | 33 | adantr 481 |
. . . . . . . 8
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐พ โ โ) |
40 | 39, 29 | nndivred 12262 |
. . . . . . 7
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (๐พ / (๐โ๐)) โ โ) |
41 | 40 | flcld 13759 |
. . . . . 6
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ(๐พ / (๐โ๐))) โ โค) |
42 | 41 | zcnd 12663 |
. . . . 5
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ(๐พ / (๐โ๐))) โ โ) |
43 | 38, 42 | addcld 11229 |
. . . 4
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐)))) โ โ) |
44 | 19, 32, 43 | fsumsub 15730 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ฮฃ๐ โ (1...๐)((โโ(๐ / (๐โ๐))) โ ((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐))))) = (ฮฃ๐ โ (1...๐)(โโ(๐ / (๐โ๐))) โ ฮฃ๐ โ (1...๐)((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐)))))) |
45 | 3 | nn0zd 12580 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ โค) |
46 | | uzid 12833 |
. . . . . 6
โข (๐ โ โค โ ๐ โ
(โคโฅโ๐)) |
47 | 45, 46 | syl 17 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ (โคโฅโ๐)) |
48 | | pcfac 16828 |
. . . . 5
โข ((๐ โ โ0
โง ๐ โ
(โคโฅโ๐) โง ๐ โ โ) โ (๐ pCnt (!โ๐)) = ฮฃ๐ โ (1...๐)(โโ(๐ / (๐โ๐)))) |
49 | 3, 47, 1, 48 | syl3anc 1371 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt (!โ๐)) = ฮฃ๐ โ (1...๐)(โโ(๐ / (๐โ๐)))) |
50 | 11 | nn0ge0d 12531 |
. . . . . . . . 9
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ 0 โค ๐พ) |
51 | 21, 33 | subge02d 11802 |
. . . . . . . . 9
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (0 โค ๐พ โ (๐ โ ๐พ) โค ๐)) |
52 | 50, 51 | mpbid 231 |
. . . . . . . 8
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ โ ๐พ) โค ๐) |
53 | 11 | nn0zd 12580 |
. . . . . . . . . 10
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐พ โ โค) |
54 | 45, 53 | zsubcld 12667 |
. . . . . . . . 9
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ โ ๐พ) โ โค) |
55 | | eluz 12832 |
. . . . . . . . 9
โข (((๐ โ ๐พ) โ โค โง ๐ โ โค) โ (๐ โ (โคโฅโ(๐ โ ๐พ)) โ (๐ โ ๐พ) โค ๐)) |
56 | 54, 45, 55 | syl2anc 584 |
. . . . . . . 8
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ โ (โคโฅโ(๐ โ ๐พ)) โ (๐ โ ๐พ) โค ๐)) |
57 | 52, 56 | mpbird 256 |
. . . . . . 7
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ (โคโฅโ(๐ โ ๐พ))) |
58 | | pcfac 16828 |
. . . . . . 7
โข (((๐ โ ๐พ) โ โ0 โง ๐ โ
(โคโฅโ(๐ โ ๐พ)) โง ๐ โ โ) โ (๐ pCnt (!โ(๐ โ ๐พ))) = ฮฃ๐ โ (1...๐)(โโ((๐ โ ๐พ) / (๐โ๐)))) |
59 | 8, 57, 1, 58 | syl3anc 1371 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt (!โ(๐ โ ๐พ))) = ฮฃ๐ โ (1...๐)(โโ((๐ โ ๐พ) / (๐โ๐)))) |
60 | | elfzuz3 13494 |
. . . . . . . 8
โข (๐พ โ (0...๐) โ ๐ โ (โคโฅโ๐พ)) |
61 | 60 | 3ad2ant2 1134 |
. . . . . . 7
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ (โคโฅโ๐พ)) |
62 | | pcfac 16828 |
. . . . . . 7
โข ((๐พ โ โ0
โง ๐ โ
(โคโฅโ๐พ) โง ๐ โ โ) โ (๐ pCnt (!โ๐พ)) = ฮฃ๐ โ (1...๐)(โโ(๐พ / (๐โ๐)))) |
63 | 11, 61, 1, 62 | syl3anc 1371 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt (!โ๐พ)) = ฮฃ๐ โ (1...๐)(โโ(๐พ / (๐โ๐)))) |
64 | 59, 63 | oveq12d 7423 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ((๐ pCnt (!โ(๐ โ ๐พ))) + (๐ pCnt (!โ๐พ))) = (ฮฃ๐ โ (1...๐)(โโ((๐ โ ๐พ) / (๐โ๐))) + ฮฃ๐ โ (1...๐)(โโ(๐พ / (๐โ๐))))) |
65 | 9 | nnzd 12581 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ(๐ โ ๐พ)) โ โค) |
66 | 9 | nnne0d 12258 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ(๐ โ ๐พ)) โ 0) |
67 | 12 | nnzd 12581 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐พ) โ
โค) |
68 | 12 | nnne0d 12258 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐พ) โ 0) |
69 | | pcmul 16780 |
. . . . . 6
โข ((๐ โ โ โง
((!โ(๐ โ ๐พ)) โ โค โง
(!โ(๐ โ ๐พ)) โ 0) โง ((!โ๐พ) โ โค โง
(!โ๐พ) โ 0)) โ
(๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))) = ((๐ pCnt (!โ(๐ โ ๐พ))) + (๐ pCnt (!โ๐พ)))) |
70 | 1, 65, 66, 67, 68, 69 | syl122anc 1379 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))) = ((๐ pCnt (!โ(๐ โ ๐พ))) + (๐ pCnt (!โ๐พ)))) |
71 | 19, 38, 42 | fsumadd 15682 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ฮฃ๐ โ (1...๐)((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐)))) = (ฮฃ๐ โ (1...๐)(โโ((๐ โ ๐พ) / (๐โ๐))) + ฮฃ๐ โ (1...๐)(โโ(๐พ / (๐โ๐))))) |
72 | 64, 70, 71 | 3eqtr4d 2782 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))) = ฮฃ๐ โ (1...๐)((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐))))) |
73 | 49, 72 | oveq12d 7423 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ((๐ pCnt (!โ๐)) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)))) = (ฮฃ๐ โ (1...๐)(โโ(๐ / (๐โ๐))) โ ฮฃ๐ โ (1...๐)((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐)))))) |
74 | 44, 73 | eqtr4d 2775 |
. 2
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ฮฃ๐ โ (1...๐)((โโ(๐ / (๐โ๐))) โ ((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐))))) = ((๐ pCnt (!โ๐)) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))))) |
75 | 15, 18, 74 | 3eqtr4d 2782 |
1
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt (๐C๐พ)) = ฮฃ๐ โ (1...๐)((โโ(๐ / (๐โ๐))) โ ((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐)))))) |