Step | Hyp | Ref
| Expression |
1 | | simp3 999 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ โ) |
2 | | nnnn0 9185 |
. . . . . 6
โข (๐ โ โ โ ๐ โ
โ0) |
3 | 2 | 3ad2ant1 1018 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ
โ0) |
4 | 3 | faccld 10718 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐) โ
โ) |
5 | 4 | nnzd 9376 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐) โ
โค) |
6 | 4 | nnne0d 8966 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐) โ 0) |
7 | | fznn0sub 10059 |
. . . . . 6
โข (๐พ โ (0...๐) โ (๐ โ ๐พ) โ
โ0) |
8 | 7 | 3ad2ant2 1019 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ โ ๐พ) โ
โ0) |
9 | 8 | faccld 10718 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ(๐ โ ๐พ)) โ โ) |
10 | | elfznn0 10116 |
. . . . . 6
โข (๐พ โ (0...๐) โ ๐พ โ
โ0) |
11 | 10 | 3ad2ant2 1019 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐พ โ
โ0) |
12 | 11 | faccld 10718 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐พ) โ
โ) |
13 | 9, 12 | nnmulcld 8970 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)) โ โ) |
14 | | pcdiv 12304 |
. . 3
โข ((๐ โ โ โง
((!โ๐) โ โค
โง (!โ๐) โ 0)
โง ((!โ(๐ โ
๐พ)) ยท (!โ๐พ)) โ โ) โ (๐ pCnt ((!โ๐) / ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)))) = ((๐ pCnt (!โ๐)) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))))) |
15 | 1, 5, 6, 13, 14 | syl121anc 1243 |
. 2
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt ((!โ๐) / ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)))) = ((๐ pCnt (!โ๐)) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))))) |
16 | | bcval2 10732 |
. . . 4
โข (๐พ โ (0...๐) โ (๐C๐พ) = ((!โ๐) / ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)))) |
17 | 16 | 3ad2ant2 1019 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐C๐พ) = ((!โ๐) / ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)))) |
18 | 17 | oveq2d 5893 |
. 2
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt (๐C๐พ)) = (๐ pCnt ((!โ๐) / ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))))) |
19 | | 1zzd 9282 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ 1 โ
โค) |
20 | 3 | nn0zd 9375 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ โค) |
21 | 19, 20 | fzfigd 10433 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (1...๐) โ Fin) |
22 | 20 | adantr 276 |
. . . . . . 7
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐ โ โค) |
23 | | simpl3 1002 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐ โ โ) |
24 | | prmnn 12112 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โ) |
25 | 23, 24 | syl 14 |
. . . . . . . 8
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐ โ โ) |
26 | | elfznn 10056 |
. . . . . . . . . 10
โข (๐ โ (1...๐) โ ๐ โ โ) |
27 | 26 | nnnn0d 9231 |
. . . . . . . . 9
โข (๐ โ (1...๐) โ ๐ โ โ0) |
28 | 27 | adantl 277 |
. . . . . . . 8
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐ โ โ0) |
29 | 25, 28 | nnexpcld 10678 |
. . . . . . 7
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (๐โ๐) โ โ) |
30 | | znq 9626 |
. . . . . . 7
โข ((๐ โ โค โง (๐โ๐) โ โ) โ (๐ / (๐โ๐)) โ โ) |
31 | 22, 29, 30 | syl2anc 411 |
. . . . . 6
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (๐ / (๐โ๐)) โ โ) |
32 | 31 | flqcld 10279 |
. . . . 5
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ(๐ / (๐โ๐))) โ โค) |
33 | 32 | zcnd 9378 |
. . . 4
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ(๐ / (๐โ๐))) โ โ) |
34 | | simpl2 1001 |
. . . . . . . . . 10
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐พ โ (0...๐)) |
35 | 10 | nn0zd 9375 |
. . . . . . . . . 10
โข (๐พ โ (0...๐) โ ๐พ โ โค) |
36 | 34, 35 | syl 14 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ๐พ โ โค) |
37 | 22, 36 | zsubcld 9382 |
. . . . . . . 8
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (๐ โ ๐พ) โ โค) |
38 | | znq 9626 |
. . . . . . . 8
โข (((๐ โ ๐พ) โ โค โง (๐โ๐) โ โ) โ ((๐ โ ๐พ) / (๐โ๐)) โ โ) |
39 | 37, 29, 38 | syl2anc 411 |
. . . . . . 7
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ((๐ โ ๐พ) / (๐โ๐)) โ โ) |
40 | 39 | flqcld 10279 |
. . . . . 6
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ((๐ โ ๐พ) / (๐โ๐))) โ โค) |
41 | 40 | zcnd 9378 |
. . . . 5
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ((๐ โ ๐พ) / (๐โ๐))) โ โ) |
42 | | znq 9626 |
. . . . . . . 8
โข ((๐พ โ โค โง (๐โ๐) โ โ) โ (๐พ / (๐โ๐)) โ โ) |
43 | 36, 29, 42 | syl2anc 411 |
. . . . . . 7
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (๐พ / (๐โ๐)) โ โ) |
44 | 43 | flqcld 10279 |
. . . . . 6
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ(๐พ / (๐โ๐))) โ โค) |
45 | 44 | zcnd 9378 |
. . . . 5
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ (โโ(๐พ / (๐โ๐))) โ โ) |
46 | 41, 45 | addcld 7979 |
. . . 4
โข (((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โง ๐ โ (1...๐)) โ ((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐)))) โ โ) |
47 | 21, 33, 46 | fsumsub 11462 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ฮฃ๐ โ (1...๐)((โโ(๐ / (๐โ๐))) โ ((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐))))) = (ฮฃ๐ โ (1...๐)(โโ(๐ / (๐โ๐))) โ ฮฃ๐ โ (1...๐)((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐)))))) |
48 | | uzid 9544 |
. . . . . 6
โข (๐ โ โค โ ๐ โ
(โคโฅโ๐)) |
49 | 20, 48 | syl 14 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ (โคโฅโ๐)) |
50 | | pcfac 12350 |
. . . . 5
โข ((๐ โ โ0
โง ๐ โ
(โคโฅโ๐) โง ๐ โ โ) โ (๐ pCnt (!โ๐)) = ฮฃ๐ โ (1...๐)(โโ(๐ / (๐โ๐)))) |
51 | 3, 49, 1, 50 | syl3anc 1238 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt (!โ๐)) = ฮฃ๐ โ (1...๐)(โโ(๐ / (๐โ๐)))) |
52 | 11 | nn0ge0d 9234 |
. . . . . . . . 9
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ 0 โค ๐พ) |
53 | | nnre 8928 |
. . . . . . . . . . 11
โข (๐ โ โ โ ๐ โ
โ) |
54 | 53 | 3ad2ant1 1018 |
. . . . . . . . . 10
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ โ) |
55 | 11 | nn0red 9232 |
. . . . . . . . . 10
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐พ โ โ) |
56 | 54, 55 | subge02d 8496 |
. . . . . . . . 9
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (0 โค ๐พ โ (๐ โ ๐พ) โค ๐)) |
57 | 52, 56 | mpbid 147 |
. . . . . . . 8
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ โ ๐พ) โค ๐) |
58 | 11 | nn0zd 9375 |
. . . . . . . . . 10
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐พ โ โค) |
59 | 20, 58 | zsubcld 9382 |
. . . . . . . . 9
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ โ ๐พ) โ โค) |
60 | | eluz 9543 |
. . . . . . . . 9
โข (((๐ โ ๐พ) โ โค โง ๐ โ โค) โ (๐ โ (โคโฅโ(๐ โ ๐พ)) โ (๐ โ ๐พ) โค ๐)) |
61 | 59, 20, 60 | syl2anc 411 |
. . . . . . . 8
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ โ (โคโฅโ(๐ โ ๐พ)) โ (๐ โ ๐พ) โค ๐)) |
62 | 57, 61 | mpbird 167 |
. . . . . . 7
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ (โคโฅโ(๐ โ ๐พ))) |
63 | | pcfac 12350 |
. . . . . . 7
โข (((๐ โ ๐พ) โ โ0 โง ๐ โ
(โคโฅโ(๐ โ ๐พ)) โง ๐ โ โ) โ (๐ pCnt (!โ(๐ โ ๐พ))) = ฮฃ๐ โ (1...๐)(โโ((๐ โ ๐พ) / (๐โ๐)))) |
64 | 8, 62, 1, 63 | syl3anc 1238 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt (!โ(๐ โ ๐พ))) = ฮฃ๐ โ (1...๐)(โโ((๐ โ ๐พ) / (๐โ๐)))) |
65 | | elfzuz3 10024 |
. . . . . . . 8
โข (๐พ โ (0...๐) โ ๐ โ (โคโฅโ๐พ)) |
66 | 65 | 3ad2ant2 1019 |
. . . . . . 7
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ๐ โ (โคโฅโ๐พ)) |
67 | | pcfac 12350 |
. . . . . . 7
โข ((๐พ โ โ0
โง ๐ โ
(โคโฅโ๐พ) โง ๐ โ โ) โ (๐ pCnt (!โ๐พ)) = ฮฃ๐ โ (1...๐)(โโ(๐พ / (๐โ๐)))) |
68 | 11, 66, 1, 67 | syl3anc 1238 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt (!โ๐พ)) = ฮฃ๐ โ (1...๐)(โโ(๐พ / (๐โ๐)))) |
69 | 64, 68 | oveq12d 5895 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ((๐ pCnt (!โ(๐ โ ๐พ))) + (๐ pCnt (!โ๐พ))) = (ฮฃ๐ โ (1...๐)(โโ((๐ โ ๐พ) / (๐โ๐))) + ฮฃ๐ โ (1...๐)(โโ(๐พ / (๐โ๐))))) |
70 | 9 | nnzd 9376 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ(๐ โ ๐พ)) โ โค) |
71 | 9 | nnne0d 8966 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ(๐ โ ๐พ)) โ 0) |
72 | 12 | nnzd 9376 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐พ) โ
โค) |
73 | 12 | nnne0d 8966 |
. . . . . 6
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (!โ๐พ) โ 0) |
74 | | pcmul 12303 |
. . . . . 6
โข ((๐ โ โ โง
((!โ(๐ โ ๐พ)) โ โค โง
(!โ(๐ โ ๐พ)) โ 0) โง ((!โ๐พ) โ โค โง
(!โ๐พ) โ 0)) โ
(๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))) = ((๐ pCnt (!โ(๐ โ ๐พ))) + (๐ pCnt (!โ๐พ)))) |
75 | 1, 70, 71, 72, 73, 74 | syl122anc 1247 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))) = ((๐ pCnt (!โ(๐ โ ๐พ))) + (๐ pCnt (!โ๐พ)))) |
76 | 21, 41, 45 | fsumadd 11416 |
. . . . 5
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ฮฃ๐ โ (1...๐)((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐)))) = (ฮฃ๐ โ (1...๐)(โโ((๐ โ ๐พ) / (๐โ๐))) + ฮฃ๐ โ (1...๐)(โโ(๐พ / (๐โ๐))))) |
77 | 69, 75, 76 | 3eqtr4d 2220 |
. . . 4
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))) = ฮฃ๐ โ (1...๐)((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐))))) |
78 | 51, 77 | oveq12d 5895 |
. . 3
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ((๐ pCnt (!โ๐)) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ)))) = (ฮฃ๐ โ (1...๐)(โโ(๐ / (๐โ๐))) โ ฮฃ๐ โ (1...๐)((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐)))))) |
79 | 47, 78 | eqtr4d 2213 |
. 2
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ ฮฃ๐ โ (1...๐)((โโ(๐ / (๐โ๐))) โ ((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐))))) = ((๐ pCnt (!โ๐)) โ (๐ pCnt ((!โ(๐ โ ๐พ)) ยท (!โ๐พ))))) |
80 | 15, 18, 79 | 3eqtr4d 2220 |
1
โข ((๐ โ โ โง ๐พ โ (0...๐) โง ๐ โ โ) โ (๐ pCnt (๐C๐พ)) = ฮฃ๐ โ (1...๐)((โโ(๐ / (๐โ๐))) โ ((โโ((๐ โ ๐พ) / (๐โ๐))) + (โโ(๐พ / (๐โ๐)))))) |