Step |
Hyp |
Ref |
Expression |
1 |
|
binomfallfaclem.1 |
โข ( ๐ โ ๐ด โ โ ) |
2 |
|
binomfallfaclem.2 |
โข ( ๐ โ ๐ต โ โ ) |
3 |
|
binomfallfaclem.3 |
โข ( ๐ โ ๐ โ โ0 ) |
4 |
|
binomfallfaclem.4 |
โข ( ๐ โ ( ( ๐ด + ๐ต ) FallFac ๐ ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) |
5 |
|
elfzelz |
โข ( ๐ โ ( 0 ... ๐ ) โ ๐ โ โค ) |
6 |
|
bccl |
โข ( ( ๐ โ โ0 โง ๐ โ โค ) โ ( ๐ C ๐ ) โ โ0 ) |
7 |
3 5 6
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ C ๐ ) โ โ0 ) |
8 |
7
|
nn0cnd |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ C ๐ ) โ โ ) |
9 |
|
fznn0sub |
โข ( ๐ โ ( 0 ... ๐ ) โ ( ๐ โ ๐ ) โ โ0 ) |
10 |
|
fallfaccl |
โข ( ( ๐ด โ โ โง ( ๐ โ ๐ ) โ โ0 ) โ ( ๐ด FallFac ( ๐ โ ๐ ) ) โ โ ) |
11 |
1 9 10
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ด FallFac ( ๐ โ ๐ ) ) โ โ ) |
12 |
|
elfznn0 |
โข ( ๐ โ ( 0 ... ๐ ) โ ๐ โ โ0 ) |
13 |
|
fallfaccl |
โข ( ( ๐ต โ โ โง ๐ โ โ0 ) โ ( ๐ต FallFac ๐ ) โ โ ) |
14 |
2 12 13
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ต FallFac ๐ ) โ โ ) |
15 |
11 14
|
mulcld |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) โ โ ) |
16 |
1 2
|
addcld |
โข ( ๐ โ ( ๐ด + ๐ต ) โ โ ) |
17 |
3
|
nn0cnd |
โข ( ๐ โ ๐ โ โ ) |
18 |
16 17
|
subcld |
โข ( ๐ โ ( ( ๐ด + ๐ต ) โ ๐ ) โ โ ) |
19 |
18
|
adantr |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ด + ๐ต ) โ ๐ ) โ โ ) |
20 |
8 15 19
|
mulassd |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) = ( ( ๐ C ๐ ) ยท ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) ) ) |
21 |
9
|
nn0cnd |
โข ( ๐ โ ( 0 ... ๐ ) โ ( ๐ โ ๐ ) โ โ ) |
22 |
|
subcl |
โข ( ( ๐ด โ โ โง ( ๐ โ ๐ ) โ โ ) โ ( ๐ด โ ( ๐ โ ๐ ) ) โ โ ) |
23 |
1 21 22
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ด โ ( ๐ โ ๐ ) ) โ โ ) |
24 |
12
|
nn0cnd |
โข ( ๐ โ ( 0 ... ๐ ) โ ๐ โ โ ) |
25 |
|
subcl |
โข ( ( ๐ต โ โ โง ๐ โ โ ) โ ( ๐ต โ ๐ ) โ โ ) |
26 |
2 24 25
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ต โ ๐ ) โ โ ) |
27 |
15 23 26
|
adddid |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ( ๐ด โ ( ๐ โ ๐ ) ) + ( ๐ต โ ๐ ) ) ) = ( ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ๐ด โ ( ๐ โ ๐ ) ) ) + ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ๐ต โ ๐ ) ) ) ) |
28 |
1
|
adantr |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ๐ด โ โ ) |
29 |
17
|
adantr |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ๐ โ โ ) |
30 |
28 29
|
subcld |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ด โ ๐ ) โ โ ) |
31 |
24
|
adantl |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ๐ โ โ ) |
32 |
2
|
adantr |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ๐ต โ โ ) |
33 |
30 31 32
|
ppncand |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ๐ด โ ๐ ) + ๐ ) + ( ๐ต โ ๐ ) ) = ( ( ๐ด โ ๐ ) + ๐ต ) ) |
34 |
28 29 31
|
subsubd |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ด โ ( ๐ โ ๐ ) ) = ( ( ๐ด โ ๐ ) + ๐ ) ) |
35 |
34
|
oveq1d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ด โ ( ๐ โ ๐ ) ) + ( ๐ต โ ๐ ) ) = ( ( ( ๐ด โ ๐ ) + ๐ ) + ( ๐ต โ ๐ ) ) ) |
36 |
28 32 29
|
addsubd |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ด + ๐ต ) โ ๐ ) = ( ( ๐ด โ ๐ ) + ๐ต ) ) |
37 |
33 35 36
|
3eqtr4d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ด โ ( ๐ โ ๐ ) ) + ( ๐ต โ ๐ ) ) = ( ( ๐ด + ๐ต ) โ ๐ ) ) |
38 |
37
|
oveq2d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ( ๐ด โ ( ๐ โ ๐ ) ) + ( ๐ต โ ๐ ) ) ) = ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) ) |
39 |
11 14 23
|
mul32d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ๐ด โ ( ๐ โ ๐ ) ) ) = ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ด โ ( ๐ โ ๐ ) ) ) ยท ( ๐ต FallFac ๐ ) ) ) |
40 |
|
1cnd |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ 1 โ โ ) |
41 |
29 40 31
|
addsubd |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ + 1 ) โ ๐ ) = ( ( ๐ โ ๐ ) + 1 ) ) |
42 |
41
|
oveq2d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) = ( ๐ด FallFac ( ( ๐ โ ๐ ) + 1 ) ) ) |
43 |
|
fallfacp1 |
โข ( ( ๐ด โ โ โง ( ๐ โ ๐ ) โ โ0 ) โ ( ๐ด FallFac ( ( ๐ โ ๐ ) + 1 ) ) = ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ด โ ( ๐ โ ๐ ) ) ) ) |
44 |
1 9 43
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ด FallFac ( ( ๐ โ ๐ ) + 1 ) ) = ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ด โ ( ๐ โ ๐ ) ) ) ) |
45 |
42 44
|
eqtrd |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) = ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ด โ ( ๐ โ ๐ ) ) ) ) |
46 |
45
|
oveq1d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) = ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ด โ ( ๐ โ ๐ ) ) ) ยท ( ๐ต FallFac ๐ ) ) ) |
47 |
39 46
|
eqtr4d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ๐ด โ ( ๐ โ ๐ ) ) ) = ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) |
48 |
11 14 26
|
mulassd |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ๐ต โ ๐ ) ) = ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ( ๐ต FallFac ๐ ) ยท ( ๐ต โ ๐ ) ) ) ) |
49 |
|
fallfacp1 |
โข ( ( ๐ต โ โ โง ๐ โ โ0 ) โ ( ๐ต FallFac ( ๐ + 1 ) ) = ( ( ๐ต FallFac ๐ ) ยท ( ๐ต โ ๐ ) ) ) |
50 |
2 12 49
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ต FallFac ( ๐ + 1 ) ) = ( ( ๐ต FallFac ๐ ) ยท ( ๐ต โ ๐ ) ) ) |
51 |
50
|
oveq2d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) = ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ( ๐ต FallFac ๐ ) ยท ( ๐ต โ ๐ ) ) ) ) |
52 |
48 51
|
eqtr4d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ๐ต โ ๐ ) ) = ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) |
53 |
47 52
|
oveq12d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ๐ด โ ( ๐ โ ๐ ) ) ) + ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ๐ต โ ๐ ) ) ) = ( ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) + ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) |
54 |
27 38 53
|
3eqtr3d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) = ( ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) + ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) |
55 |
54
|
oveq2d |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ C ๐ ) ยท ( ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) ) = ( ( ๐ C ๐ ) ยท ( ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) + ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
56 |
3
|
nn0zd |
โข ( ๐ โ ๐ โ โค ) |
57 |
|
uzid |
โข ( ๐ โ โค โ ๐ โ ( โคโฅ โ ๐ ) ) |
58 |
|
peano2uz |
โข ( ๐ โ ( โคโฅ โ ๐ ) โ ( ๐ + 1 ) โ ( โคโฅ โ ๐ ) ) |
59 |
|
fzss2 |
โข ( ( ๐ + 1 ) โ ( โคโฅ โ ๐ ) โ ( 0 ... ๐ ) โ ( 0 ... ( ๐ + 1 ) ) ) |
60 |
56 57 58 59
|
4syl |
โข ( ๐ โ ( 0 ... ๐ ) โ ( 0 ... ( ๐ + 1 ) ) ) |
61 |
60
|
sselda |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ๐ โ ( 0 ... ( ๐ + 1 ) ) ) |
62 |
|
fznn0sub |
โข ( ๐ โ ( 0 ... ( ๐ + 1 ) ) โ ( ( ๐ + 1 ) โ ๐ ) โ โ0 ) |
63 |
|
fallfaccl |
โข ( ( ๐ด โ โ โง ( ( ๐ + 1 ) โ ๐ ) โ โ0 ) โ ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) โ โ ) |
64 |
1 62 63
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) โ โ ) |
65 |
61 64
|
syldan |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) โ โ ) |
66 |
65 14
|
mulcld |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) โ โ ) |
67 |
|
peano2nn0 |
โข ( ๐ โ โ0 โ ( ๐ + 1 ) โ โ0 ) |
68 |
12 67
|
syl |
โข ( ๐ โ ( 0 ... ๐ ) โ ( ๐ + 1 ) โ โ0 ) |
69 |
|
fallfaccl |
โข ( ( ๐ต โ โ โง ( ๐ + 1 ) โ โ0 ) โ ( ๐ต FallFac ( ๐ + 1 ) ) โ โ ) |
70 |
2 68 69
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ๐ต FallFac ( ๐ + 1 ) ) โ โ ) |
71 |
11 70
|
mulcld |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) โ โ ) |
72 |
8 66 71
|
adddid |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ C ๐ ) ยท ( ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) + ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) = ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
73 |
20 55 72
|
3eqtrd |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) = ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
74 |
73
|
sumeq2dv |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
75 |
74
|
adantr |
โข ( ( ๐ โง ๐ ) โ ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
76 |
16 3
|
fallfacp1d |
โข ( ๐ โ ( ( ๐ด + ๐ต ) FallFac ( ๐ + 1 ) ) = ( ( ( ๐ด + ๐ต ) FallFac ๐ ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) ) |
77 |
4
|
oveq1d |
โข ( ๐ โ ( ( ( ๐ด + ๐ต ) FallFac ๐ ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) = ( ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) ) |
78 |
76 77
|
sylan9eq |
โข ( ( ๐ โง ๐ ) โ ( ( ๐ด + ๐ต ) FallFac ( ๐ + 1 ) ) = ( ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) ) |
79 |
|
fzfid |
โข ( ๐ โ ( 0 ... ๐ ) โ Fin ) |
80 |
8 15
|
mulcld |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) โ โ ) |
81 |
79 18 80
|
fsummulc1 |
โข ( ๐ โ ( ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) ) |
82 |
81
|
adantr |
โข ( ( ๐ โง ๐ ) โ ( ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) ) |
83 |
78 82
|
eqtrd |
โข ( ( ๐ โง ๐ ) โ ( ( ๐ด + ๐ต ) FallFac ( ๐ + 1 ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ยท ( ( ๐ด + ๐ต ) โ ๐ ) ) ) |
84 |
|
elfzelz |
โข ( ๐ โ ( 0 ... ( ๐ + 1 ) ) โ ๐ โ โค ) |
85 |
|
bcpasc |
โข ( ( ๐ โ โ0 โง ๐ โ โค ) โ ( ( ๐ C ๐ ) + ( ๐ C ( ๐ โ 1 ) ) ) = ( ( ๐ + 1 ) C ๐ ) ) |
86 |
3 84 85
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ( ๐ C ๐ ) + ( ๐ C ( ๐ โ 1 ) ) ) = ( ( ๐ + 1 ) C ๐ ) ) |
87 |
86
|
oveq1d |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ( ( ๐ C ๐ ) + ( ๐ C ( ๐ โ 1 ) ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ( ( ( ๐ + 1 ) C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) |
88 |
3 84 6
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ๐ C ๐ ) โ โ0 ) |
89 |
88
|
nn0cnd |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ๐ C ๐ ) โ โ ) |
90 |
|
peano2zm |
โข ( ๐ โ โค โ ( ๐ โ 1 ) โ โค ) |
91 |
84 90
|
syl |
โข ( ๐ โ ( 0 ... ( ๐ + 1 ) ) โ ( ๐ โ 1 ) โ โค ) |
92 |
|
bccl |
โข ( ( ๐ โ โ0 โง ( ๐ โ 1 ) โ โค ) โ ( ๐ C ( ๐ โ 1 ) ) โ โ0 ) |
93 |
3 91 92
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ๐ C ( ๐ โ 1 ) ) โ โ0 ) |
94 |
93
|
nn0cnd |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ๐ C ( ๐ โ 1 ) ) โ โ ) |
95 |
|
elfznn0 |
โข ( ๐ โ ( 0 ... ( ๐ + 1 ) ) โ ๐ โ โ0 ) |
96 |
2 95 13
|
syl2an |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ๐ต FallFac ๐ ) โ โ ) |
97 |
64 96
|
mulcld |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) โ โ ) |
98 |
89 94 97
|
adddird |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ( ( ๐ C ๐ ) + ( ๐ C ( ๐ โ 1 ) ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) ) |
99 |
87 98
|
eqtr3d |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ( ( ๐ + 1 ) C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) ) |
100 |
99
|
sumeq2dv |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ( ๐ + 1 ) C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) ) |
101 |
|
nn0uz |
โข โ0 = ( โคโฅ โ 0 ) |
102 |
3 101
|
eleqtrdi |
โข ( ๐ โ ๐ โ ( โคโฅ โ 0 ) ) |
103 |
89 97
|
mulcld |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) โ โ ) |
104 |
|
oveq2 |
โข ( ๐ = ( ๐ + 1 ) โ ( ๐ C ๐ ) = ( ๐ C ( ๐ + 1 ) ) ) |
105 |
|
oveq2 |
โข ( ๐ = ( ๐ + 1 ) โ ( ( ๐ + 1 ) โ ๐ ) = ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) |
106 |
105
|
oveq2d |
โข ( ๐ = ( ๐ + 1 ) โ ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) = ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) ) |
107 |
|
oveq2 |
โข ( ๐ = ( ๐ + 1 ) โ ( ๐ต FallFac ๐ ) = ( ๐ต FallFac ( ๐ + 1 ) ) ) |
108 |
106 107
|
oveq12d |
โข ( ๐ = ( ๐ + 1 ) โ ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) = ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) |
109 |
104 108
|
oveq12d |
โข ( ๐ = ( ๐ + 1 ) โ ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ( ( ๐ C ( ๐ + 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) |
110 |
102 103 109
|
fsump1 |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ( ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ( ๐ + 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
111 |
|
peano2nn0 |
โข ( ๐ โ โ0 โ ( ๐ + 1 ) โ โ0 ) |
112 |
3 111
|
syl |
โข ( ๐ โ ( ๐ + 1 ) โ โ0 ) |
113 |
112
|
nn0zd |
โข ( ๐ โ ( ๐ + 1 ) โ โค ) |
114 |
3
|
nn0red |
โข ( ๐ โ ๐ โ โ ) |
115 |
114
|
ltp1d |
โข ( ๐ โ ๐ < ( ๐ + 1 ) ) |
116 |
115
|
olcd |
โข ( ๐ โ ( ( ๐ + 1 ) < 0 โจ ๐ < ( ๐ + 1 ) ) ) |
117 |
|
bcval4 |
โข ( ( ๐ โ โ0 โง ( ๐ + 1 ) โ โค โง ( ( ๐ + 1 ) < 0 โจ ๐ < ( ๐ + 1 ) ) ) โ ( ๐ C ( ๐ + 1 ) ) = 0 ) |
118 |
3 113 116 117
|
syl3anc |
โข ( ๐ โ ( ๐ C ( ๐ + 1 ) ) = 0 ) |
119 |
118
|
oveq1d |
โข ( ๐ โ ( ( ๐ C ( ๐ + 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) = ( 0 ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) |
120 |
112
|
nn0cnd |
โข ( ๐ โ ( ๐ + 1 ) โ โ ) |
121 |
120
|
subidd |
โข ( ๐ โ ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) = 0 ) |
122 |
121
|
oveq2d |
โข ( ๐ โ ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) = ( ๐ด FallFac 0 ) ) |
123 |
|
0nn0 |
โข 0 โ โ0 |
124 |
|
fallfaccl |
โข ( ( ๐ด โ โ โง 0 โ โ0 ) โ ( ๐ด FallFac 0 ) โ โ ) |
125 |
1 123 124
|
sylancl |
โข ( ๐ โ ( ๐ด FallFac 0 ) โ โ ) |
126 |
122 125
|
eqeltrd |
โข ( ๐ โ ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) โ โ ) |
127 |
|
fallfaccl |
โข ( ( ๐ต โ โ โง ( ๐ + 1 ) โ โ0 ) โ ( ๐ต FallFac ( ๐ + 1 ) ) โ โ ) |
128 |
2 112 127
|
syl2anc |
โข ( ๐ โ ( ๐ต FallFac ( ๐ + 1 ) ) โ โ ) |
129 |
126 128
|
mulcld |
โข ( ๐ โ ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) โ โ ) |
130 |
129
|
mul02d |
โข ( ๐ โ ( 0 ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) = 0 ) |
131 |
119 130
|
eqtrd |
โข ( ๐ โ ( ( ๐ C ( ๐ + 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) = 0 ) |
132 |
131
|
oveq2d |
โข ( ๐ โ ( ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ( ๐ + 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ( ๐ + 1 ) ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) = ( ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + 0 ) ) |
133 |
61 103
|
syldan |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) โ โ ) |
134 |
79 133
|
fsumcl |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) โ โ ) |
135 |
134
|
addid1d |
โข ( ๐ โ ( ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + 0 ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) |
136 |
110 132 135
|
3eqtrd |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) |
137 |
112 101
|
eleqtrdi |
โข ( ๐ โ ( ๐ + 1 ) โ ( โคโฅ โ 0 ) ) |
138 |
94 97
|
mulcld |
โข ( ( ๐ โง ๐ โ ( 0 ... ( ๐ + 1 ) ) ) โ ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) โ โ ) |
139 |
|
oveq1 |
โข ( ๐ = 0 โ ( ๐ โ 1 ) = ( 0 โ 1 ) ) |
140 |
|
df-neg |
โข - 1 = ( 0 โ 1 ) |
141 |
139 140
|
eqtr4di |
โข ( ๐ = 0 โ ( ๐ โ 1 ) = - 1 ) |
142 |
141
|
oveq2d |
โข ( ๐ = 0 โ ( ๐ C ( ๐ โ 1 ) ) = ( ๐ C - 1 ) ) |
143 |
|
oveq2 |
โข ( ๐ = 0 โ ( ( ๐ + 1 ) โ ๐ ) = ( ( ๐ + 1 ) โ 0 ) ) |
144 |
143
|
oveq2d |
โข ( ๐ = 0 โ ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) = ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) ) |
145 |
|
oveq2 |
โข ( ๐ = 0 โ ( ๐ต FallFac ๐ ) = ( ๐ต FallFac 0 ) ) |
146 |
144 145
|
oveq12d |
โข ( ๐ = 0 โ ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) = ( ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) ยท ( ๐ต FallFac 0 ) ) ) |
147 |
142 146
|
oveq12d |
โข ( ๐ = 0 โ ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ( ( ๐ C - 1 ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) ยท ( ๐ต FallFac 0 ) ) ) ) |
148 |
137 138 147
|
fsum1p |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ( ( ( ๐ C - 1 ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) ยท ( ๐ต FallFac 0 ) ) ) + ฮฃ ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) ) |
149 |
|
neg1z |
โข - 1 โ โค |
150 |
|
neg1lt0 |
โข - 1 < 0 |
151 |
150
|
orci |
โข ( - 1 < 0 โจ ๐ < - 1 ) |
152 |
|
bcval4 |
โข ( ( ๐ โ โ0 โง - 1 โ โค โง ( - 1 < 0 โจ ๐ < - 1 ) ) โ ( ๐ C - 1 ) = 0 ) |
153 |
149 151 152
|
mp3an23 |
โข ( ๐ โ โ0 โ ( ๐ C - 1 ) = 0 ) |
154 |
3 153
|
syl |
โข ( ๐ โ ( ๐ C - 1 ) = 0 ) |
155 |
154
|
oveq1d |
โข ( ๐ โ ( ( ๐ C - 1 ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) ยท ( ๐ต FallFac 0 ) ) ) = ( 0 ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) ยท ( ๐ต FallFac 0 ) ) ) ) |
156 |
120
|
subid1d |
โข ( ๐ โ ( ( ๐ + 1 ) โ 0 ) = ( ๐ + 1 ) ) |
157 |
156
|
oveq2d |
โข ( ๐ โ ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) = ( ๐ด FallFac ( ๐ + 1 ) ) ) |
158 |
|
fallfaccl |
โข ( ( ๐ด โ โ โง ( ๐ + 1 ) โ โ0 ) โ ( ๐ด FallFac ( ๐ + 1 ) ) โ โ ) |
159 |
1 112 158
|
syl2anc |
โข ( ๐ โ ( ๐ด FallFac ( ๐ + 1 ) ) โ โ ) |
160 |
157 159
|
eqeltrd |
โข ( ๐ โ ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) โ โ ) |
161 |
|
fallfaccl |
โข ( ( ๐ต โ โ โง 0 โ โ0 ) โ ( ๐ต FallFac 0 ) โ โ ) |
162 |
2 123 161
|
sylancl |
โข ( ๐ โ ( ๐ต FallFac 0 ) โ โ ) |
163 |
160 162
|
mulcld |
โข ( ๐ โ ( ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) ยท ( ๐ต FallFac 0 ) ) โ โ ) |
164 |
163
|
mul02d |
โข ( ๐ โ ( 0 ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) ยท ( ๐ต FallFac 0 ) ) ) = 0 ) |
165 |
155 164
|
eqtrd |
โข ( ๐ โ ( ( ๐ C - 1 ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) ยท ( ๐ต FallFac 0 ) ) ) = 0 ) |
166 |
|
1zzd |
โข ( ๐ โ 1 โ โค ) |
167 |
|
0zd |
โข ( ๐ โ 0 โ โค ) |
168 |
1 2 3
|
binomfallfaclem1 |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) โ โ ) |
169 |
|
oveq2 |
โข ( ๐ = ( ๐ โ 1 ) โ ( ๐ C ๐ ) = ( ๐ C ( ๐ โ 1 ) ) ) |
170 |
|
oveq2 |
โข ( ๐ = ( ๐ โ 1 ) โ ( ๐ โ ๐ ) = ( ๐ โ ( ๐ โ 1 ) ) ) |
171 |
170
|
oveq2d |
โข ( ๐ = ( ๐ โ 1 ) โ ( ๐ด FallFac ( ๐ โ ๐ ) ) = ( ๐ด FallFac ( ๐ โ ( ๐ โ 1 ) ) ) ) |
172 |
|
oveq1 |
โข ( ๐ = ( ๐ โ 1 ) โ ( ๐ + 1 ) = ( ( ๐ โ 1 ) + 1 ) ) |
173 |
172
|
oveq2d |
โข ( ๐ = ( ๐ โ 1 ) โ ( ๐ต FallFac ( ๐ + 1 ) ) = ( ๐ต FallFac ( ( ๐ โ 1 ) + 1 ) ) ) |
174 |
171 173
|
oveq12d |
โข ( ๐ = ( ๐ โ 1 ) โ ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) = ( ( ๐ด FallFac ( ๐ โ ( ๐ โ 1 ) ) ) ยท ( ๐ต FallFac ( ( ๐ โ 1 ) + 1 ) ) ) ) |
175 |
169 174
|
oveq12d |
โข ( ๐ = ( ๐ โ 1 ) โ ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) = ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ๐ โ ( ๐ โ 1 ) ) ) ยท ( ๐ต FallFac ( ( ๐ โ 1 ) + 1 ) ) ) ) ) |
176 |
166 167 56 168 175
|
fsumshft |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) = ฮฃ ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ๐ โ ( ๐ โ 1 ) ) ) ยท ( ๐ต FallFac ( ( ๐ โ 1 ) + 1 ) ) ) ) ) |
177 |
17
|
adantr |
โข ( ( ๐ โง ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ) โ ๐ โ โ ) |
178 |
|
elfzelz |
โข ( ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) โ ๐ โ โค ) |
179 |
178
|
adantl |
โข ( ( ๐ โง ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ) โ ๐ โ โค ) |
180 |
179
|
zcnd |
โข ( ( ๐ โง ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ) โ ๐ โ โ ) |
181 |
|
1cnd |
โข ( ( ๐ โง ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ) โ 1 โ โ ) |
182 |
177 180 181
|
subsub3d |
โข ( ( ๐ โง ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ) โ ( ๐ โ ( ๐ โ 1 ) ) = ( ( ๐ + 1 ) โ ๐ ) ) |
183 |
182
|
oveq2d |
โข ( ( ๐ โง ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ) โ ( ๐ด FallFac ( ๐ โ ( ๐ โ 1 ) ) ) = ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ) |
184 |
180 181
|
npcand |
โข ( ( ๐ โง ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ) โ ( ( ๐ โ 1 ) + 1 ) = ๐ ) |
185 |
184
|
oveq2d |
โข ( ( ๐ โง ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ) โ ( ๐ต FallFac ( ( ๐ โ 1 ) + 1 ) ) = ( ๐ต FallFac ๐ ) ) |
186 |
183 185
|
oveq12d |
โข ( ( ๐ โง ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ) โ ( ( ๐ด FallFac ( ๐ โ ( ๐ โ 1 ) ) ) ยท ( ๐ต FallFac ( ( ๐ โ 1 ) + 1 ) ) ) = ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) |
187 |
186
|
oveq2d |
โข ( ( ๐ โง ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ) โ ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ๐ โ ( ๐ โ 1 ) ) ) ยท ( ๐ต FallFac ( ( ๐ โ 1 ) + 1 ) ) ) ) = ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) |
188 |
187
|
sumeq2dv |
โข ( ๐ โ ฮฃ ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ๐ โ ( ๐ โ 1 ) ) ) ยท ( ๐ต FallFac ( ( ๐ โ 1 ) + 1 ) ) ) ) = ฮฃ ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) |
189 |
176 188
|
eqtr2d |
โข ( ๐ โ ฮฃ ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) |
190 |
|
oveq2 |
โข ( ๐ = ๐ โ ( ๐ C ๐ ) = ( ๐ C ๐ ) ) |
191 |
|
oveq2 |
โข ( ๐ = ๐ โ ( ๐ โ ๐ ) = ( ๐ โ ๐ ) ) |
192 |
191
|
oveq2d |
โข ( ๐ = ๐ โ ( ๐ด FallFac ( ๐ โ ๐ ) ) = ( ๐ด FallFac ( ๐ โ ๐ ) ) ) |
193 |
|
oveq1 |
โข ( ๐ = ๐ โ ( ๐ + 1 ) = ( ๐ + 1 ) ) |
194 |
193
|
oveq2d |
โข ( ๐ = ๐ โ ( ๐ต FallFac ( ๐ + 1 ) ) = ( ๐ต FallFac ( ๐ + 1 ) ) ) |
195 |
192 194
|
oveq12d |
โข ( ๐ = ๐ โ ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) = ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) |
196 |
190 195
|
oveq12d |
โข ( ๐ = ๐ โ ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) = ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) |
197 |
196
|
cbvsumv |
โข ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) |
198 |
189 197
|
eqtr4di |
โข ( ๐ โ ฮฃ ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) |
199 |
165 198
|
oveq12d |
โข ( ๐ โ ( ( ( ๐ C - 1 ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ 0 ) ) ยท ( ๐ต FallFac 0 ) ) ) + ฮฃ ๐ โ ( ( 0 + 1 ) ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) = ( 0 + ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
200 |
1 2 3
|
binomfallfaclem1 |
โข ( ( ๐ โง ๐ โ ( 0 ... ๐ ) ) โ ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) โ โ ) |
201 |
79 200
|
fsumcl |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) โ โ ) |
202 |
201
|
addid2d |
โข ( ๐ โ ( 0 + ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) |
203 |
148 199 202
|
3eqtrd |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) |
204 |
136 203
|
oveq12d |
โข ( ๐ โ ( ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) = ( ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
205 |
|
fzfid |
โข ( ๐ โ ( 0 ... ( ๐ + 1 ) ) โ Fin ) |
206 |
205 103 138
|
fsumadd |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) = ( ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) ) |
207 |
79 133 200
|
fsumadd |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) = ( ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
208 |
204 206 207
|
3eqtr4d |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ( ๐ โ 1 ) ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
209 |
100 208
|
eqtrd |
โข ( ๐ โ ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ( ๐ + 1 ) C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
210 |
209
|
adantr |
โข ( ( ๐ โง ๐ ) โ ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ( ๐ + 1 ) C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) = ฮฃ ๐ โ ( 0 ... ๐ ) ( ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) + ( ( ๐ C ๐ ) ยท ( ( ๐ด FallFac ( ๐ โ ๐ ) ) ยท ( ๐ต FallFac ( ๐ + 1 ) ) ) ) ) ) |
211 |
75 83 210
|
3eqtr4d |
โข ( ( ๐ โง ๐ ) โ ( ( ๐ด + ๐ต ) FallFac ( ๐ + 1 ) ) = ฮฃ ๐ โ ( 0 ... ( ๐ + 1 ) ) ( ( ( ๐ + 1 ) C ๐ ) ยท ( ( ๐ด FallFac ( ( ๐ + 1 ) โ ๐ ) ) ยท ( ๐ต FallFac ๐ ) ) ) ) |