ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  bcpasc GIF version

Theorem bcpasc 10746
Description: Pascal's rule for the binomial coefficient, generalized to all integers ๐พ. Equation 2 of [Gleason] p. 295. (Contributed by NM, 13-Jul-2005.) (Revised by Mario Carneiro, 10-Mar-2014.)
Assertion
Ref Expression
bcpasc ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))

Proof of Theorem bcpasc
StepHypRef Expression
1 peano2nn0 9216 . . . . . 6 (๐‘ โˆˆ โ„•0 โ†’ (๐‘ + 1) โˆˆ โ„•0)
2 elfzp12 10099 . . . . . . 7 ((๐‘ + 1) โˆˆ (โ„คโ‰ฅโ€˜0) โ†’ (๐พ โˆˆ (0...(๐‘ + 1)) โ†” (๐พ = 0 โˆจ ๐พ โˆˆ ((0 + 1)...(๐‘ + 1)))))
3 nn0uz 9562 . . . . . . 7 โ„•0 = (โ„คโ‰ฅโ€˜0)
42, 3eleq2s 2272 . . . . . 6 ((๐‘ + 1) โˆˆ โ„•0 โ†’ (๐พ โˆˆ (0...(๐‘ + 1)) โ†” (๐พ = 0 โˆจ ๐พ โˆˆ ((0 + 1)...(๐‘ + 1)))))
51, 4syl 14 . . . . 5 (๐‘ โˆˆ โ„•0 โ†’ (๐พ โˆˆ (0...(๐‘ + 1)) โ†” (๐พ = 0 โˆจ ๐พ โˆˆ ((0 + 1)...(๐‘ + 1)))))
6 1p0e1 9035 . . . . . . . 8 (1 + 0) = 1
7 bcn0 10735 . . . . . . . . 9 (๐‘ โˆˆ โ„•0 โ†’ (๐‘C0) = 1)
8 0z 9264 . . . . . . . . . . 11 0 โˆˆ โ„ค
9 1z 9279 . . . . . . . . . . 11 1 โˆˆ โ„ค
10 zsubcl 9294 . . . . . . . . . . 11 ((0 โˆˆ โ„ค โˆง 1 โˆˆ โ„ค) โ†’ (0 โˆ’ 1) โˆˆ โ„ค)
118, 9, 10mp2an 426 . . . . . . . . . 10 (0 โˆ’ 1) โˆˆ โ„ค
12 0re 7957 . . . . . . . . . . . 12 0 โˆˆ โ„
13 ltm1 8803 . . . . . . . . . . . 12 (0 โˆˆ โ„ โ†’ (0 โˆ’ 1) < 0)
1412, 13ax-mp 5 . . . . . . . . . . 11 (0 โˆ’ 1) < 0
1514orci 731 . . . . . . . . . 10 ((0 โˆ’ 1) < 0 โˆจ ๐‘ < (0 โˆ’ 1))
16 bcval4 10732 . . . . . . . . . 10 ((๐‘ โˆˆ โ„•0 โˆง (0 โˆ’ 1) โˆˆ โ„ค โˆง ((0 โˆ’ 1) < 0 โˆจ ๐‘ < (0 โˆ’ 1))) โ†’ (๐‘C(0 โˆ’ 1)) = 0)
1711, 15, 16mp3an23 1329 . . . . . . . . 9 (๐‘ โˆˆ โ„•0 โ†’ (๐‘C(0 โˆ’ 1)) = 0)
187, 17oveq12d 5893 . . . . . . . 8 (๐‘ โˆˆ โ„•0 โ†’ ((๐‘C0) + (๐‘C(0 โˆ’ 1))) = (1 + 0))
19 bcn0 10735 . . . . . . . . 9 ((๐‘ + 1) โˆˆ โ„•0 โ†’ ((๐‘ + 1)C0) = 1)
201, 19syl 14 . . . . . . . 8 (๐‘ โˆˆ โ„•0 โ†’ ((๐‘ + 1)C0) = 1)
216, 18, 203eqtr4a 2236 . . . . . . 7 (๐‘ โˆˆ โ„•0 โ†’ ((๐‘C0) + (๐‘C(0 โˆ’ 1))) = ((๐‘ + 1)C0))
22 oveq2 5883 . . . . . . . . 9 (๐พ = 0 โ†’ (๐‘C๐พ) = (๐‘C0))
23 oveq1 5882 . . . . . . . . . 10 (๐พ = 0 โ†’ (๐พ โˆ’ 1) = (0 โˆ’ 1))
2423oveq2d 5891 . . . . . . . . 9 (๐พ = 0 โ†’ (๐‘C(๐พ โˆ’ 1)) = (๐‘C(0 โˆ’ 1)))
2522, 24oveq12d 5893 . . . . . . . 8 (๐พ = 0 โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘C0) + (๐‘C(0 โˆ’ 1))))
26 oveq2 5883 . . . . . . . 8 (๐พ = 0 โ†’ ((๐‘ + 1)C๐พ) = ((๐‘ + 1)C0))
2725, 26eqeq12d 2192 . . . . . . 7 (๐พ = 0 โ†’ (((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ) โ†” ((๐‘C0) + (๐‘C(0 โˆ’ 1))) = ((๐‘ + 1)C0)))
2821, 27syl5ibrcom 157 . . . . . 6 (๐‘ โˆˆ โ„•0 โ†’ (๐พ = 0 โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ)))
29 simpr 110 . . . . . . . . 9 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ ((0 + 1)...(๐‘ + 1))) โ†’ ๐พ โˆˆ ((0 + 1)...(๐‘ + 1)))
30 0p1e1 9033 . . . . . . . . . 10 (0 + 1) = 1
3130oveq1i 5885 . . . . . . . . 9 ((0 + 1)...(๐‘ + 1)) = (1...(๐‘ + 1))
3229, 31eleqtrdi 2270 . . . . . . . 8 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ ((0 + 1)...(๐‘ + 1))) โ†’ ๐พ โˆˆ (1...(๐‘ + 1)))
33 nn0p1nn 9215 . . . . . . . . . . 11 (๐‘ โˆˆ โ„•0 โ†’ (๐‘ + 1) โˆˆ โ„•)
34 nnuz 9563 . . . . . . . . . . 11 โ„• = (โ„คโ‰ฅโ€˜1)
3533, 34eleqtrdi 2270 . . . . . . . . . 10 (๐‘ โˆˆ โ„•0 โ†’ (๐‘ + 1) โˆˆ (โ„คโ‰ฅโ€˜1))
36 fzm1 10100 . . . . . . . . . . 11 ((๐‘ + 1) โˆˆ (โ„คโ‰ฅโ€˜1) โ†’ (๐พ โˆˆ (1...(๐‘ + 1)) โ†” (๐พ โˆˆ (1...((๐‘ + 1) โˆ’ 1)) โˆจ ๐พ = (๐‘ + 1))))
3736biimpa 296 . . . . . . . . . 10 (((๐‘ + 1) โˆˆ (โ„คโ‰ฅโ€˜1) โˆง ๐พ โˆˆ (1...(๐‘ + 1))) โ†’ (๐พ โˆˆ (1...((๐‘ + 1) โˆ’ 1)) โˆจ ๐พ = (๐‘ + 1)))
3835, 37sylan 283 . . . . . . . . 9 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ (1...(๐‘ + 1))) โ†’ (๐พ โˆˆ (1...((๐‘ + 1) โˆ’ 1)) โˆจ ๐พ = (๐‘ + 1)))
39 nn0cn 9186 . . . . . . . . . . . . . . 15 (๐‘ โˆˆ โ„•0 โ†’ ๐‘ โˆˆ โ„‚)
40 ax-1cn 7904 . . . . . . . . . . . . . . 15 1 โˆˆ โ„‚
41 pncan 8163 . . . . . . . . . . . . . . 15 ((๐‘ โˆˆ โ„‚ โˆง 1 โˆˆ โ„‚) โ†’ ((๐‘ + 1) โˆ’ 1) = ๐‘)
4239, 40, 41sylancl 413 . . . . . . . . . . . . . 14 (๐‘ โˆˆ โ„•0 โ†’ ((๐‘ + 1) โˆ’ 1) = ๐‘)
4342oveq2d 5891 . . . . . . . . . . . . 13 (๐‘ โˆˆ โ„•0 โ†’ (1...((๐‘ + 1) โˆ’ 1)) = (1...๐‘))
4443eleq2d 2247 . . . . . . . . . . . 12 (๐‘ โˆˆ โ„•0 โ†’ (๐พ โˆˆ (1...((๐‘ + 1) โˆ’ 1)) โ†” ๐พ โˆˆ (1...๐‘)))
4544biimpa 296 . . . . . . . . . . 11 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ (1...((๐‘ + 1) โˆ’ 1))) โ†’ ๐พ โˆˆ (1...๐‘))
46 1eluzge0 9574 . . . . . . . . . . . . . . 15 1 โˆˆ (โ„คโ‰ฅโ€˜0)
47 fzss1 10063 . . . . . . . . . . . . . . 15 (1 โˆˆ (โ„คโ‰ฅโ€˜0) โ†’ (1...๐‘) โŠ† (0...๐‘))
4846, 47ax-mp 5 . . . . . . . . . . . . . 14 (1...๐‘) โŠ† (0...๐‘)
4948sseli 3152 . . . . . . . . . . . . 13 (๐พ โˆˆ (1...๐‘) โ†’ ๐พ โˆˆ (0...๐‘))
50 bcp1n 10741 . . . . . . . . . . . . 13 (๐พ โˆˆ (0...๐‘) โ†’ ((๐‘ + 1)C๐พ) = ((๐‘C๐พ) ยท ((๐‘ + 1) / ((๐‘ + 1) โˆ’ ๐พ))))
5149, 50syl 14 . . . . . . . . . . . 12 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘ + 1)C๐พ) = ((๐‘C๐พ) ยท ((๐‘ + 1) / ((๐‘ + 1) โˆ’ ๐พ))))
52 bcrpcl 10733 . . . . . . . . . . . . . . . . 17 (๐พ โˆˆ (0...๐‘) โ†’ (๐‘C๐พ) โˆˆ โ„+)
5349, 52syl 14 . . . . . . . . . . . . . . . 16 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘C๐พ) โˆˆ โ„+)
5453rpcnd 9698 . . . . . . . . . . . . . . 15 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘C๐พ) โˆˆ โ„‚)
55 elfzuz2 10029 . . . . . . . . . . . . . . . . . 18 (๐พ โˆˆ (1...๐‘) โ†’ ๐‘ โˆˆ (โ„คโ‰ฅโ€˜1))
5655, 34eleqtrrdi 2271 . . . . . . . . . . . . . . . . 17 (๐พ โˆˆ (1...๐‘) โ†’ ๐‘ โˆˆ โ„•)
5756peano2nnd 8934 . . . . . . . . . . . . . . . 16 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘ + 1) โˆˆ โ„•)
5857nncnd 8933 . . . . . . . . . . . . . . 15 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘ + 1) โˆˆ โ„‚)
5956nncnd 8933 . . . . . . . . . . . . . . . . . 18 (๐พ โˆˆ (1...๐‘) โ†’ ๐‘ โˆˆ โ„‚)
60 1cnd 7973 . . . . . . . . . . . . . . . . . 18 (๐พ โˆˆ (1...๐‘) โ†’ 1 โˆˆ โ„‚)
61 elfzelz 10025 . . . . . . . . . . . . . . . . . . 19 (๐พ โˆˆ (1...๐‘) โ†’ ๐พ โˆˆ โ„ค)
6261zcnd 9376 . . . . . . . . . . . . . . . . . 18 (๐พ โˆˆ (1...๐‘) โ†’ ๐พ โˆˆ โ„‚)
6359, 60, 62addsubd 8289 . . . . . . . . . . . . . . . . 17 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘ + 1) โˆ’ ๐พ) = ((๐‘ โˆ’ ๐พ) + 1))
64 fznn0sub 10057 . . . . . . . . . . . . . . . . . 18 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘ โˆ’ ๐พ) โˆˆ โ„•0)
65 nn0p1nn 9215 . . . . . . . . . . . . . . . . . 18 ((๐‘ โˆ’ ๐พ) โˆˆ โ„•0 โ†’ ((๐‘ โˆ’ ๐พ) + 1) โˆˆ โ„•)
6664, 65syl 14 . . . . . . . . . . . . . . . . 17 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘ โˆ’ ๐พ) + 1) โˆˆ โ„•)
6763, 66eqeltrd 2254 . . . . . . . . . . . . . . . 16 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘ + 1) โˆ’ ๐พ) โˆˆ โ„•)
6867nncnd 8933 . . . . . . . . . . . . . . 15 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘ + 1) โˆ’ ๐พ) โˆˆ โ„‚)
6967nnap0d 8965 . . . . . . . . . . . . . . 15 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘ + 1) โˆ’ ๐พ) # 0)
7054, 58, 68, 69div12apd 8784 . . . . . . . . . . . . . 14 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘C๐พ) ยท ((๐‘ + 1) / ((๐‘ + 1) โˆ’ ๐พ))) = ((๐‘ + 1) ยท ((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ))))
7167nnrpd 9694 . . . . . . . . . . . . . . . . 17 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘ + 1) โˆ’ ๐พ) โˆˆ โ„+)
7253, 71rpdivcld 9714 . . . . . . . . . . . . . . . 16 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) โˆˆ โ„+)
7372rpcnd 9698 . . . . . . . . . . . . . . 15 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) โˆˆ โ„‚)
7458, 73mulcomd 7979 . . . . . . . . . . . . . 14 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘ + 1) ยท ((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ))) = (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท (๐‘ + 1)))
7570, 74eqtrd 2210 . . . . . . . . . . . . 13 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘C๐พ) ยท ((๐‘ + 1) / ((๐‘ + 1) โˆ’ ๐พ))) = (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท (๐‘ + 1)))
7658, 62npcand 8272 . . . . . . . . . . . . . 14 (๐พ โˆˆ (1...๐‘) โ†’ (((๐‘ + 1) โˆ’ ๐พ) + ๐พ) = (๐‘ + 1))
7776oveq2d 5891 . . . . . . . . . . . . 13 (๐พ โˆˆ (1...๐‘) โ†’ (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท (((๐‘ + 1) โˆ’ ๐พ) + ๐พ)) = (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท (๐‘ + 1)))
7873, 68, 62adddid 7982 . . . . . . . . . . . . 13 (๐พ โˆˆ (1...๐‘) โ†’ (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท (((๐‘ + 1) โˆ’ ๐พ) + ๐พ)) = ((((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท ((๐‘ + 1) โˆ’ ๐พ)) + (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท ๐พ)))
7975, 77, 783eqtr2d 2216 . . . . . . . . . . . 12 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘C๐พ) ยท ((๐‘ + 1) / ((๐‘ + 1) โˆ’ ๐พ))) = ((((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท ((๐‘ + 1) โˆ’ ๐พ)) + (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท ๐พ)))
8054, 68, 69divcanap1d 8748 . . . . . . . . . . . . 13 (๐พ โˆˆ (1...๐‘) โ†’ (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท ((๐‘ + 1) โˆ’ ๐พ)) = (๐‘C๐พ))
81 elfznn 10054 . . . . . . . . . . . . . . . 16 (๐พ โˆˆ (1...๐‘) โ†’ ๐พ โˆˆ โ„•)
8281nnap0d 8965 . . . . . . . . . . . . . . 15 (๐พ โˆˆ (1...๐‘) โ†’ ๐พ # 0)
8354, 68, 62, 69, 82divdivap2d 8780 . . . . . . . . . . . . . 14 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘C๐พ) / (((๐‘ + 1) โˆ’ ๐พ) / ๐พ)) = (((๐‘C๐พ) ยท ๐พ) / ((๐‘ + 1) โˆ’ ๐พ)))
84 bcm1k 10740 . . . . . . . . . . . . . . . 16 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘C๐พ) = ((๐‘C(๐พ โˆ’ 1)) ยท ((๐‘ โˆ’ (๐พ โˆ’ 1)) / ๐พ)))
8559, 62, 60subsub3d 8298 . . . . . . . . . . . . . . . . . 18 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘ โˆ’ (๐พ โˆ’ 1)) = ((๐‘ + 1) โˆ’ ๐พ))
8685oveq1d 5890 . . . . . . . . . . . . . . . . 17 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘ โˆ’ (๐พ โˆ’ 1)) / ๐พ) = (((๐‘ + 1) โˆ’ ๐พ) / ๐พ))
8786oveq2d 5891 . . . . . . . . . . . . . . . 16 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘C(๐พ โˆ’ 1)) ยท ((๐‘ โˆ’ (๐พ โˆ’ 1)) / ๐พ)) = ((๐‘C(๐พ โˆ’ 1)) ยท (((๐‘ + 1) โˆ’ ๐พ) / ๐พ)))
8884, 87eqtrd 2210 . . . . . . . . . . . . . . 15 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘C๐พ) = ((๐‘C(๐พ โˆ’ 1)) ยท (((๐‘ + 1) โˆ’ ๐พ) / ๐พ)))
89 fzelp1 10074 . . . . . . . . . . . . . . . . . . . 20 (๐พ โˆˆ (1...๐‘) โ†’ ๐พ โˆˆ (1...(๐‘ + 1)))
9057nnzd 9374 . . . . . . . . . . . . . . . . . . . . 21 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘ + 1) โˆˆ โ„ค)
91 elfzm1b 10098 . . . . . . . . . . . . . . . . . . . . 21 ((๐พ โˆˆ โ„ค โˆง (๐‘ + 1) โˆˆ โ„ค) โ†’ (๐พ โˆˆ (1...(๐‘ + 1)) โ†” (๐พ โˆ’ 1) โˆˆ (0...((๐‘ + 1) โˆ’ 1))))
9261, 90, 91syl2anc 411 . . . . . . . . . . . . . . . . . . . 20 (๐พ โˆˆ (1...๐‘) โ†’ (๐พ โˆˆ (1...(๐‘ + 1)) โ†” (๐พ โˆ’ 1) โˆˆ (0...((๐‘ + 1) โˆ’ 1))))
9389, 92mpbid 147 . . . . . . . . . . . . . . . . . . 19 (๐พ โˆˆ (1...๐‘) โ†’ (๐พ โˆ’ 1) โˆˆ (0...((๐‘ + 1) โˆ’ 1)))
9459, 40, 41sylancl 413 . . . . . . . . . . . . . . . . . . . 20 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘ + 1) โˆ’ 1) = ๐‘)
9594oveq2d 5891 . . . . . . . . . . . . . . . . . . 19 (๐พ โˆˆ (1...๐‘) โ†’ (0...((๐‘ + 1) โˆ’ 1)) = (0...๐‘))
9693, 95eleqtrd 2256 . . . . . . . . . . . . . . . . . 18 (๐พ โˆˆ (1...๐‘) โ†’ (๐พ โˆ’ 1) โˆˆ (0...๐‘))
97 bcrpcl 10733 . . . . . . . . . . . . . . . . . 18 ((๐พ โˆ’ 1) โˆˆ (0...๐‘) โ†’ (๐‘C(๐พ โˆ’ 1)) โˆˆ โ„+)
9896, 97syl 14 . . . . . . . . . . . . . . . . 17 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘C(๐พ โˆ’ 1)) โˆˆ โ„+)
9998rpcnd 9698 . . . . . . . . . . . . . . . 16 (๐พ โˆˆ (1...๐‘) โ†’ (๐‘C(๐พ โˆ’ 1)) โˆˆ โ„‚)
10081nnrpd 9694 . . . . . . . . . . . . . . . . . 18 (๐พ โˆˆ (1...๐‘) โ†’ ๐พ โˆˆ โ„+)
10171, 100rpdivcld 9714 . . . . . . . . . . . . . . . . 17 (๐พ โˆˆ (1...๐‘) โ†’ (((๐‘ + 1) โˆ’ ๐พ) / ๐พ) โˆˆ โ„+)
102101rpcnd 9698 . . . . . . . . . . . . . . . 16 (๐พ โˆˆ (1...๐‘) โ†’ (((๐‘ + 1) โˆ’ ๐พ) / ๐พ) โˆˆ โ„‚)
10368, 62, 69, 82divap0d 8763 . . . . . . . . . . . . . . . 16 (๐พ โˆˆ (1...๐‘) โ†’ (((๐‘ + 1) โˆ’ ๐พ) / ๐พ) # 0)
10454, 99, 102, 103divmulap3d 8782 . . . . . . . . . . . . . . 15 (๐พ โˆˆ (1...๐‘) โ†’ (((๐‘C๐พ) / (((๐‘ + 1) โˆ’ ๐พ) / ๐พ)) = (๐‘C(๐พ โˆ’ 1)) โ†” (๐‘C๐พ) = ((๐‘C(๐พ โˆ’ 1)) ยท (((๐‘ + 1) โˆ’ ๐พ) / ๐พ))))
10588, 104mpbird 167 . . . . . . . . . . . . . 14 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘C๐พ) / (((๐‘ + 1) โˆ’ ๐พ) / ๐พ)) = (๐‘C(๐พ โˆ’ 1)))
10654, 62, 68, 69div23apd 8785 . . . . . . . . . . . . . 14 (๐พ โˆˆ (1...๐‘) โ†’ (((๐‘C๐พ) ยท ๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) = (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท ๐พ))
10783, 105, 1063eqtr3rd 2219 . . . . . . . . . . . . 13 (๐พ โˆˆ (1...๐‘) โ†’ (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท ๐พ) = (๐‘C(๐พ โˆ’ 1)))
10880, 107oveq12d 5893 . . . . . . . . . . . 12 (๐พ โˆˆ (1...๐‘) โ†’ ((((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท ((๐‘ + 1) โˆ’ ๐พ)) + (((๐‘C๐พ) / ((๐‘ + 1) โˆ’ ๐พ)) ยท ๐พ)) = ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))))
10951, 79, 1083eqtrrd 2215 . . . . . . . . . . 11 (๐พ โˆˆ (1...๐‘) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))
11045, 109syl 14 . . . . . . . . . 10 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ (1...((๐‘ + 1) โˆ’ 1))) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))
111 oveq2 5883 . . . . . . . . . . . . 13 (๐พ = (๐‘ + 1) โ†’ (๐‘C๐พ) = (๐‘C(๐‘ + 1)))
11233nnzd 9374 . . . . . . . . . . . . . 14 (๐‘ โˆˆ โ„•0 โ†’ (๐‘ + 1) โˆˆ โ„ค)
113 nn0re 9185 . . . . . . . . . . . . . . . 16 (๐‘ โˆˆ โ„•0 โ†’ ๐‘ โˆˆ โ„)
114113ltp1d 8887 . . . . . . . . . . . . . . 15 (๐‘ โˆˆ โ„•0 โ†’ ๐‘ < (๐‘ + 1))
115114olcd 734 . . . . . . . . . . . . . 14 (๐‘ โˆˆ โ„•0 โ†’ ((๐‘ + 1) < 0 โˆจ ๐‘ < (๐‘ + 1)))
116 bcval4 10732 . . . . . . . . . . . . . 14 ((๐‘ โˆˆ โ„•0 โˆง (๐‘ + 1) โˆˆ โ„ค โˆง ((๐‘ + 1) < 0 โˆจ ๐‘ < (๐‘ + 1))) โ†’ (๐‘C(๐‘ + 1)) = 0)
117112, 115, 116mpd3an23 1339 . . . . . . . . . . . . 13 (๐‘ โˆˆ โ„•0 โ†’ (๐‘C(๐‘ + 1)) = 0)
118111, 117sylan9eqr 2232 . . . . . . . . . . . 12 ((๐‘ โˆˆ โ„•0 โˆง ๐พ = (๐‘ + 1)) โ†’ (๐‘C๐พ) = 0)
119 oveq1 5882 . . . . . . . . . . . . . . 15 (๐พ = (๐‘ + 1) โ†’ (๐พ โˆ’ 1) = ((๐‘ + 1) โˆ’ 1))
120119, 42sylan9eqr 2232 . . . . . . . . . . . . . 14 ((๐‘ โˆˆ โ„•0 โˆง ๐พ = (๐‘ + 1)) โ†’ (๐พ โˆ’ 1) = ๐‘)
121120oveq2d 5891 . . . . . . . . . . . . 13 ((๐‘ โˆˆ โ„•0 โˆง ๐พ = (๐‘ + 1)) โ†’ (๐‘C(๐พ โˆ’ 1)) = (๐‘C๐‘))
122 bcnn 10737 . . . . . . . . . . . . . 14 (๐‘ โˆˆ โ„•0 โ†’ (๐‘C๐‘) = 1)
123122adantr 276 . . . . . . . . . . . . 13 ((๐‘ โˆˆ โ„•0 โˆง ๐พ = (๐‘ + 1)) โ†’ (๐‘C๐‘) = 1)
124121, 123eqtrd 2210 . . . . . . . . . . . 12 ((๐‘ โˆˆ โ„•0 โˆง ๐พ = (๐‘ + 1)) โ†’ (๐‘C(๐พ โˆ’ 1)) = 1)
125118, 124oveq12d 5893 . . . . . . . . . . 11 ((๐‘ โˆˆ โ„•0 โˆง ๐พ = (๐‘ + 1)) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = (0 + 1))
126 oveq2 5883 . . . . . . . . . . . 12 (๐พ = (๐‘ + 1) โ†’ ((๐‘ + 1)C๐พ) = ((๐‘ + 1)C(๐‘ + 1)))
127 bcnn 10737 . . . . . . . . . . . . 13 ((๐‘ + 1) โˆˆ โ„•0 โ†’ ((๐‘ + 1)C(๐‘ + 1)) = 1)
1281, 127syl 14 . . . . . . . . . . . 12 (๐‘ โˆˆ โ„•0 โ†’ ((๐‘ + 1)C(๐‘ + 1)) = 1)
129126, 128sylan9eqr 2232 . . . . . . . . . . 11 ((๐‘ โˆˆ โ„•0 โˆง ๐พ = (๐‘ + 1)) โ†’ ((๐‘ + 1)C๐พ) = 1)
13030, 125, 1293eqtr4a 2236 . . . . . . . . . 10 ((๐‘ โˆˆ โ„•0 โˆง ๐พ = (๐‘ + 1)) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))
131110, 130jaodan 797 . . . . . . . . 9 ((๐‘ โˆˆ โ„•0 โˆง (๐พ โˆˆ (1...((๐‘ + 1) โˆ’ 1)) โˆจ ๐พ = (๐‘ + 1))) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))
13238, 131syldan 282 . . . . . . . 8 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ (1...(๐‘ + 1))) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))
13332, 132syldan 282 . . . . . . 7 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ ((0 + 1)...(๐‘ + 1))) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))
134133ex 115 . . . . . 6 (๐‘ โˆˆ โ„•0 โ†’ (๐พ โˆˆ ((0 + 1)...(๐‘ + 1)) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ)))
13528, 134jaod 717 . . . . 5 (๐‘ โˆˆ โ„•0 โ†’ ((๐พ = 0 โˆจ ๐พ โˆˆ ((0 + 1)...(๐‘ + 1))) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ)))
1365, 135sylbid 150 . . . 4 (๐‘ โˆˆ โ„•0 โ†’ (๐พ โˆˆ (0...(๐‘ + 1)) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ)))
137136imp 124 . . 3 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))
138137adantlr 477 . 2 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))
139 00id 8098 . . 3 (0 + 0) = 0
140 fzelp1 10074 . . . . . 6 (๐พ โˆˆ (0...๐‘) โ†’ ๐พ โˆˆ (0...(๐‘ + 1)))
141140con3i 632 . . . . 5 (ยฌ ๐พ โˆˆ (0...(๐‘ + 1)) โ†’ ยฌ ๐พ โˆˆ (0...๐‘))
142 bcval3 10731 . . . . . 6 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค โˆง ยฌ ๐พ โˆˆ (0...๐‘)) โ†’ (๐‘C๐พ) = 0)
1431423expa 1203 . . . . 5 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...๐‘)) โ†’ (๐‘C๐พ) = 0)
144141, 143sylan2 286 . . . 4 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ (๐‘C๐พ) = 0)
145 simpll 527 . . . . 5 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ ๐‘ โˆˆ โ„•0)
146 simplr 528 . . . . . 6 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ ๐พ โˆˆ โ„ค)
147 peano2zm 9291 . . . . . 6 (๐พ โˆˆ โ„ค โ†’ (๐พ โˆ’ 1) โˆˆ โ„ค)
148146, 147syl 14 . . . . 5 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ (๐พ โˆ’ 1) โˆˆ โ„ค)
14939adantr 276 . . . . . . . . . 10 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ ๐‘ โˆˆ โ„‚)
150149, 40, 41sylancl 413 . . . . . . . . 9 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ ((๐‘ + 1) โˆ’ 1) = ๐‘)
151150oveq2d 5891 . . . . . . . 8 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ (0...((๐‘ + 1) โˆ’ 1)) = (0...๐‘))
152151eleq2d 2247 . . . . . . 7 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ ((๐พ โˆ’ 1) โˆˆ (0...((๐‘ + 1) โˆ’ 1)) โ†” (๐พ โˆ’ 1) โˆˆ (0...๐‘)))
153 id 19 . . . . . . . . 9 (๐พ โˆˆ โ„ค โ†’ ๐พ โˆˆ โ„ค)
1541nn0zd 9373 . . . . . . . . 9 (๐‘ โˆˆ โ„•0 โ†’ (๐‘ + 1) โˆˆ โ„ค)
155153, 154, 91syl2anr 290 . . . . . . . 8 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ (๐พ โˆˆ (1...(๐‘ + 1)) โ†” (๐พ โˆ’ 1) โˆˆ (0...((๐‘ + 1) โˆ’ 1))))
156 fzp1ss 10073 . . . . . . . . . . 11 (0 โˆˆ โ„ค โ†’ ((0 + 1)...(๐‘ + 1)) โŠ† (0...(๐‘ + 1)))
1578, 156ax-mp 5 . . . . . . . . . 10 ((0 + 1)...(๐‘ + 1)) โŠ† (0...(๐‘ + 1))
15831, 157eqsstrri 3189 . . . . . . . . 9 (1...(๐‘ + 1)) โŠ† (0...(๐‘ + 1))
159158sseli 3152 . . . . . . . 8 (๐พ โˆˆ (1...(๐‘ + 1)) โ†’ ๐พ โˆˆ (0...(๐‘ + 1)))
160155, 159syl6bir 164 . . . . . . 7 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ ((๐พ โˆ’ 1) โˆˆ (0...((๐‘ + 1) โˆ’ 1)) โ†’ ๐พ โˆˆ (0...(๐‘ + 1))))
161152, 160sylbird 170 . . . . . 6 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ ((๐พ โˆ’ 1) โˆˆ (0...๐‘) โ†’ ๐พ โˆˆ (0...(๐‘ + 1))))
162161con3dimp 635 . . . . 5 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ ยฌ (๐พ โˆ’ 1) โˆˆ (0...๐‘))
163 bcval3 10731 . . . . 5 ((๐‘ โˆˆ โ„•0 โˆง (๐พ โˆ’ 1) โˆˆ โ„ค โˆง ยฌ (๐พ โˆ’ 1) โˆˆ (0...๐‘)) โ†’ (๐‘C(๐พ โˆ’ 1)) = 0)
164145, 148, 162, 163syl3anc 1238 . . . 4 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ (๐‘C(๐พ โˆ’ 1)) = 0)
165144, 164oveq12d 5893 . . 3 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = (0 + 0))
166145, 1syl 14 . . . 4 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ (๐‘ + 1) โˆˆ โ„•0)
167 simpr 110 . . . 4 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ ยฌ ๐พ โˆˆ (0...(๐‘ + 1)))
168 bcval3 10731 . . . 4 (((๐‘ + 1) โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ ((๐‘ + 1)C๐พ) = 0)
169166, 146, 167, 168syl3anc 1238 . . 3 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ ((๐‘ + 1)C๐พ) = 0)
170139, 165, 1693eqtr4a 2236 . 2 (((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โˆง ยฌ ๐พ โˆˆ (0...(๐‘ + 1))) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))
171 simpr 110 . . 3 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ ๐พ โˆˆ โ„ค)
172 0zd 9265 . . 3 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ 0 โˆˆ โ„ค)
173112adantr 276 . . 3 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ (๐‘ + 1) โˆˆ โ„ค)
174 fzdcel 10040 . . . 4 ((๐พ โˆˆ โ„ค โˆง 0 โˆˆ โ„ค โˆง (๐‘ + 1) โˆˆ โ„ค) โ†’ DECID ๐พ โˆˆ (0...(๐‘ + 1)))
175 exmiddc 836 . . . 4 (DECID ๐พ โˆˆ (0...(๐‘ + 1)) โ†’ (๐พ โˆˆ (0...(๐‘ + 1)) โˆจ ยฌ ๐พ โˆˆ (0...(๐‘ + 1))))
176174, 175syl 14 . . 3 ((๐พ โˆˆ โ„ค โˆง 0 โˆˆ โ„ค โˆง (๐‘ + 1) โˆˆ โ„ค) โ†’ (๐พ โˆˆ (0...(๐‘ + 1)) โˆจ ยฌ ๐พ โˆˆ (0...(๐‘ + 1))))
177171, 172, 173, 176syl3anc 1238 . 2 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ (๐พ โˆˆ (0...(๐‘ + 1)) โˆจ ยฌ ๐พ โˆˆ (0...(๐‘ + 1))))
178138, 170, 177mpjaodan 798 1 ((๐‘ โˆˆ โ„•0 โˆง ๐พ โˆˆ โ„ค) โ†’ ((๐‘C๐พ) + (๐‘C(๐พ โˆ’ 1))) = ((๐‘ + 1)C๐พ))
Colors of variables: wff set class
Syntax hints:  ยฌ wn 3   โ†’ wi 4   โˆง wa 104   โ†” wb 105   โˆจ wo 708  DECID wdc 834   โˆง w3a 978   = wceq 1353   โˆˆ wcel 2148   โŠ† wss 3130   class class class wbr 4004  โ€˜cfv 5217  (class class class)co 5875  โ„‚cc 7809  โ„cr 7810  0cc0 7811  1c1 7812   + caddc 7814   ยท cmul 7816   < clt 7992   โˆ’ cmin 8128   / cdiv 8629  โ„•cn 8919  โ„•0cn0 9176  โ„คcz 9253  โ„คโ‰ฅcuz 9528  โ„+crp 9653  ...cfz 10008  Ccbc 10727
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-coll 4119  ax-sep 4122  ax-nul 4130  ax-pow 4175  ax-pr 4210  ax-un 4434  ax-setind 4537  ax-iinf 4588  ax-cnex 7902  ax-resscn 7903  ax-1cn 7904  ax-1re 7905  ax-icn 7906  ax-addcl 7907  ax-addrcl 7908  ax-mulcl 7909  ax-mulrcl 7910  ax-addcom 7911  ax-mulcom 7912  ax-addass 7913  ax-mulass 7914  ax-distr 7915  ax-i2m1 7916  ax-0lt1 7917  ax-1rid 7918  ax-0id 7919  ax-rnegex 7920  ax-precex 7921  ax-cnre 7922  ax-pre-ltirr 7923  ax-pre-ltwlin 7924  ax-pre-lttrn 7925  ax-pre-apti 7926  ax-pre-ltadd 7927  ax-pre-mulgt0 7928  ax-pre-mulext 7929
This theorem depends on definitions:  df-bi 117  df-dc 835  df-3or 979  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-nel 2443  df-ral 2460  df-rex 2461  df-reu 2462  df-rmo 2463  df-rab 2464  df-v 2740  df-sbc 2964  df-csb 3059  df-dif 3132  df-un 3134  df-in 3136  df-ss 3143  df-nul 3424  df-if 3536  df-pw 3578  df-sn 3599  df-pr 3600  df-op 3602  df-uni 3811  df-int 3846  df-iun 3889  df-br 4005  df-opab 4066  df-mpt 4067  df-tr 4103  df-id 4294  df-po 4297  df-iso 4298  df-iord 4367  df-on 4369  df-ilim 4370  df-suc 4372  df-iom 4591  df-xp 4633  df-rel 4634  df-cnv 4635  df-co 4636  df-dm 4637  df-rn 4638  df-res 4639  df-ima 4640  df-iota 5179  df-fun 5219  df-fn 5220  df-f 5221  df-f1 5222  df-fo 5223  df-f1o 5224  df-fv 5225  df-riota 5831  df-ov 5878  df-oprab 5879  df-mpo 5880  df-1st 6141  df-2nd 6142  df-recs 6306  df-frec 6392  df-pnf 7994  df-mnf 7995  df-xr 7996  df-ltxr 7997  df-le 7998  df-sub 8130  df-neg 8131  df-reap 8532  df-ap 8539  df-div 8630  df-inn 8920  df-n0 9177  df-z 9254  df-uz 9529  df-q 9620  df-rp 9654  df-fz 10009  df-seqfrec 10446  df-fac 10706  df-bc 10728
This theorem is referenced by:  bccl  10747  bcn2m1  10749  bcn2p1  10750  binomlem  11491  bcxmas  11497  ex-bc  14484
  Copyright terms: Public domain W3C validator