| Step | Hyp | Ref
| Expression |
| 1 | | binomfallfaclem.3 |
. . . . . . . 8
⊢ (𝜑 → 𝑁 ∈
ℕ0) |
| 2 | | elfzelz 13546 |
. . . . . . . 8
⊢ (𝑘 ∈ (0...𝑁) → 𝑘 ∈ ℤ) |
| 3 | | bccl 14345 |
. . . . . . . 8
⊢ ((𝑁 ∈ ℕ0
∧ 𝑘 ∈ ℤ)
→ (𝑁C𝑘) ∈
ℕ0) |
| 4 | 1, 2, 3 | syl2an 596 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝑁C𝑘) ∈
ℕ0) |
| 5 | 4 | nn0cnd 12569 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝑁C𝑘) ∈ ℂ) |
| 6 | | binomfallfaclem.1 |
. . . . . . . 8
⊢ (𝜑 → 𝐴 ∈ ℂ) |
| 7 | | fznn0sub 13578 |
. . . . . . . 8
⊢ (𝑘 ∈ (0...𝑁) → (𝑁 − 𝑘) ∈
ℕ0) |
| 8 | | fallfaccl 16037 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℂ ∧ (𝑁 − 𝑘) ∈ ℕ0) → (𝐴 FallFac (𝑁 − 𝑘)) ∈ ℂ) |
| 9 | 6, 7, 8 | syl2an 596 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐴 FallFac (𝑁 − 𝑘)) ∈ ℂ) |
| 10 | | binomfallfaclem.2 |
. . . . . . . 8
⊢ (𝜑 → 𝐵 ∈ ℂ) |
| 11 | | elfznn0 13642 |
. . . . . . . 8
⊢ (𝑘 ∈ (0...𝑁) → 𝑘 ∈ ℕ0) |
| 12 | | fallfaccl 16037 |
. . . . . . . 8
⊢ ((𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0)
→ (𝐵 FallFac 𝑘) ∈
ℂ) |
| 13 | 10, 11, 12 | syl2an 596 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐵 FallFac 𝑘) ∈ ℂ) |
| 14 | 9, 13 | mulcld 11260 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) ∈ ℂ) |
| 15 | 6, 10 | addcld 11259 |
. . . . . . . 8
⊢ (𝜑 → (𝐴 + 𝐵) ∈ ℂ) |
| 16 | 1 | nn0cnd 12569 |
. . . . . . . 8
⊢ (𝜑 → 𝑁 ∈ ℂ) |
| 17 | 15, 16 | subcld 11599 |
. . . . . . 7
⊢ (𝜑 → ((𝐴 + 𝐵) − 𝑁) ∈ ℂ) |
| 18 | 17 | adantr 480 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝐴 + 𝐵) − 𝑁) ∈ ℂ) |
| 19 | 5, 14, 18 | mulassd 11263 |
. . . . 5
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁)) = ((𝑁C𝑘) · (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · ((𝐴 + 𝐵) − 𝑁)))) |
| 20 | 7 | nn0cnd 12569 |
. . . . . . . . 9
⊢ (𝑘 ∈ (0...𝑁) → (𝑁 − 𝑘) ∈ ℂ) |
| 21 | | subcl 11486 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℂ ∧ (𝑁 − 𝑘) ∈ ℂ) → (𝐴 − (𝑁 − 𝑘)) ∈ ℂ) |
| 22 | 6, 20, 21 | syl2an 596 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐴 − (𝑁 − 𝑘)) ∈ ℂ) |
| 23 | 11 | nn0cnd 12569 |
. . . . . . . . 9
⊢ (𝑘 ∈ (0...𝑁) → 𝑘 ∈ ℂ) |
| 24 | | subcl 11486 |
. . . . . . . . 9
⊢ ((𝐵 ∈ ℂ ∧ 𝑘 ∈ ℂ) → (𝐵 − 𝑘) ∈ ℂ) |
| 25 | 10, 23, 24 | syl2an 596 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐵 − 𝑘) ∈ ℂ) |
| 26 | 14, 22, 25 | adddid 11264 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · ((𝐴 − (𝑁 − 𝑘)) + (𝐵 − 𝑘))) = ((((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · (𝐴 − (𝑁 − 𝑘))) + (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · (𝐵 − 𝑘)))) |
| 27 | 6 | adantr 480 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → 𝐴 ∈ ℂ) |
| 28 | 16 | adantr 480 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → 𝑁 ∈ ℂ) |
| 29 | 27, 28 | subcld 11599 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐴 − 𝑁) ∈ ℂ) |
| 30 | 23 | adantl 481 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → 𝑘 ∈ ℂ) |
| 31 | 10 | adantr 480 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → 𝐵 ∈ ℂ) |
| 32 | 29, 30, 31 | ppncand 11639 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (((𝐴 − 𝑁) + 𝑘) + (𝐵 − 𝑘)) = ((𝐴 − 𝑁) + 𝐵)) |
| 33 | 27, 28, 30 | subsubd 11627 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐴 − (𝑁 − 𝑘)) = ((𝐴 − 𝑁) + 𝑘)) |
| 34 | 33 | oveq1d 7425 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝐴 − (𝑁 − 𝑘)) + (𝐵 − 𝑘)) = (((𝐴 − 𝑁) + 𝑘) + (𝐵 − 𝑘))) |
| 35 | 27, 31, 28 | addsubd 11620 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝐴 + 𝐵) − 𝑁) = ((𝐴 − 𝑁) + 𝐵)) |
| 36 | 32, 34, 35 | 3eqtr4d 2781 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝐴 − (𝑁 − 𝑘)) + (𝐵 − 𝑘)) = ((𝐴 + 𝐵) − 𝑁)) |
| 37 | 36 | oveq2d 7426 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · ((𝐴 − (𝑁 − 𝑘)) + (𝐵 − 𝑘))) = (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · ((𝐴 + 𝐵) − 𝑁))) |
| 38 | 9, 13, 22 | mul32d 11450 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · (𝐴 − (𝑁 − 𝑘))) = (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐴 − (𝑁 − 𝑘))) · (𝐵 FallFac 𝑘))) |
| 39 | | 1cnd 11235 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → 1 ∈ ℂ) |
| 40 | 28, 39, 30 | addsubd 11620 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝑁 + 1) − 𝑘) = ((𝑁 − 𝑘) + 1)) |
| 41 | 40 | oveq2d 7426 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐴 FallFac ((𝑁 + 1) − 𝑘)) = (𝐴 FallFac ((𝑁 − 𝑘) + 1))) |
| 42 | | fallfacp1 16051 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℂ ∧ (𝑁 − 𝑘) ∈ ℕ0) → (𝐴 FallFac ((𝑁 − 𝑘) + 1)) = ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐴 − (𝑁 − 𝑘)))) |
| 43 | 6, 7, 42 | syl2an 596 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐴 FallFac ((𝑁 − 𝑘) + 1)) = ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐴 − (𝑁 − 𝑘)))) |
| 44 | 41, 43 | eqtrd 2771 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐴 FallFac ((𝑁 + 1) − 𝑘)) = ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐴 − (𝑁 − 𝑘)))) |
| 45 | 44 | oveq1d 7425 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)) = (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐴 − (𝑁 − 𝑘))) · (𝐵 FallFac 𝑘))) |
| 46 | 38, 45 | eqtr4d 2774 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · (𝐴 − (𝑁 − 𝑘))) = ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) |
| 47 | 9, 13, 25 | mulassd 11263 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · (𝐵 − 𝑘)) = ((𝐴 FallFac (𝑁 − 𝑘)) · ((𝐵 FallFac 𝑘) · (𝐵 − 𝑘)))) |
| 48 | | fallfacp1 16051 |
. . . . . . . . . . 11
⊢ ((𝐵 ∈ ℂ ∧ 𝑘 ∈ ℕ0)
→ (𝐵 FallFac (𝑘 + 1)) = ((𝐵 FallFac 𝑘) · (𝐵 − 𝑘))) |
| 49 | 10, 11, 48 | syl2an 596 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐵 FallFac (𝑘 + 1)) = ((𝐵 FallFac 𝑘) · (𝐵 − 𝑘))) |
| 50 | 49 | oveq2d 7426 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))) = ((𝐴 FallFac (𝑁 − 𝑘)) · ((𝐵 FallFac 𝑘) · (𝐵 − 𝑘)))) |
| 51 | 47, 50 | eqtr4d 2774 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · (𝐵 − 𝑘)) = ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))) |
| 52 | 46, 51 | oveq12d 7428 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · (𝐴 − (𝑁 − 𝑘))) + (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · (𝐵 − 𝑘))) = (((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)) + ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))))) |
| 53 | 26, 37, 52 | 3eqtr3d 2779 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · ((𝐴 + 𝐵) − 𝑁)) = (((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)) + ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))))) |
| 54 | 53 | oveq2d 7426 |
. . . . 5
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝑁C𝑘) · (((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)) · ((𝐴 + 𝐵) − 𝑁))) = ((𝑁C𝑘) · (((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)) + ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))))) |
| 55 | 1 | nn0zd 12619 |
. . . . . . . . . 10
⊢ (𝜑 → 𝑁 ∈ ℤ) |
| 56 | | uzid 12872 |
. . . . . . . . . 10
⊢ (𝑁 ∈ ℤ → 𝑁 ∈
(ℤ≥‘𝑁)) |
| 57 | | peano2uz 12922 |
. . . . . . . . . 10
⊢ (𝑁 ∈
(ℤ≥‘𝑁) → (𝑁 + 1) ∈
(ℤ≥‘𝑁)) |
| 58 | | fzss2 13586 |
. . . . . . . . . 10
⊢ ((𝑁 + 1) ∈
(ℤ≥‘𝑁) → (0...𝑁) ⊆ (0...(𝑁 + 1))) |
| 59 | 55, 56, 57, 58 | 4syl 19 |
. . . . . . . . 9
⊢ (𝜑 → (0...𝑁) ⊆ (0...(𝑁 + 1))) |
| 60 | 59 | sselda 3963 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → 𝑘 ∈ (0...(𝑁 + 1))) |
| 61 | | fznn0sub 13578 |
. . . . . . . . 9
⊢ (𝑘 ∈ (0...(𝑁 + 1)) → ((𝑁 + 1) − 𝑘) ∈
ℕ0) |
| 62 | | fallfaccl 16037 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℂ ∧ ((𝑁 + 1) − 𝑘) ∈ ℕ0) → (𝐴 FallFac ((𝑁 + 1) − 𝑘)) ∈ ℂ) |
| 63 | 6, 61, 62 | syl2an 596 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → (𝐴 FallFac ((𝑁 + 1) − 𝑘)) ∈ ℂ) |
| 64 | 60, 63 | syldan 591 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐴 FallFac ((𝑁 + 1) − 𝑘)) ∈ ℂ) |
| 65 | 64, 13 | mulcld 11260 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)) ∈ ℂ) |
| 66 | | peano2nn0 12546 |
. . . . . . . . 9
⊢ (𝑘 ∈ ℕ0
→ (𝑘 + 1) ∈
ℕ0) |
| 67 | 11, 66 | syl 17 |
. . . . . . . 8
⊢ (𝑘 ∈ (0...𝑁) → (𝑘 + 1) ∈
ℕ0) |
| 68 | | fallfaccl 16037 |
. . . . . . . 8
⊢ ((𝐵 ∈ ℂ ∧ (𝑘 + 1) ∈
ℕ0) → (𝐵 FallFac (𝑘 + 1)) ∈ ℂ) |
| 69 | 10, 67, 68 | syl2an 596 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (𝐵 FallFac (𝑘 + 1)) ∈ ℂ) |
| 70 | 9, 69 | mulcld 11260 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))) ∈ ℂ) |
| 71 | 5, 65, 70 | adddid 11264 |
. . . . 5
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝑁C𝑘) · (((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)) + ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))))) = (((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))))) |
| 72 | 19, 54, 71 | 3eqtrd 2775 |
. . . 4
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → (((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁)) = (((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))))) |
| 73 | 72 | sumeq2dv 15723 |
. . 3
⊢ (𝜑 → Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁)) = Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))))) |
| 74 | 73 | adantr 480 |
. 2
⊢ ((𝜑 ∧ 𝜓) → Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁)) = Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))))) |
| 75 | 15, 1 | fallfacp1d 16053 |
. . . 4
⊢ (𝜑 → ((𝐴 + 𝐵) FallFac (𝑁 + 1)) = (((𝐴 + 𝐵) FallFac 𝑁) · ((𝐴 + 𝐵) − 𝑁))) |
| 76 | | binomfallfaclem.4 |
. . . . 5
⊢ (𝜓 → ((𝐴 + 𝐵) FallFac 𝑁) = Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘)))) |
| 77 | 76 | oveq1d 7425 |
. . . 4
⊢ (𝜓 → (((𝐴 + 𝐵) FallFac 𝑁) · ((𝐴 + 𝐵) − 𝑁)) = (Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁))) |
| 78 | 75, 77 | sylan9eq 2791 |
. . 3
⊢ ((𝜑 ∧ 𝜓) → ((𝐴 + 𝐵) FallFac (𝑁 + 1)) = (Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁))) |
| 79 | | fzfid 13996 |
. . . . 5
⊢ (𝜑 → (0...𝑁) ∈ Fin) |
| 80 | 5, 14 | mulcld 11260 |
. . . . 5
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) ∈ ℂ) |
| 81 | 79, 17, 80 | fsummulc1 15806 |
. . . 4
⊢ (𝜑 → (Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁)) = Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁))) |
| 82 | 81 | adantr 480 |
. . 3
⊢ ((𝜑 ∧ 𝜓) → (Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁)) = Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁))) |
| 83 | 78, 82 | eqtrd 2771 |
. 2
⊢ ((𝜑 ∧ 𝜓) → ((𝐴 + 𝐵) FallFac (𝑁 + 1)) = Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac 𝑘))) · ((𝐴 + 𝐵) − 𝑁))) |
| 84 | | elfzelz 13546 |
. . . . . . . 8
⊢ (𝑘 ∈ (0...(𝑁 + 1)) → 𝑘 ∈ ℤ) |
| 85 | | bcpasc 14344 |
. . . . . . . 8
⊢ ((𝑁 ∈ ℕ0
∧ 𝑘 ∈ ℤ)
→ ((𝑁C𝑘) + (𝑁C(𝑘 − 1))) = ((𝑁 + 1)C𝑘)) |
| 86 | 1, 84, 85 | syl2an 596 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → ((𝑁C𝑘) + (𝑁C(𝑘 − 1))) = ((𝑁 + 1)C𝑘)) |
| 87 | 86 | oveq1d 7425 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → (((𝑁C𝑘) + (𝑁C(𝑘 − 1))) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = (((𝑁 + 1)C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)))) |
| 88 | 1, 84, 3 | syl2an 596 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → (𝑁C𝑘) ∈
ℕ0) |
| 89 | 88 | nn0cnd 12569 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → (𝑁C𝑘) ∈ ℂ) |
| 90 | | peano2zm 12640 |
. . . . . . . . . 10
⊢ (𝑘 ∈ ℤ → (𝑘 − 1) ∈
ℤ) |
| 91 | 84, 90 | syl 17 |
. . . . . . . . 9
⊢ (𝑘 ∈ (0...(𝑁 + 1)) → (𝑘 − 1) ∈ ℤ) |
| 92 | | bccl 14345 |
. . . . . . . . 9
⊢ ((𝑁 ∈ ℕ0
∧ (𝑘 − 1) ∈
ℤ) → (𝑁C(𝑘 − 1)) ∈
ℕ0) |
| 93 | 1, 91, 92 | syl2an 596 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → (𝑁C(𝑘 − 1)) ∈
ℕ0) |
| 94 | 93 | nn0cnd 12569 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → (𝑁C(𝑘 − 1)) ∈ ℂ) |
| 95 | | elfznn0 13642 |
. . . . . . . . 9
⊢ (𝑘 ∈ (0...(𝑁 + 1)) → 𝑘 ∈ ℕ0) |
| 96 | 10, 95, 12 | syl2an 596 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → (𝐵 FallFac 𝑘) ∈ ℂ) |
| 97 | 63, 96 | mulcld 11260 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)) ∈ ℂ) |
| 98 | 89, 94, 97 | adddird 11265 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → (((𝑁C𝑘) + (𝑁C(𝑘 − 1))) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = (((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))))) |
| 99 | 87, 98 | eqtr3d 2773 |
. . . . 5
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → (((𝑁 + 1)C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = (((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))))) |
| 100 | 99 | sumeq2dv 15723 |
. . . 4
⊢ (𝜑 → Σ𝑘 ∈ (0...(𝑁 + 1))(((𝑁 + 1)C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = Σ𝑘 ∈ (0...(𝑁 + 1))(((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))))) |
| 101 | | nn0uz 12899 |
. . . . . . . . 9
⊢
ℕ0 = (ℤ≥‘0) |
| 102 | 1, 101 | eleqtrdi 2845 |
. . . . . . . 8
⊢ (𝜑 → 𝑁 ∈
(ℤ≥‘0)) |
| 103 | 89, 97 | mulcld 11260 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → ((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) ∈ ℂ) |
| 104 | | oveq2 7418 |
. . . . . . . . 9
⊢ (𝑘 = (𝑁 + 1) → (𝑁C𝑘) = (𝑁C(𝑁 + 1))) |
| 105 | | oveq2 7418 |
. . . . . . . . . . 11
⊢ (𝑘 = (𝑁 + 1) → ((𝑁 + 1) − 𝑘) = ((𝑁 + 1) − (𝑁 + 1))) |
| 106 | 105 | oveq2d 7426 |
. . . . . . . . . 10
⊢ (𝑘 = (𝑁 + 1) → (𝐴 FallFac ((𝑁 + 1) − 𝑘)) = (𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1)))) |
| 107 | | oveq2 7418 |
. . . . . . . . . 10
⊢ (𝑘 = (𝑁 + 1) → (𝐵 FallFac 𝑘) = (𝐵 FallFac (𝑁 + 1))) |
| 108 | 106, 107 | oveq12d 7428 |
. . . . . . . . 9
⊢ (𝑘 = (𝑁 + 1) → ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)) = ((𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) · (𝐵 FallFac (𝑁 + 1)))) |
| 109 | 104, 108 | oveq12d 7428 |
. . . . . . . 8
⊢ (𝑘 = (𝑁 + 1) → ((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = ((𝑁C(𝑁 + 1)) · ((𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) · (𝐵 FallFac (𝑁 + 1))))) |
| 110 | 102, 103,
109 | fsump1 15777 |
. . . . . . 7
⊢ (𝜑 → Σ𝑘 ∈ (0...(𝑁 + 1))((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = (Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C(𝑁 + 1)) · ((𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) · (𝐵 FallFac (𝑁 + 1)))))) |
| 111 | | peano2nn0 12546 |
. . . . . . . . . . . . 13
⊢ (𝑁 ∈ ℕ0
→ (𝑁 + 1) ∈
ℕ0) |
| 112 | 1, 111 | syl 17 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑁 + 1) ∈
ℕ0) |
| 113 | 112 | nn0zd 12619 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝑁 + 1) ∈ ℤ) |
| 114 | 1 | nn0red 12568 |
. . . . . . . . . . . . 13
⊢ (𝜑 → 𝑁 ∈ ℝ) |
| 115 | 114 | ltp1d 12177 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑁 < (𝑁 + 1)) |
| 116 | 115 | olcd 874 |
. . . . . . . . . . 11
⊢ (𝜑 → ((𝑁 + 1) < 0 ∨ 𝑁 < (𝑁 + 1))) |
| 117 | | bcval4 14330 |
. . . . . . . . . . 11
⊢ ((𝑁 ∈ ℕ0
∧ (𝑁 + 1) ∈
ℤ ∧ ((𝑁 + 1) <
0 ∨ 𝑁 < (𝑁 + 1))) → (𝑁C(𝑁 + 1)) = 0) |
| 118 | 1, 113, 116, 117 | syl3anc 1373 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑁C(𝑁 + 1)) = 0) |
| 119 | 118 | oveq1d 7425 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑁C(𝑁 + 1)) · ((𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) · (𝐵 FallFac (𝑁 + 1)))) = (0 · ((𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) · (𝐵 FallFac (𝑁 + 1))))) |
| 120 | 112 | nn0cnd 12569 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (𝑁 + 1) ∈ ℂ) |
| 121 | 120 | subidd 11587 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((𝑁 + 1) − (𝑁 + 1)) = 0) |
| 122 | 121 | oveq2d 7426 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) = (𝐴 FallFac 0)) |
| 123 | | 0nn0 12521 |
. . . . . . . . . . . . 13
⊢ 0 ∈
ℕ0 |
| 124 | | fallfaccl 16037 |
. . . . . . . . . . . . 13
⊢ ((𝐴 ∈ ℂ ∧ 0 ∈
ℕ0) → (𝐴 FallFac 0) ∈ ℂ) |
| 125 | 6, 123, 124 | sylancl 586 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝐴 FallFac 0) ∈ ℂ) |
| 126 | 122, 125 | eqeltrd 2835 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) ∈ ℂ) |
| 127 | | fallfaccl 16037 |
. . . . . . . . . . . 12
⊢ ((𝐵 ∈ ℂ ∧ (𝑁 + 1) ∈
ℕ0) → (𝐵 FallFac (𝑁 + 1)) ∈ ℂ) |
| 128 | 10, 112, 127 | syl2anc 584 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝐵 FallFac (𝑁 + 1)) ∈ ℂ) |
| 129 | 126, 128 | mulcld 11260 |
. . . . . . . . . 10
⊢ (𝜑 → ((𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) · (𝐵 FallFac (𝑁 + 1))) ∈ ℂ) |
| 130 | 129 | mul02d 11438 |
. . . . . . . . 9
⊢ (𝜑 → (0 · ((𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) · (𝐵 FallFac (𝑁 + 1)))) = 0) |
| 131 | 119, 130 | eqtrd 2771 |
. . . . . . . 8
⊢ (𝜑 → ((𝑁C(𝑁 + 1)) · ((𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) · (𝐵 FallFac (𝑁 + 1)))) = 0) |
| 132 | 131 | oveq2d 7426 |
. . . . . . 7
⊢ (𝜑 → (Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C(𝑁 + 1)) · ((𝐴 FallFac ((𝑁 + 1) − (𝑁 + 1))) · (𝐵 FallFac (𝑁 + 1))))) = (Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + 0)) |
| 133 | 60, 103 | syldan 591 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) ∈ ℂ) |
| 134 | 79, 133 | fsumcl 15754 |
. . . . . . . 8
⊢ (𝜑 → Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) ∈ ℂ) |
| 135 | 134 | addridd 11440 |
. . . . . . 7
⊢ (𝜑 → (Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + 0) = Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)))) |
| 136 | 110, 132,
135 | 3eqtrd 2775 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (0...(𝑁 + 1))((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)))) |
| 137 | 112, 101 | eleqtrdi 2845 |
. . . . . . . 8
⊢ (𝜑 → (𝑁 + 1) ∈
(ℤ≥‘0)) |
| 138 | 94, 97 | mulcld 11260 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (0...(𝑁 + 1))) → ((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) ∈ ℂ) |
| 139 | | oveq1 7417 |
. . . . . . . . . . 11
⊢ (𝑘 = 0 → (𝑘 − 1) = (0 − 1)) |
| 140 | | df-neg 11474 |
. . . . . . . . . . 11
⊢ -1 = (0
− 1) |
| 141 | 139, 140 | eqtr4di 2789 |
. . . . . . . . . 10
⊢ (𝑘 = 0 → (𝑘 − 1) = -1) |
| 142 | 141 | oveq2d 7426 |
. . . . . . . . 9
⊢ (𝑘 = 0 → (𝑁C(𝑘 − 1)) = (𝑁C-1)) |
| 143 | | oveq2 7418 |
. . . . . . . . . . 11
⊢ (𝑘 = 0 → ((𝑁 + 1) − 𝑘) = ((𝑁 + 1) − 0)) |
| 144 | 143 | oveq2d 7426 |
. . . . . . . . . 10
⊢ (𝑘 = 0 → (𝐴 FallFac ((𝑁 + 1) − 𝑘)) = (𝐴 FallFac ((𝑁 + 1) − 0))) |
| 145 | | oveq2 7418 |
. . . . . . . . . 10
⊢ (𝑘 = 0 → (𝐵 FallFac 𝑘) = (𝐵 FallFac 0)) |
| 146 | 144, 145 | oveq12d 7428 |
. . . . . . . . 9
⊢ (𝑘 = 0 → ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)) = ((𝐴 FallFac ((𝑁 + 1) − 0)) · (𝐵 FallFac 0))) |
| 147 | 142, 146 | oveq12d 7428 |
. . . . . . . 8
⊢ (𝑘 = 0 → ((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = ((𝑁C-1) · ((𝐴 FallFac ((𝑁 + 1) − 0)) · (𝐵 FallFac 0)))) |
| 148 | 137, 138,
147 | fsum1p 15774 |
. . . . . . 7
⊢ (𝜑 → Σ𝑘 ∈ (0...(𝑁 + 1))((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = (((𝑁C-1) · ((𝐴 FallFac ((𝑁 + 1) − 0)) · (𝐵 FallFac 0))) + Σ𝑘 ∈ ((0 + 1)...(𝑁 + 1))((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))))) |
| 149 | | neg1z 12633 |
. . . . . . . . . . . 12
⊢ -1 ∈
ℤ |
| 150 | | neg1lt0 12362 |
. . . . . . . . . . . . 13
⊢ -1 <
0 |
| 151 | 150 | orci 865 |
. . . . . . . . . . . 12
⊢ (-1 <
0 ∨ 𝑁 <
-1) |
| 152 | | bcval4 14330 |
. . . . . . . . . . . 12
⊢ ((𝑁 ∈ ℕ0
∧ -1 ∈ ℤ ∧ (-1 < 0 ∨ 𝑁 < -1)) → (𝑁C-1) = 0) |
| 153 | 149, 151,
152 | mp3an23 1455 |
. . . . . . . . . . 11
⊢ (𝑁 ∈ ℕ0
→ (𝑁C-1) =
0) |
| 154 | 1, 153 | syl 17 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑁C-1) = 0) |
| 155 | 154 | oveq1d 7425 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑁C-1) · ((𝐴 FallFac ((𝑁 + 1) − 0)) · (𝐵 FallFac 0))) = (0 ·
((𝐴 FallFac ((𝑁 + 1) − 0)) ·
(𝐵 FallFac
0)))) |
| 156 | 120 | subid1d 11588 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((𝑁 + 1) − 0) = (𝑁 + 1)) |
| 157 | 156 | oveq2d 7426 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝐴 FallFac ((𝑁 + 1) − 0)) = (𝐴 FallFac (𝑁 + 1))) |
| 158 | | fallfaccl 16037 |
. . . . . . . . . . . . 13
⊢ ((𝐴 ∈ ℂ ∧ (𝑁 + 1) ∈
ℕ0) → (𝐴 FallFac (𝑁 + 1)) ∈ ℂ) |
| 159 | 6, 112, 158 | syl2anc 584 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝐴 FallFac (𝑁 + 1)) ∈ ℂ) |
| 160 | 157, 159 | eqeltrd 2835 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝐴 FallFac ((𝑁 + 1) − 0)) ∈
ℂ) |
| 161 | | fallfaccl 16037 |
. . . . . . . . . . . 12
⊢ ((𝐵 ∈ ℂ ∧ 0 ∈
ℕ0) → (𝐵 FallFac 0) ∈ ℂ) |
| 162 | 10, 123, 161 | sylancl 586 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝐵 FallFac 0) ∈ ℂ) |
| 163 | 160, 162 | mulcld 11260 |
. . . . . . . . . 10
⊢ (𝜑 → ((𝐴 FallFac ((𝑁 + 1) − 0)) · (𝐵 FallFac 0)) ∈
ℂ) |
| 164 | 163 | mul02d 11438 |
. . . . . . . . 9
⊢ (𝜑 → (0 · ((𝐴 FallFac ((𝑁 + 1) − 0)) · (𝐵 FallFac 0))) =
0) |
| 165 | 155, 164 | eqtrd 2771 |
. . . . . . . 8
⊢ (𝜑 → ((𝑁C-1) · ((𝐴 FallFac ((𝑁 + 1) − 0)) · (𝐵 FallFac 0))) =
0) |
| 166 | | 1zzd 12628 |
. . . . . . . . . . 11
⊢ (𝜑 → 1 ∈
ℤ) |
| 167 | | 0zd 12605 |
. . . . . . . . . . 11
⊢ (𝜑 → 0 ∈
ℤ) |
| 168 | 6, 10, 1 | binomfallfaclem1 16060 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑗 ∈ (0...𝑁)) → ((𝑁C𝑗) · ((𝐴 FallFac (𝑁 − 𝑗)) · (𝐵 FallFac (𝑗 + 1)))) ∈ ℂ) |
| 169 | | oveq2 7418 |
. . . . . . . . . . . 12
⊢ (𝑗 = (𝑘 − 1) → (𝑁C𝑗) = (𝑁C(𝑘 − 1))) |
| 170 | | oveq2 7418 |
. . . . . . . . . . . . . 14
⊢ (𝑗 = (𝑘 − 1) → (𝑁 − 𝑗) = (𝑁 − (𝑘 − 1))) |
| 171 | 170 | oveq2d 7426 |
. . . . . . . . . . . . 13
⊢ (𝑗 = (𝑘 − 1) → (𝐴 FallFac (𝑁 − 𝑗)) = (𝐴 FallFac (𝑁 − (𝑘 − 1)))) |
| 172 | | oveq1 7417 |
. . . . . . . . . . . . . 14
⊢ (𝑗 = (𝑘 − 1) → (𝑗 + 1) = ((𝑘 − 1) + 1)) |
| 173 | 172 | oveq2d 7426 |
. . . . . . . . . . . . 13
⊢ (𝑗 = (𝑘 − 1) → (𝐵 FallFac (𝑗 + 1)) = (𝐵 FallFac ((𝑘 − 1) + 1))) |
| 174 | 171, 173 | oveq12d 7428 |
. . . . . . . . . . . 12
⊢ (𝑗 = (𝑘 − 1) → ((𝐴 FallFac (𝑁 − 𝑗)) · (𝐵 FallFac (𝑗 + 1))) = ((𝐴 FallFac (𝑁 − (𝑘 − 1))) · (𝐵 FallFac ((𝑘 − 1) + 1)))) |
| 175 | 169, 174 | oveq12d 7428 |
. . . . . . . . . . 11
⊢ (𝑗 = (𝑘 − 1) → ((𝑁C𝑗) · ((𝐴 FallFac (𝑁 − 𝑗)) · (𝐵 FallFac (𝑗 + 1)))) = ((𝑁C(𝑘 − 1)) · ((𝐴 FallFac (𝑁 − (𝑘 − 1))) · (𝐵 FallFac ((𝑘 − 1) + 1))))) |
| 176 | 166, 167,
55, 168, 175 | fsumshft 15801 |
. . . . . . . . . 10
⊢ (𝜑 → Σ𝑗 ∈ (0...𝑁)((𝑁C𝑗) · ((𝐴 FallFac (𝑁 − 𝑗)) · (𝐵 FallFac (𝑗 + 1)))) = Σ𝑘 ∈ ((0 + 1)...(𝑁 + 1))((𝑁C(𝑘 − 1)) · ((𝐴 FallFac (𝑁 − (𝑘 − 1))) · (𝐵 FallFac ((𝑘 − 1) + 1))))) |
| 177 | 16 | adantr 480 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑘 ∈ ((0 + 1)...(𝑁 + 1))) → 𝑁 ∈ ℂ) |
| 178 | | elfzelz 13546 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑘 ∈ ((0 + 1)...(𝑁 + 1)) → 𝑘 ∈ ℤ) |
| 179 | 178 | adantl 481 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑘 ∈ ((0 + 1)...(𝑁 + 1))) → 𝑘 ∈ ℤ) |
| 180 | 179 | zcnd 12703 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑘 ∈ ((0 + 1)...(𝑁 + 1))) → 𝑘 ∈ ℂ) |
| 181 | | 1cnd 11235 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑘 ∈ ((0 + 1)...(𝑁 + 1))) → 1 ∈
ℂ) |
| 182 | 177, 180,
181 | subsub3d 11629 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑘 ∈ ((0 + 1)...(𝑁 + 1))) → (𝑁 − (𝑘 − 1)) = ((𝑁 + 1) − 𝑘)) |
| 183 | 182 | oveq2d 7426 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑘 ∈ ((0 + 1)...(𝑁 + 1))) → (𝐴 FallFac (𝑁 − (𝑘 − 1))) = (𝐴 FallFac ((𝑁 + 1) − 𝑘))) |
| 184 | 180, 181 | npcand 11603 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑘 ∈ ((0 + 1)...(𝑁 + 1))) → ((𝑘 − 1) + 1) = 𝑘) |
| 185 | 184 | oveq2d 7426 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑘 ∈ ((0 + 1)...(𝑁 + 1))) → (𝐵 FallFac ((𝑘 − 1) + 1)) = (𝐵 FallFac 𝑘)) |
| 186 | 183, 185 | oveq12d 7428 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑘 ∈ ((0 + 1)...(𝑁 + 1))) → ((𝐴 FallFac (𝑁 − (𝑘 − 1))) · (𝐵 FallFac ((𝑘 − 1) + 1))) = ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) |
| 187 | 186 | oveq2d 7426 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑘 ∈ ((0 + 1)...(𝑁 + 1))) → ((𝑁C(𝑘 − 1)) · ((𝐴 FallFac (𝑁 − (𝑘 − 1))) · (𝐵 FallFac ((𝑘 − 1) + 1)))) = ((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)))) |
| 188 | 187 | sumeq2dv 15723 |
. . . . . . . . . 10
⊢ (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 + 1))((𝑁C(𝑘 − 1)) · ((𝐴 FallFac (𝑁 − (𝑘 − 1))) · (𝐵 FallFac ((𝑘 − 1) + 1)))) = Σ𝑘 ∈ ((0 + 1)...(𝑁 + 1))((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)))) |
| 189 | 176, 188 | eqtr2d 2772 |
. . . . . . . . 9
⊢ (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 + 1))((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = Σ𝑗 ∈ (0...𝑁)((𝑁C𝑗) · ((𝐴 FallFac (𝑁 − 𝑗)) · (𝐵 FallFac (𝑗 + 1))))) |
| 190 | | oveq2 7418 |
. . . . . . . . . . 11
⊢ (𝑘 = 𝑗 → (𝑁C𝑘) = (𝑁C𝑗)) |
| 191 | | oveq2 7418 |
. . . . . . . . . . . . 13
⊢ (𝑘 = 𝑗 → (𝑁 − 𝑘) = (𝑁 − 𝑗)) |
| 192 | 191 | oveq2d 7426 |
. . . . . . . . . . . 12
⊢ (𝑘 = 𝑗 → (𝐴 FallFac (𝑁 − 𝑘)) = (𝐴 FallFac (𝑁 − 𝑗))) |
| 193 | | oveq1 7417 |
. . . . . . . . . . . . 13
⊢ (𝑘 = 𝑗 → (𝑘 + 1) = (𝑗 + 1)) |
| 194 | 193 | oveq2d 7426 |
. . . . . . . . . . . 12
⊢ (𝑘 = 𝑗 → (𝐵 FallFac (𝑘 + 1)) = (𝐵 FallFac (𝑗 + 1))) |
| 195 | 192, 194 | oveq12d 7428 |
. . . . . . . . . . 11
⊢ (𝑘 = 𝑗 → ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))) = ((𝐴 FallFac (𝑁 − 𝑗)) · (𝐵 FallFac (𝑗 + 1)))) |
| 196 | 190, 195 | oveq12d 7428 |
. . . . . . . . . 10
⊢ (𝑘 = 𝑗 → ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))) = ((𝑁C𝑗) · ((𝐴 FallFac (𝑁 − 𝑗)) · (𝐵 FallFac (𝑗 + 1))))) |
| 197 | 196 | cbvsumv 15717 |
. . . . . . . . 9
⊢
Σ𝑘 ∈
(0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))) = Σ𝑗 ∈ (0...𝑁)((𝑁C𝑗) · ((𝐴 FallFac (𝑁 − 𝑗)) · (𝐵 FallFac (𝑗 + 1)))) |
| 198 | 189, 197 | eqtr4di 2789 |
. . . . . . . 8
⊢ (𝜑 → Σ𝑘 ∈ ((0 + 1)...(𝑁 + 1))((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))))) |
| 199 | 165, 198 | oveq12d 7428 |
. . . . . . 7
⊢ (𝜑 → (((𝑁C-1) · ((𝐴 FallFac ((𝑁 + 1) − 0)) · (𝐵 FallFac 0))) + Σ𝑘 ∈ ((0 + 1)...(𝑁 + 1))((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)))) = (0 + Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))))) |
| 200 | 6, 10, 1 | binomfallfaclem1 16060 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ (0...𝑁)) → ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))) ∈ ℂ) |
| 201 | 79, 200 | fsumcl 15754 |
. . . . . . . 8
⊢ (𝜑 → Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))) ∈ ℂ) |
| 202 | 201 | addlidd 11441 |
. . . . . . 7
⊢ (𝜑 → (0 + Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))))) = Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))))) |
| 203 | 148, 199,
202 | 3eqtrd 2775 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (0...(𝑁 + 1))((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))))) |
| 204 | 136, 203 | oveq12d 7428 |
. . . . 5
⊢ (𝜑 → (Σ𝑘 ∈ (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 13996 |
. . . . . 6
⊢ (𝜑 → (0...(𝑁 + 1)) ∈ Fin) |
| 206 | 205, 103,
138 | fsumadd 15761 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (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 15761 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1))))) = (Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + Σ𝑘 ∈ (0...𝑁)((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))))) |
| 208 | 204, 206,
207 | 3eqtr4d 2781 |
. . . 4
⊢ (𝜑 → Σ𝑘 ∈ (0...(𝑁 + 1))(((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C(𝑘 − 1)) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)))) = Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))))) |
| 209 | 100, 208 | eqtrd 2771 |
. . 3
⊢ (𝜑 → Σ𝑘 ∈ (0...(𝑁 + 1))(((𝑁 + 1)C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))))) |
| 210 | 209 | adantr 480 |
. 2
⊢ ((𝜑 ∧ 𝜓) → Σ𝑘 ∈ (0...(𝑁 + 1))(((𝑁 + 1)C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) = Σ𝑘 ∈ (0...𝑁)(((𝑁C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘))) + ((𝑁C𝑘) · ((𝐴 FallFac (𝑁 − 𝑘)) · (𝐵 FallFac (𝑘 + 1)))))) |
| 211 | 74, 83, 210 | 3eqtr4d 2781 |
1
⊢ ((𝜑 ∧ 𝜓) → ((𝐴 + 𝐵) FallFac (𝑁 + 1)) = Σ𝑘 ∈ (0...(𝑁 + 1))(((𝑁 + 1)C𝑘) · ((𝐴 FallFac ((𝑁 + 1) − 𝑘)) · (𝐵 FallFac 𝑘)))) |