Metamath Proof Explorer


Theorem bcn0

Description: N choose 0 is 1. Remark in Gleason p. 296. (Contributed by NM, 17-Jun-2005) (Revised by Mario Carneiro, 8-Nov-2013)

Ref Expression
Assertion bcn0 ( ๐‘ โˆˆ โ„•0 โ†’ ( ๐‘ C 0 ) = 1 )

Proof

Step Hyp Ref Expression
1 0elfz โŠข ( ๐‘ โˆˆ โ„•0 โ†’ 0 โˆˆ ( 0 ... ๐‘ ) )
2 bcval2 โŠข ( 0 โˆˆ ( 0 ... ๐‘ ) โ†’ ( ๐‘ C 0 ) = ( ( ! โ€˜ ๐‘ ) / ( ( ! โ€˜ ( ๐‘ โˆ’ 0 ) ) ยท ( ! โ€˜ 0 ) ) ) )
3 1 2 syl โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ๐‘ C 0 ) = ( ( ! โ€˜ ๐‘ ) / ( ( ! โ€˜ ( ๐‘ โˆ’ 0 ) ) ยท ( ! โ€˜ 0 ) ) ) )
4 nn0cn โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ๐‘ โˆˆ โ„‚ )
5 4 subid1d โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ๐‘ โˆ’ 0 ) = ๐‘ )
6 5 fveq2d โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ! โ€˜ ( ๐‘ โˆ’ 0 ) ) = ( ! โ€˜ ๐‘ ) )
7 fac0 โŠข ( ! โ€˜ 0 ) = 1
8 oveq12 โŠข ( ( ( ! โ€˜ ( ๐‘ โˆ’ 0 ) ) = ( ! โ€˜ ๐‘ ) โˆง ( ! โ€˜ 0 ) = 1 ) โ†’ ( ( ! โ€˜ ( ๐‘ โˆ’ 0 ) ) ยท ( ! โ€˜ 0 ) ) = ( ( ! โ€˜ ๐‘ ) ยท 1 ) )
9 6 7 8 sylancl โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ( ! โ€˜ ( ๐‘ โˆ’ 0 ) ) ยท ( ! โ€˜ 0 ) ) = ( ( ! โ€˜ ๐‘ ) ยท 1 ) )
10 faccl โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ! โ€˜ ๐‘ ) โˆˆ โ„• )
11 10 nncnd โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ! โ€˜ ๐‘ ) โˆˆ โ„‚ )
12 11 mulridd โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ( ! โ€˜ ๐‘ ) ยท 1 ) = ( ! โ€˜ ๐‘ ) )
13 9 12 eqtrd โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ( ! โ€˜ ( ๐‘ โˆ’ 0 ) ) ยท ( ! โ€˜ 0 ) ) = ( ! โ€˜ ๐‘ ) )
14 13 oveq2d โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ( ! โ€˜ ๐‘ ) / ( ( ! โ€˜ ( ๐‘ โˆ’ 0 ) ) ยท ( ! โ€˜ 0 ) ) ) = ( ( ! โ€˜ ๐‘ ) / ( ! โ€˜ ๐‘ ) ) )
15 facne0 โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ! โ€˜ ๐‘ ) โ‰  0 )
16 11 15 dividd โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ( ! โ€˜ ๐‘ ) / ( ! โ€˜ ๐‘ ) ) = 1 )
17 14 16 eqtrd โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ( ! โ€˜ ๐‘ ) / ( ( ! โ€˜ ( ๐‘ โˆ’ 0 ) ) ยท ( ! โ€˜ 0 ) ) ) = 1 )
18 3 17 eqtrd โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ๐‘ C 0 ) = 1 )