Step | Hyp | Ref
| Expression |
1 | | 2nn 9039 |
. . 3
⊢ 2 ∈
ℕ |
2 | | bcval5 10697 |
. . 3
⊢ ((𝑁 ∈ ℕ0
∧ 2 ∈ ℕ) → (𝑁C2) = ((seq((𝑁 − 2) + 1)( · , I )‘𝑁) /
(!‘2))) |
3 | 1, 2 | mpan2 423 |
. 2
⊢ (𝑁 ∈ ℕ0
→ (𝑁C2) = ((seq((𝑁 − 2) + 1)( · , I
)‘𝑁) /
(!‘2))) |
4 | | 2m1e1 8996 |
. . . . . . . 8
⊢ (2
− 1) = 1 |
5 | 4 | oveq2i 5864 |
. . . . . . 7
⊢ ((𝑁 − 2) + (2 − 1)) =
((𝑁 − 2) +
1) |
6 | | nn0cn 9145 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ0
→ 𝑁 ∈
ℂ) |
7 | | 2cn 8949 |
. . . . . . . . 9
⊢ 2 ∈
ℂ |
8 | | ax-1cn 7867 |
. . . . . . . . 9
⊢ 1 ∈
ℂ |
9 | | npncan 8140 |
. . . . . . . . 9
⊢ ((𝑁 ∈ ℂ ∧ 2 ∈
ℂ ∧ 1 ∈ ℂ) → ((𝑁 − 2) + (2 − 1)) = (𝑁 − 1)) |
10 | 7, 8, 9 | mp3an23 1324 |
. . . . . . . 8
⊢ (𝑁 ∈ ℂ → ((𝑁 − 2) + (2 − 1)) =
(𝑁 −
1)) |
11 | 6, 10 | syl 14 |
. . . . . . 7
⊢ (𝑁 ∈ ℕ0
→ ((𝑁 − 2) + (2
− 1)) = (𝑁 −
1)) |
12 | 5, 11 | eqtr3id 2217 |
. . . . . 6
⊢ (𝑁 ∈ ℕ0
→ ((𝑁 − 2) + 1)
= (𝑁 −
1)) |
13 | 12 | seqeq1d 10407 |
. . . . 5
⊢ (𝑁 ∈ ℕ0
→ seq((𝑁 − 2) +
1)( · , I ) = seq(𝑁
− 1)( · , I )) |
14 | 13 | fveq1d 5498 |
. . . 4
⊢ (𝑁 ∈ ℕ0
→ (seq((𝑁 − 2) +
1)( · , I )‘𝑁)
= (seq(𝑁 − 1)(
· , I )‘𝑁)) |
15 | | nn0z 9232 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ0
→ 𝑁 ∈
ℤ) |
16 | | peano2zm 9250 |
. . . . . . . 8
⊢ (𝑁 ∈ ℤ → (𝑁 − 1) ∈
ℤ) |
17 | 15, 16 | syl 14 |
. . . . . . 7
⊢ (𝑁 ∈ ℕ0
→ (𝑁 − 1) ∈
ℤ) |
18 | | uzid 9501 |
. . . . . . . . 9
⊢ (𝑁 ∈ ℤ → 𝑁 ∈
(ℤ≥‘𝑁)) |
19 | 15, 18 | syl 14 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ0
→ 𝑁 ∈
(ℤ≥‘𝑁)) |
20 | | npcan 8128 |
. . . . . . . . . 10
⊢ ((𝑁 ∈ ℂ ∧ 1 ∈
ℂ) → ((𝑁 −
1) + 1) = 𝑁) |
21 | 6, 8, 20 | sylancl 411 |
. . . . . . . . 9
⊢ (𝑁 ∈ ℕ0
→ ((𝑁 − 1) + 1)
= 𝑁) |
22 | 21 | fveq2d 5500 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ0
→ (ℤ≥‘((𝑁 − 1) + 1)) =
(ℤ≥‘𝑁)) |
23 | 19, 22 | eleqtrrd 2250 |
. . . . . . 7
⊢ (𝑁 ∈ ℕ0
→ 𝑁 ∈
(ℤ≥‘((𝑁 − 1) + 1))) |
24 | | eluzelcn 9498 |
. . . . . . . . 9
⊢ (𝑥 ∈
(ℤ≥‘(𝑁 − 1)) → 𝑥 ∈ ℂ) |
25 | 24 | adantl 275 |
. . . . . . . 8
⊢ ((𝑁 ∈ ℕ0
∧ 𝑥 ∈
(ℤ≥‘(𝑁 − 1))) → 𝑥 ∈ ℂ) |
26 | | fvi 5553 |
. . . . . . . . . 10
⊢ (𝑥 ∈ ℂ → ( I
‘𝑥) = 𝑥) |
27 | 26 | eleq1d 2239 |
. . . . . . . . 9
⊢ (𝑥 ∈ ℂ → (( I
‘𝑥) ∈ ℂ
↔ 𝑥 ∈
ℂ)) |
28 | 27 | ibir 176 |
. . . . . . . 8
⊢ (𝑥 ∈ ℂ → ( I
‘𝑥) ∈
ℂ) |
29 | 25, 28 | syl 14 |
. . . . . . 7
⊢ ((𝑁 ∈ ℕ0
∧ 𝑥 ∈
(ℤ≥‘(𝑁 − 1))) → ( I ‘𝑥) ∈
ℂ) |
30 | | mulcl 7901 |
. . . . . . . 8
⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (𝑥 · 𝑦) ∈ ℂ) |
31 | 30 | adantl 275 |
. . . . . . 7
⊢ ((𝑁 ∈ ℕ0
∧ (𝑥 ∈ ℂ
∧ 𝑦 ∈ ℂ))
→ (𝑥 · 𝑦) ∈
ℂ) |
32 | 17, 23, 29, 31 | seq3m1 10424 |
. . . . . 6
⊢ (𝑁 ∈ ℕ0
→ (seq(𝑁 − 1)(
· , I )‘𝑁) =
((seq(𝑁 − 1)(
· , I )‘(𝑁
− 1)) · ( I ‘𝑁))) |
33 | 17, 29, 31 | seq3-1 10416 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ0
→ (seq(𝑁 − 1)(
· , I )‘(𝑁
− 1)) = ( I ‘(𝑁
− 1))) |
34 | | fvi 5553 |
. . . . . . . . 9
⊢ ((𝑁 − 1) ∈ ℤ
→ ( I ‘(𝑁
− 1)) = (𝑁 −
1)) |
35 | 17, 34 | syl 14 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ0
→ ( I ‘(𝑁
− 1)) = (𝑁 −
1)) |
36 | 33, 35 | eqtrd 2203 |
. . . . . . 7
⊢ (𝑁 ∈ ℕ0
→ (seq(𝑁 − 1)(
· , I )‘(𝑁
− 1)) = (𝑁 −
1)) |
37 | | fvi 5553 |
. . . . . . 7
⊢ (𝑁 ∈ ℕ0
→ ( I ‘𝑁) =
𝑁) |
38 | 36, 37 | oveq12d 5871 |
. . . . . 6
⊢ (𝑁 ∈ ℕ0
→ ((seq(𝑁 − 1)(
· , I )‘(𝑁
− 1)) · ( I ‘𝑁)) = ((𝑁 − 1) · 𝑁)) |
39 | 32, 38 | eqtrd 2203 |
. . . . 5
⊢ (𝑁 ∈ ℕ0
→ (seq(𝑁 − 1)(
· , I )‘𝑁) =
((𝑁 − 1) ·
𝑁)) |
40 | | subcl 8118 |
. . . . . . 7
⊢ ((𝑁 ∈ ℂ ∧ 1 ∈
ℂ) → (𝑁 −
1) ∈ ℂ) |
41 | 6, 8, 40 | sylancl 411 |
. . . . . 6
⊢ (𝑁 ∈ ℕ0
→ (𝑁 − 1) ∈
ℂ) |
42 | 41, 6 | mulcomd 7941 |
. . . . 5
⊢ (𝑁 ∈ ℕ0
→ ((𝑁 − 1)
· 𝑁) = (𝑁 · (𝑁 − 1))) |
43 | 39, 42 | eqtrd 2203 |
. . . 4
⊢ (𝑁 ∈ ℕ0
→ (seq(𝑁 − 1)(
· , I )‘𝑁) =
(𝑁 · (𝑁 − 1))) |
44 | 14, 43 | eqtrd 2203 |
. . 3
⊢ (𝑁 ∈ ℕ0
→ (seq((𝑁 − 2) +
1)( · , I )‘𝑁)
= (𝑁 · (𝑁 − 1))) |
45 | | fac2 10665 |
. . . 4
⊢
(!‘2) = 2 |
46 | 45 | a1i 9 |
. . 3
⊢ (𝑁 ∈ ℕ0
→ (!‘2) = 2) |
47 | 44, 46 | oveq12d 5871 |
. 2
⊢ (𝑁 ∈ ℕ0
→ ((seq((𝑁 − 2)
+ 1)( · , I )‘𝑁) / (!‘2)) = ((𝑁 · (𝑁 − 1)) / 2)) |
48 | 3, 47 | eqtrd 2203 |
1
⊢ (𝑁 ∈ ℕ0
→ (𝑁C2) = ((𝑁 · (𝑁 − 1)) / 2)) |