Proof of Theorem fsumrev
| Step | Hyp | Ref
| Expression |
| 1 | | fsumrev.5 |
. 2
⊢ (𝑗 = (𝐾 − 𝑘) → 𝐴 = 𝐵) |
| 2 | | fzfid 12772 |
. 2
⊢ (𝜑 → ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∈ Fin) |
| 3 | | ovex 6678 |
. . . . 5
⊢ (𝐾 − 𝑗) ∈ V |
| 4 | | eqid 2622 |
. . . . 5
⊢ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)) = (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)) |
| 5 | 3, 4 | fnmpti 6022 |
. . . 4
⊢ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)) Fn ((𝐾 − 𝑁)...(𝐾 − 𝑀)) |
| 6 | 5 | a1i 11 |
. . 3
⊢ (𝜑 → (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)) Fn ((𝐾 − 𝑁)...(𝐾 − 𝑀))) |
| 7 | | ovex 6678 |
. . . . 5
⊢ (𝐾 − 𝑘) ∈ V |
| 8 | | eqid 2622 |
. . . . 5
⊢ (𝑘 ∈ (𝑀...𝑁) ↦ (𝐾 − 𝑘)) = (𝑘 ∈ (𝑀...𝑁) ↦ (𝐾 − 𝑘)) |
| 9 | 7, 8 | fnmpti 6022 |
. . . 4
⊢ (𝑘 ∈ (𝑀...𝑁) ↦ (𝐾 − 𝑘)) Fn (𝑀...𝑁) |
| 10 | | simprr 796 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → 𝑘 = (𝐾 − 𝑗)) |
| 11 | | simprl 794 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → 𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀))) |
| 12 | | fsumrev.2 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑀 ∈ ℤ) |
| 13 | 12 | adantr 481 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → 𝑀 ∈ ℤ) |
| 14 | | fsumrev.3 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑁 ∈ ℤ) |
| 15 | 14 | adantr 481 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → 𝑁 ∈ ℤ) |
| 16 | | fsumrev.1 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐾 ∈ ℤ) |
| 17 | 16 | adantr 481 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → 𝐾 ∈ ℤ) |
| 18 | | elfzelz 12342 |
. . . . . . . . . . . 12
⊢ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) → 𝑗 ∈ ℤ) |
| 19 | 11, 18 | syl 17 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → 𝑗 ∈ ℤ) |
| 20 | | fzrev 12403 |
. . . . . . . . . . 11
⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 ∈ ℤ ∧ 𝑗 ∈ ℤ)) → (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↔ (𝐾 − 𝑗) ∈ (𝑀...𝑁))) |
| 21 | 13, 15, 17, 19, 20 | syl22anc 1327 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↔ (𝐾 − 𝑗) ∈ (𝑀...𝑁))) |
| 22 | 11, 21 | mpbid 222 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → (𝐾 − 𝑗) ∈ (𝑀...𝑁)) |
| 23 | 10, 22 | eqeltrd 2701 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → 𝑘 ∈ (𝑀...𝑁)) |
| 24 | 10 | oveq2d 6666 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → (𝐾 − 𝑘) = (𝐾 − (𝐾 − 𝑗))) |
| 25 | | zcn 11382 |
. . . . . . . . . . 11
⊢ (𝐾 ∈ ℤ → 𝐾 ∈
ℂ) |
| 26 | | zcn 11382 |
. . . . . . . . . . 11
⊢ (𝑗 ∈ ℤ → 𝑗 ∈
ℂ) |
| 27 | | nncan 10310 |
. . . . . . . . . . 11
⊢ ((𝐾 ∈ ℂ ∧ 𝑗 ∈ ℂ) → (𝐾 − (𝐾 − 𝑗)) = 𝑗) |
| 28 | 25, 26, 27 | syl2an 494 |
. . . . . . . . . 10
⊢ ((𝐾 ∈ ℤ ∧ 𝑗 ∈ ℤ) → (𝐾 − (𝐾 − 𝑗)) = 𝑗) |
| 29 | 17, 19, 28 | syl2anc 693 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → (𝐾 − (𝐾 − 𝑗)) = 𝑗) |
| 30 | 24, 29 | eqtr2d 2657 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → 𝑗 = (𝐾 − 𝑘)) |
| 31 | 23, 30 | jca 554 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) → (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) |
| 32 | | simprr 796 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → 𝑗 = (𝐾 − 𝑘)) |
| 33 | | simprl 794 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → 𝑘 ∈ (𝑀...𝑁)) |
| 34 | 12 | adantr 481 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → 𝑀 ∈ ℤ) |
| 35 | 14 | adantr 481 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → 𝑁 ∈ ℤ) |
| 36 | 16 | adantr 481 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → 𝐾 ∈ ℤ) |
| 37 | | elfzelz 12342 |
. . . . . . . . . . . 12
⊢ (𝑘 ∈ (𝑀...𝑁) → 𝑘 ∈ ℤ) |
| 38 | 33, 37 | syl 17 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → 𝑘 ∈ ℤ) |
| 39 | | fzrev2 12404 |
. . . . . . . . . . 11
⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 ∈ ℤ ∧ 𝑘 ∈ ℤ)) → (𝑘 ∈ (𝑀...𝑁) ↔ (𝐾 − 𝑘) ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)))) |
| 40 | 34, 35, 36, 38, 39 | syl22anc 1327 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → (𝑘 ∈ (𝑀...𝑁) ↔ (𝐾 − 𝑘) ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)))) |
| 41 | 33, 40 | mpbid 222 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → (𝐾 − 𝑘) ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀))) |
| 42 | 32, 41 | eqeltrd 2701 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → 𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀))) |
| 43 | 32 | oveq2d 6666 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → (𝐾 − 𝑗) = (𝐾 − (𝐾 − 𝑘))) |
| 44 | | zcn 11382 |
. . . . . . . . . . 11
⊢ (𝑘 ∈ ℤ → 𝑘 ∈
ℂ) |
| 45 | | nncan 10310 |
. . . . . . . . . . 11
⊢ ((𝐾 ∈ ℂ ∧ 𝑘 ∈ ℂ) → (𝐾 − (𝐾 − 𝑘)) = 𝑘) |
| 46 | 25, 44, 45 | syl2an 494 |
. . . . . . . . . 10
⊢ ((𝐾 ∈ ℤ ∧ 𝑘 ∈ ℤ) → (𝐾 − (𝐾 − 𝑘)) = 𝑘) |
| 47 | 36, 38, 46 | syl2anc 693 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → (𝐾 − (𝐾 − 𝑘)) = 𝑘) |
| 48 | 43, 47 | eqtr2d 2657 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → 𝑘 = (𝐾 − 𝑗)) |
| 49 | 42, 48 | jca 554 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘))) → (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗))) |
| 50 | 31, 49 | impbida 877 |
. . . . . 6
⊢ (𝜑 → ((𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ 𝑘 = (𝐾 − 𝑗)) ↔ (𝑘 ∈ (𝑀...𝑁) ∧ 𝑗 = (𝐾 − 𝑘)))) |
| 51 | 50 | mptcnv 5534 |
. . . . 5
⊢ (𝜑 → ◡(𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)) = (𝑘 ∈ (𝑀...𝑁) ↦ (𝐾 − 𝑘))) |
| 52 | 51 | fneq1d 5981 |
. . . 4
⊢ (𝜑 → (◡(𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)) Fn (𝑀...𝑁) ↔ (𝑘 ∈ (𝑀...𝑁) ↦ (𝐾 − 𝑘)) Fn (𝑀...𝑁))) |
| 53 | 9, 52 | mpbiri 248 |
. . 3
⊢ (𝜑 → ◡(𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)) Fn (𝑀...𝑁)) |
| 54 | | dff1o4 6145 |
. . 3
⊢ ((𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)):((𝐾 − 𝑁)...(𝐾 − 𝑀))–1-1-onto→(𝑀...𝑁) ↔ ((𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)) Fn ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ∧ ◡(𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)) Fn (𝑀...𝑁))) |
| 55 | 6, 53, 54 | sylanbrc 698 |
. 2
⊢ (𝜑 → (𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗)):((𝐾 − 𝑁)...(𝐾 − 𝑀))–1-1-onto→(𝑀...𝑁)) |
| 56 | | oveq2 6658 |
. . . 4
⊢ (𝑗 = 𝑘 → (𝐾 − 𝑗) = (𝐾 − 𝑘)) |
| 57 | 56, 4, 7 | fvmpt 6282 |
. . 3
⊢ (𝑘 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) → ((𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗))‘𝑘) = (𝐾 − 𝑘)) |
| 58 | 57 | adantl 482 |
. 2
⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀))) → ((𝑗 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀)) ↦ (𝐾 − 𝑗))‘𝑘) = (𝐾 − 𝑘)) |
| 59 | | fsumrev.4 |
. 2
⊢ ((𝜑 ∧ 𝑗 ∈ (𝑀...𝑁)) → 𝐴 ∈ ℂ) |
| 60 | 1, 2, 55, 58, 59 | fsumf1o 14454 |
1
⊢ (𝜑 → Σ𝑗 ∈ (𝑀...𝑁)𝐴 = Σ𝑘 ∈ ((𝐾 − 𝑁)...(𝐾 − 𝑀))𝐵) |