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

Theorem ibcval5 9690
Description: Write out the top and bottom parts of the binomial coefficient (𝑁C𝐾) = (𝑁 · (𝑁 − 1) · ... · ((𝑁𝐾) + 1)) / 𝐾! explicitly. In this form, it is valid even for 𝑁 < 𝐾, although it is no longer valid for nonpositive 𝐾. (Contributed by Jim Kingdon, 6-Nov-2021.)
Assertion
Ref Expression
ibcval5 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ) → (𝑁C𝐾) = ((seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁) / (!‘𝐾)))

Proof of Theorem ibcval5
Dummy variables 𝑥 𝑘 𝑦 𝑓 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 bcval2 9677 . . . 4 (𝐾 ∈ (0...𝑁) → (𝑁C𝐾) = ((!‘𝑁) / ((!‘(𝑁𝐾)) · (!‘𝐾))))
21adantl 271 . . 3 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (𝑁C𝐾) = ((!‘𝑁) / ((!‘(𝑁𝐾)) · (!‘𝐾))))
3 simprl 497 . . . . . . . . 9 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) ∧ (𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ)) → 𝑘 ∈ ℂ)
4 simprr 498 . . . . . . . . 9 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) ∧ (𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ)) → 𝑥 ∈ ℂ)
53, 4mulcld 7139 . . . . . . . 8 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) ∧ (𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ)) → (𝑘 · 𝑥) ∈ ℂ)
6 simpr1 944 . . . . . . . . 9 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) ∧ (𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ)) → 𝑘 ∈ ℂ)
7 simpr2 945 . . . . . . . . 9 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) ∧ (𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ)) → 𝑥 ∈ ℂ)
8 simpr3 946 . . . . . . . . 9 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) ∧ (𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ)) → 𝑦 ∈ ℂ)
96, 7, 8mulassd 7142 . . . . . . . 8 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) ∧ (𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ)) → ((𝑘 · 𝑥) · 𝑦) = (𝑘 · (𝑥 · 𝑦)))
10 simpll 495 . . . . . . . . . . . . 13 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 𝑁 ∈ ℕ0)
1110nn0zd 8467 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 𝑁 ∈ ℤ)
12 simplr 496 . . . . . . . . . . . . 13 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 𝐾 ∈ ℕ)
1312nnzd 8468 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 𝐾 ∈ ℤ)
1411, 13zsubcld 8474 . . . . . . . . . . 11 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (𝑁𝐾) ∈ ℤ)
1514peano2zd 8472 . . . . . . . . . 10 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → ((𝑁𝐾) + 1) ∈ ℤ)
16 1red 7134 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 1 ∈ ℝ)
1712nnred 8052 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 𝐾 ∈ ℝ)
1810nn0red 8342 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 𝑁 ∈ ℝ)
1912nnge1d 8081 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 1 ≤ 𝐾)
2016, 17, 18, 19lesub2dd 7662 . . . . . . . . . . 11 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (𝑁𝐾) ≤ (𝑁 − 1))
2114zred 8469 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (𝑁𝐾) ∈ ℝ)
22 leaddsub 7542 . . . . . . . . . . . 12 (((𝑁𝐾) ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((𝑁𝐾) + 1) ≤ 𝑁 ↔ (𝑁𝐾) ≤ (𝑁 − 1)))
2321, 16, 18, 22syl3anc 1169 . . . . . . . . . . 11 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (((𝑁𝐾) + 1) ≤ 𝑁 ↔ (𝑁𝐾) ≤ (𝑁 − 1)))
2420, 23mpbird 165 . . . . . . . . . 10 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → ((𝑁𝐾) + 1) ≤ 𝑁)
25 eluz2 8625 . . . . . . . . . 10 (𝑁 ∈ (ℤ‘((𝑁𝐾) + 1)) ↔ (((𝑁𝐾) + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ ((𝑁𝐾) + 1) ≤ 𝑁))
2615, 11, 24, 25syl3anbrc 1122 . . . . . . . . 9 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 𝑁 ∈ (ℤ‘((𝑁𝐾) + 1)))
2726adantrr 462 . . . . . . . 8 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) → 𝑁 ∈ (ℤ‘((𝑁𝐾) + 1)))
28 cnex 7097 . . . . . . . . 9 ℂ ∈ V
2928a1i 9 . . . . . . . 8 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) → ℂ ∈ V)
30 simprr 498 . . . . . . . . 9 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) → (𝑁𝐾) ∈ ℕ)
31 nnuz 8654 . . . . . . . . 9 ℕ = (ℤ‘1)
3230, 31syl6eleq 2171 . . . . . . . 8 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) → (𝑁𝐾) ∈ (ℤ‘1))
33 vex 2604 . . . . . . . . . 10 𝑘 ∈ V
34 fvi 5251 . . . . . . . . . 10 (𝑘 ∈ V → ( I ‘𝑘) = 𝑘)
3533, 34ax-mp 7 . . . . . . . . 9 ( I ‘𝑘) = 𝑘
36 eluzelcn 8630 . . . . . . . . . 10 (𝑘 ∈ (ℤ‘1) → 𝑘 ∈ ℂ)
3736adantl 271 . . . . . . . . 9 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) ∧ 𝑘 ∈ (ℤ‘1)) → 𝑘 ∈ ℂ)
3835, 37syl5eqel 2165 . . . . . . . 8 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) ∧ 𝑘 ∈ (ℤ‘1)) → ( I ‘𝑘) ∈ ℂ)
395, 9, 27, 29, 32, 38iseqsplit 9458 . . . . . . 7 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) → (seq1( · , I , ℂ)‘𝑁) = ((seq1( · , I , ℂ)‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁)))
40 elfzuz3 9042 . . . . . . . . . . 11 (𝐾 ∈ (0...𝑁) → 𝑁 ∈ (ℤ𝐾))
4140adantl 271 . . . . . . . . . 10 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 𝑁 ∈ (ℤ𝐾))
42 eluznn 8687 . . . . . . . . . 10 ((𝐾 ∈ ℕ ∧ 𝑁 ∈ (ℤ𝐾)) → 𝑁 ∈ ℕ)
4312, 41, 42syl2anc 403 . . . . . . . . 9 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 𝑁 ∈ ℕ)
4443adantrr 462 . . . . . . . 8 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) → 𝑁 ∈ ℕ)
45 facnn 9654 . . . . . . . 8 (𝑁 ∈ ℕ → (!‘𝑁) = (seq1( · , I , ℂ)‘𝑁))
4644, 45syl 14 . . . . . . 7 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) → (!‘𝑁) = (seq1( · , I , ℂ)‘𝑁))
47 facnn 9654 . . . . . . . . 9 ((𝑁𝐾) ∈ ℕ → (!‘(𝑁𝐾)) = (seq1( · , I , ℂ)‘(𝑁𝐾)))
4830, 47syl 14 . . . . . . . 8 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) → (!‘(𝑁𝐾)) = (seq1( · , I , ℂ)‘(𝑁𝐾)))
4948oveq1d 5547 . . . . . . 7 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) → ((!‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁)) = ((seq1( · , I , ℂ)‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁)))
5039, 46, 493eqtr4d 2123 . . . . . 6 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ (𝐾 ∈ (0...𝑁) ∧ (𝑁𝐾) ∈ ℕ)) → (!‘𝑁) = ((!‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁)))
5150expr 367 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → ((𝑁𝐾) ∈ ℕ → (!‘𝑁) = ((!‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁))))
5210faccld 9663 . . . . . . . . 9 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘𝑁) ∈ ℕ)
5352nncnd 8053 . . . . . . . 8 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘𝑁) ∈ ℂ)
5453mulid2d 7137 . . . . . . 7 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (1 · (!‘𝑁)) = (!‘𝑁))
5543, 45syl 14 . . . . . . . 8 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘𝑁) = (seq1( · , I , ℂ)‘𝑁))
5655oveq2d 5548 . . . . . . 7 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (1 · (!‘𝑁)) = (1 · (seq1( · , I , ℂ)‘𝑁)))
5754, 56eqtr3d 2115 . . . . . 6 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘𝑁) = (1 · (seq1( · , I , ℂ)‘𝑁)))
58 fveq2 5198 . . . . . . . . 9 ((𝑁𝐾) = 0 → (!‘(𝑁𝐾)) = (!‘0))
59 fac0 9655 . . . . . . . . 9 (!‘0) = 1
6058, 59syl6eq 2129 . . . . . . . 8 ((𝑁𝐾) = 0 → (!‘(𝑁𝐾)) = 1)
61 oveq1 5539 . . . . . . . . . . 11 ((𝑁𝐾) = 0 → ((𝑁𝐾) + 1) = (0 + 1))
62 0p1e1 8153 . . . . . . . . . . 11 (0 + 1) = 1
6361, 62syl6eq 2129 . . . . . . . . . 10 ((𝑁𝐾) = 0 → ((𝑁𝐾) + 1) = 1)
64 iseqeq1 9434 . . . . . . . . . 10 (((𝑁𝐾) + 1) = 1 → seq((𝑁𝐾) + 1)( · , I , ℂ) = seq1( · , I , ℂ))
6563, 64syl 14 . . . . . . . . 9 ((𝑁𝐾) = 0 → seq((𝑁𝐾) + 1)( · , I , ℂ) = seq1( · , I , ℂ))
6665fveq1d 5200 . . . . . . . 8 ((𝑁𝐾) = 0 → (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁) = (seq1( · , I , ℂ)‘𝑁))
6760, 66oveq12d 5550 . . . . . . 7 ((𝑁𝐾) = 0 → ((!‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁)) = (1 · (seq1( · , I , ℂ)‘𝑁)))
6867eqeq2d 2092 . . . . . 6 ((𝑁𝐾) = 0 → ((!‘𝑁) = ((!‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁)) ↔ (!‘𝑁) = (1 · (seq1( · , I , ℂ)‘𝑁))))
6957, 68syl5ibrcom 155 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → ((𝑁𝐾) = 0 → (!‘𝑁) = ((!‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁))))
70 fznn0sub 9075 . . . . . . 7 (𝐾 ∈ (0...𝑁) → (𝑁𝐾) ∈ ℕ0)
7170adantl 271 . . . . . 6 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (𝑁𝐾) ∈ ℕ0)
72 elnn0 8290 . . . . . 6 ((𝑁𝐾) ∈ ℕ0 ↔ ((𝑁𝐾) ∈ ℕ ∨ (𝑁𝐾) = 0))
7371, 72sylib 120 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → ((𝑁𝐾) ∈ ℕ ∨ (𝑁𝐾) = 0))
7451, 69, 73mpjaod 670 . . . 4 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘𝑁) = ((!‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁)))
7574oveq1d 5547 . . 3 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → ((!‘𝑁) / ((!‘(𝑁𝐾)) · (!‘𝐾))) = (((!‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁)) / ((!‘(𝑁𝐾)) · (!‘𝐾))))
7628a1i 9 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → ℂ ∈ V)
77 vex 2604 . . . . . . 7 𝑓 ∈ V
78 fvi 5251 . . . . . . 7 (𝑓 ∈ V → ( I ‘𝑓) = 𝑓)
7977, 78ax-mp 7 . . . . . 6 ( I ‘𝑓) = 𝑓
80 eluzelcn 8630 . . . . . . 7 (𝑓 ∈ (ℤ‘((𝑁𝐾) + 1)) → 𝑓 ∈ ℂ)
8180adantl 271 . . . . . 6 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) ∧ 𝑓 ∈ (ℤ‘((𝑁𝐾) + 1))) → 𝑓 ∈ ℂ)
8279, 81syl5eqel 2165 . . . . 5 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) ∧ 𝑓 ∈ (ℤ‘((𝑁𝐾) + 1))) → ( I ‘𝑓) ∈ ℂ)
83 mulcl 7100 . . . . . 6 ((𝑓 ∈ ℂ ∧ 𝑔 ∈ ℂ) → (𝑓 · 𝑔) ∈ ℂ)
8483adantl 271 . . . . 5 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) ∧ (𝑓 ∈ ℂ ∧ 𝑔 ∈ ℂ)) → (𝑓 · 𝑔) ∈ ℂ)
8526, 76, 82, 84iseqcl 9443 . . . 4 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁) ∈ ℂ)
8612nnnn0d 8341 . . . . . 6 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → 𝐾 ∈ ℕ0)
8786faccld 9663 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘𝐾) ∈ ℕ)
8887nncnd 8053 . . . 4 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘𝐾) ∈ ℂ)
8971faccld 9663 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘(𝑁𝐾)) ∈ ℕ)
9089nncnd 8053 . . . 4 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘(𝑁𝐾)) ∈ ℂ)
9187nnap0d 8084 . . . 4 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘𝐾) # 0)
9289nnap0d 8084 . . . 4 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (!‘(𝑁𝐾)) # 0)
9385, 88, 90, 91, 92divcanap5d 7903 . . 3 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (((!‘(𝑁𝐾)) · (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁)) / ((!‘(𝑁𝐾)) · (!‘𝐾))) = ((seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁) / (!‘𝐾)))
942, 75, 933eqtrd 2117 . 2 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ 𝐾 ∈ (0...𝑁)) → (𝑁C𝐾) = ((seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁) / (!‘𝐾)))
95 simplr 496 . . . . . . 7 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 𝐾 ∈ ℕ)
9695nnnn0d 8341 . . . . . 6 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 𝐾 ∈ ℕ0)
9796faccld 9663 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (!‘𝐾) ∈ ℕ)
9897nncnd 8053 . . . 4 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (!‘𝐾) ∈ ℂ)
9997nnap0d 8084 . . . 4 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (!‘𝐾) # 0)
10098, 99div0apd 7875 . . 3 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (0 / (!‘𝐾)) = 0)
101 mulcl 7100 . . . . . 6 ((𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ) → (𝑘 · 𝑥) ∈ ℂ)
102101adantl 271 . . . . 5 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) ∧ (𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ)) → (𝑘 · 𝑥) ∈ ℂ)
103 eluzelcn 8630 . . . . . . 7 (𝑘 ∈ (ℤ‘((𝑁𝐾) + 1)) → 𝑘 ∈ ℂ)
104103adantl 271 . . . . . 6 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) ∧ 𝑘 ∈ (ℤ‘((𝑁𝐾) + 1))) → 𝑘 ∈ ℂ)
10535, 104syl5eqel 2165 . . . . 5 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) ∧ 𝑘 ∈ (ℤ‘((𝑁𝐾) + 1))) → ( I ‘𝑘) ∈ ℂ)
10628a1i 9 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → ℂ ∈ V)
107 simpr 108 . . . . . 6 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) ∧ 𝑘 ∈ ℂ) → 𝑘 ∈ ℂ)
108107mul02d 7496 . . . . 5 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) ∧ 𝑘 ∈ ℂ) → (0 · 𝑘) = 0)
109107mul01d 7497 . . . . 5 ((((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) ∧ 𝑘 ∈ ℂ) → (𝑘 · 0) = 0)
110 simpr 108 . . . . . . . . 9 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → ¬ 𝐾 ∈ (0...𝑁))
111 nn0uz 8653 . . . . . . . . . . . 12 0 = (ℤ‘0)
11296, 111syl6eleq 2171 . . . . . . . . . . 11 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 𝐾 ∈ (ℤ‘0))
113 simpll 495 . . . . . . . . . . . 12 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 𝑁 ∈ ℕ0)
114113nn0zd 8467 . . . . . . . . . . 11 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 𝑁 ∈ ℤ)
115 elfz5 9037 . . . . . . . . . . 11 ((𝐾 ∈ (ℤ‘0) ∧ 𝑁 ∈ ℤ) → (𝐾 ∈ (0...𝑁) ↔ 𝐾𝑁))
116112, 114, 115syl2anc 403 . . . . . . . . . 10 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (𝐾 ∈ (0...𝑁) ↔ 𝐾𝑁))
117 nn0re 8297 . . . . . . . . . . . 12 (𝑁 ∈ ℕ0𝑁 ∈ ℝ)
118117ad2antrr 471 . . . . . . . . . . 11 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 𝑁 ∈ ℝ)
119 nnre 8046 . . . . . . . . . . . 12 (𝐾 ∈ ℕ → 𝐾 ∈ ℝ)
120119ad2antlr 472 . . . . . . . . . . 11 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 𝐾 ∈ ℝ)
121118, 120subge0d 7635 . . . . . . . . . 10 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (0 ≤ (𝑁𝐾) ↔ 𝐾𝑁))
122116, 121bitr4d 189 . . . . . . . . 9 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (𝐾 ∈ (0...𝑁) ↔ 0 ≤ (𝑁𝐾)))
123110, 122mtbid 629 . . . . . . . 8 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → ¬ 0 ≤ (𝑁𝐾))
124 simpl 107 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ) → 𝑁 ∈ ℕ0)
125124nn0zd 8467 . . . . . . . . . . 11 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ) → 𝑁 ∈ ℤ)
126 simpr 108 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ) → 𝐾 ∈ ℕ)
127126nnzd 8468 . . . . . . . . . . 11 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ) → 𝐾 ∈ ℤ)
128125, 127zsubcld 8474 . . . . . . . . . 10 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ) → (𝑁𝐾) ∈ ℤ)
129128adantr 270 . . . . . . . . 9 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (𝑁𝐾) ∈ ℤ)
130 0z 8362 . . . . . . . . 9 0 ∈ ℤ
131 zltnle 8397 . . . . . . . . 9 (((𝑁𝐾) ∈ ℤ ∧ 0 ∈ ℤ) → ((𝑁𝐾) < 0 ↔ ¬ 0 ≤ (𝑁𝐾)))
132129, 130, 131sylancl 404 . . . . . . . 8 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → ((𝑁𝐾) < 0 ↔ ¬ 0 ≤ (𝑁𝐾)))
133123, 132mpbird 165 . . . . . . 7 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (𝑁𝐾) < 0)
134 zltp1le 8405 . . . . . . . 8 (((𝑁𝐾) ∈ ℤ ∧ 0 ∈ ℤ) → ((𝑁𝐾) < 0 ↔ ((𝑁𝐾) + 1) ≤ 0))
135129, 130, 134sylancl 404 . . . . . . 7 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → ((𝑁𝐾) < 0 ↔ ((𝑁𝐾) + 1) ≤ 0))
136133, 135mpbid 145 . . . . . 6 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → ((𝑁𝐾) + 1) ≤ 0)
137 nn0ge0 8313 . . . . . . 7 (𝑁 ∈ ℕ0 → 0 ≤ 𝑁)
138137ad2antrr 471 . . . . . 6 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 0 ≤ 𝑁)
139 0zd 8363 . . . . . . 7 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 0 ∈ ℤ)
140129peano2zd 8472 . . . . . . 7 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → ((𝑁𝐾) + 1) ∈ ℤ)
141 elfz 9035 . . . . . . 7 ((0 ∈ ℤ ∧ ((𝑁𝐾) + 1) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (0 ∈ (((𝑁𝐾) + 1)...𝑁) ↔ (((𝑁𝐾) + 1) ≤ 0 ∧ 0 ≤ 𝑁)))
142139, 140, 114, 141syl3anc 1169 . . . . . 6 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (0 ∈ (((𝑁𝐾) + 1)...𝑁) ↔ (((𝑁𝐾) + 1) ≤ 0 ∧ 0 ≤ 𝑁)))
143136, 138, 142mpbir2and 885 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 0 ∈ (((𝑁𝐾) + 1)...𝑁))
144 elex 2610 . . . . . 6 (𝑁 ∈ ℕ0𝑁 ∈ V)
145144ad2antrr 471 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → 𝑁 ∈ V)
146 0cn 7111 . . . . . 6 0 ∈ ℂ
147 fvi 5251 . . . . . 6 (0 ∈ ℂ → ( I ‘0) = 0)
148146, 147mp1i 10 . . . . 5 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → ( I ‘0) = 0)
149102, 105, 106, 108, 109, 143, 145, 148iseqz 9469 . . . 4 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁) = 0)
150149oveq1d 5547 . . 3 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → ((seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁) / (!‘𝐾)) = (0 / (!‘𝐾)))
151 nnz 8370 . . . . 5 (𝐾 ∈ ℕ → 𝐾 ∈ ℤ)
152 bcval3 9678 . . . . 5 ((𝑁 ∈ ℕ0𝐾 ∈ ℤ ∧ ¬ 𝐾 ∈ (0...𝑁)) → (𝑁C𝐾) = 0)
153151, 152syl3an2 1203 . . . 4 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ ∧ ¬ 𝐾 ∈ (0...𝑁)) → (𝑁C𝐾) = 0)
1541533expa 1138 . . 3 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (𝑁C𝐾) = 0)
155100, 150, 1543eqtr4rd 2124 . 2 (((𝑁 ∈ ℕ0𝐾 ∈ ℕ) ∧ ¬ 𝐾 ∈ (0...𝑁)) → (𝑁C𝐾) = ((seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁) / (!‘𝐾)))
156 0zd 8363 . . . 4 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ) → 0 ∈ ℤ)
157 fzdcel 9059 . . . 4 ((𝐾 ∈ ℤ ∧ 0 ∈ ℤ ∧ 𝑁 ∈ ℤ) → DECID 𝐾 ∈ (0...𝑁))
158127, 156, 125, 157syl3anc 1169 . . 3 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ) → DECID 𝐾 ∈ (0...𝑁))
159 exmiddc 777 . . 3 (DECID 𝐾 ∈ (0...𝑁) → (𝐾 ∈ (0...𝑁) ∨ ¬ 𝐾 ∈ (0...𝑁)))
160158, 159syl 14 . 2 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ) → (𝐾 ∈ (0...𝑁) ∨ ¬ 𝐾 ∈ (0...𝑁)))
16194, 155, 160mpjaodan 744 1 ((𝑁 ∈ ℕ0𝐾 ∈ ℕ) → (𝑁C𝐾) = ((seq((𝑁𝐾) + 1)( · , I , ℂ)‘𝑁) / (!‘𝐾)))
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wi 4  wa 102  wb 103  wo 661  DECID wdc 775  w3a 919   = wceq 1284  wcel 1433  Vcvv 2601   class class class wbr 3785   I cid 4043  cfv 4922  (class class class)co 5532  cc 6979  cr 6980  0cc0 6981  1c1 6982   + caddc 6984   · cmul 6986   < clt 7153  cle 7154  cmin 7279   / cdiv 7760  cn 8039  0cn0 8288  cz 8351  cuz 8619  ...cfz 9029  seqcseq 9431  !cfa 9652  Ccbc 9674
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 576  ax-in2 577  ax-io 662  ax-5 1376  ax-7 1377  ax-gen 1378  ax-ie1 1422  ax-ie2 1423  ax-8 1435  ax-10 1436  ax-11 1437  ax-i12 1438  ax-bndl 1439  ax-4 1440  ax-13 1444  ax-14 1445  ax-17 1459  ax-i9 1463  ax-ial 1467  ax-i5r 1468  ax-ext 2063  ax-coll 3893  ax-sep 3896  ax-nul 3904  ax-pow 3948  ax-pr 3964  ax-un 4188  ax-setind 4280  ax-iinf 4329  ax-cnex 7067  ax-resscn 7068  ax-1cn 7069  ax-1re 7070  ax-icn 7071  ax-addcl 7072  ax-addrcl 7073  ax-mulcl 7074  ax-mulrcl 7075  ax-addcom 7076  ax-mulcom 7077  ax-addass 7078  ax-mulass 7079  ax-distr 7080  ax-i2m1 7081  ax-0lt1 7082  ax-1rid 7083  ax-0id 7084  ax-rnegex 7085  ax-precex 7086  ax-cnre 7087  ax-pre-ltirr 7088  ax-pre-ltwlin 7089  ax-pre-lttrn 7090  ax-pre-apti 7091  ax-pre-ltadd 7092  ax-pre-mulgt0 7093  ax-pre-mulext 7094
This theorem depends on definitions:  df-bi 115  df-dc 776  df-3or 920  df-3an 921  df-tru 1287  df-fal 1290  df-nf 1390  df-sb 1686  df-eu 1944  df-mo 1945  df-clab 2068  df-cleq 2074  df-clel 2077  df-nfc 2208  df-ne 2246  df-nel 2340  df-ral 2353  df-rex 2354  df-reu 2355  df-rmo 2356  df-rab 2357  df-v 2603  df-sbc 2816  df-csb 2909  df-dif 2975  df-un 2977  df-in 2979  df-ss 2986  df-nul 3252  df-if 3352  df-pw 3384  df-sn 3404  df-pr 3405  df-op 3407  df-uni 3602  df-int 3637  df-iun 3680  df-br 3786  df-opab 3840  df-mpt 3841  df-tr 3876  df-id 4048  df-po 4051  df-iso 4052  df-iord 4121  df-on 4123  df-suc 4126  df-iom 4332  df-xp 4369  df-rel 4370  df-cnv 4371  df-co 4372  df-dm 4373  df-rn 4374  df-res 4375  df-ima 4376  df-iota 4887  df-fun 4924  df-fn 4925  df-f 4926  df-f1 4927  df-fo 4928  df-f1o 4929  df-fv 4930  df-riota 5488  df-ov 5535  df-oprab 5536  df-mpt2 5537  df-1st 5787  df-2nd 5788  df-recs 5943  df-frec 6001  df-pnf 7155  df-mnf 7156  df-xr 7157  df-ltxr 7158  df-le 7159  df-sub 7281  df-neg 7282  df-reap 7675  df-ap 7682  df-div 7761  df-inn 8040  df-n0 8289  df-z 8352  df-uz 8620  df-q 8705  df-fz 9030  df-iseq 9432  df-fac 9653  df-bc 9675
This theorem is referenced by:  bcn2  9691
  Copyright terms: Public domain W3C validator