Metamath Proof Explorer


Theorem bcfallfac

Description: Binomial coefficient in terms of falling factorials. (Contributed by Scott Fenton, 20-Mar-2018)

Ref Expression
Assertion bcfallfac ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ๐‘ C ๐พ ) = ( ( ๐‘ FallFac ๐พ ) / ( ! โ€˜ ๐พ ) ) )

Proof

Step Hyp Ref Expression
1 elfz3nn0 โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ๐‘ โˆˆ โ„•0 )
2 1 faccld โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ! โ€˜ ๐‘ ) โˆˆ โ„• )
3 2 nncnd โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ! โ€˜ ๐‘ ) โˆˆ โ„‚ )
4 fznn0sub โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ๐‘ โˆ’ ๐พ ) โˆˆ โ„•0 )
5 4 faccld โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ! โ€˜ ( ๐‘ โˆ’ ๐พ ) ) โˆˆ โ„• )
6 5 nncnd โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ! โ€˜ ( ๐‘ โˆ’ ๐พ ) ) โˆˆ โ„‚ )
7 elfznn0 โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ๐พ โˆˆ โ„•0 )
8 7 faccld โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ! โ€˜ ๐พ ) โˆˆ โ„• )
9 8 nncnd โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ! โ€˜ ๐พ ) โˆˆ โ„‚ )
10 5 nnne0d โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ! โ€˜ ( ๐‘ โˆ’ ๐พ ) ) โ‰  0 )
11 8 nnne0d โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ! โ€˜ ๐พ ) โ‰  0 )
12 3 6 9 10 11 divdiv1d โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ( ( ! โ€˜ ๐‘ ) / ( ! โ€˜ ( ๐‘ โˆ’ ๐พ ) ) ) / ( ! โ€˜ ๐พ ) ) = ( ( ! โ€˜ ๐‘ ) / ( ( ! โ€˜ ( ๐‘ โˆ’ ๐พ ) ) ยท ( ! โ€˜ ๐พ ) ) ) )
13 fallfacval4 โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ๐‘ FallFac ๐พ ) = ( ( ! โ€˜ ๐‘ ) / ( ! โ€˜ ( ๐‘ โˆ’ ๐พ ) ) ) )
14 13 oveq1d โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ( ๐‘ FallFac ๐พ ) / ( ! โ€˜ ๐พ ) ) = ( ( ( ! โ€˜ ๐‘ ) / ( ! โ€˜ ( ๐‘ โˆ’ ๐พ ) ) ) / ( ! โ€˜ ๐พ ) ) )
15 bcval2 โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ๐‘ C ๐พ ) = ( ( ! โ€˜ ๐‘ ) / ( ( ! โ€˜ ( ๐‘ โˆ’ ๐พ ) ) ยท ( ! โ€˜ ๐พ ) ) ) )
16 12 14 15 3eqtr4rd โŠข ( ๐พ โˆˆ ( 0 ... ๐‘ ) โ†’ ( ๐‘ C ๐พ ) = ( ( ๐‘ FallFac ๐พ ) / ( ! โ€˜ ๐พ ) ) )