| Step | Hyp | Ref
| Expression |
| 1 | | gsumgfsum.b |
. . . 4
⊢ 𝐵 = (Base‘𝐺) |
| 2 | | gsumgfsum.g |
. . . . 5
⊢ (𝜑 → 𝐺 ∈ CMnd) |
| 3 | 2 | adantr 276 |
. . . 4
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → 𝐺 ∈ CMnd) |
| 4 | | gsumgfsum.m |
. . . . . 6
⊢ (𝜑 → 𝑀 ∈ ℤ) |
| 5 | 4 | adantr 276 |
. . . . 5
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → 𝑀 ∈ ℤ) |
| 6 | | gsumgfsum.n |
. . . . . 6
⊢ (𝜑 → 𝑁 ∈ ℤ) |
| 7 | 6 | adantr 276 |
. . . . 5
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → 𝑁 ∈ ℤ) |
| 8 | | simpr 110 |
. . . . 5
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → 𝑀 ≤ 𝑁) |
| 9 | | eluz2 9754 |
. . . . 5
⊢ (𝑁 ∈
(ℤ≥‘𝑀) ↔ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝑀 ≤ 𝑁)) |
| 10 | 5, 7, 8, 9 | syl3anbrc 1205 |
. . . 4
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → 𝑁 ∈ (ℤ≥‘𝑀)) |
| 11 | | gsumgfsum.f |
. . . . 5
⊢ (𝜑 → 𝐹:(𝑀...𝑁)⟶𝐵) |
| 12 | 11 | adantr 276 |
. . . 4
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → 𝐹:(𝑀...𝑁)⟶𝐵) |
| 13 | | eqid 2229 |
. . . 4
⊢ (𝑗 ∈ (1...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀))) = (𝑗 ∈ (1...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀))) |
| 14 | 1, 3, 10, 12, 13 | gsumgfsumlem 16633 |
. . 3
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (𝐺 Σg 𝐹) = (𝐺 Σg (𝐹 ∘ (𝑗 ∈ (1...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀)))))) |
| 15 | 4, 6 | fzfigd 10686 |
. . . . 5
⊢ (𝜑 → (𝑀...𝑁) ∈ Fin) |
| 16 | 15 | adantr 276 |
. . . 4
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (𝑀...𝑁) ∈ Fin) |
| 17 | | 1zzd 9499 |
. . . . . . . 8
⊢ (𝜑 → 1 ∈
ℤ) |
| 18 | 17, 4 | zsubcld 9600 |
. . . . . . 7
⊢ (𝜑 → (1 − 𝑀) ∈
ℤ) |
| 19 | 18, 4, 6 | mptfzshft 11996 |
. . . . . 6
⊢ (𝜑 → (𝑗 ∈ ((𝑀 + (1 − 𝑀))...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀))):((𝑀 + (1 − 𝑀))...(𝑁 + (1 − 𝑀)))–1-1-onto→(𝑀...𝑁)) |
| 20 | 19 | adantr 276 |
. . . . 5
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (𝑗 ∈ ((𝑀 + (1 − 𝑀))...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀))):((𝑀 + (1 − 𝑀))...(𝑁 + (1 − 𝑀)))–1-1-onto→(𝑀...𝑁)) |
| 21 | 4 | zcnd 9596 |
. . . . . . . . . 10
⊢ (𝜑 → 𝑀 ∈ ℂ) |
| 22 | | 1cnd 8188 |
. . . . . . . . . 10
⊢ (𝜑 → 1 ∈
ℂ) |
| 23 | 21, 22 | pncan3d 8486 |
. . . . . . . . 9
⊢ (𝜑 → (𝑀 + (1 − 𝑀)) = 1) |
| 24 | 23 | oveq1d 6028 |
. . . . . . . 8
⊢ (𝜑 → ((𝑀 + (1 − 𝑀))...(𝑁 + (1 − 𝑀))) = (1...(𝑁 + (1 − 𝑀)))) |
| 25 | 24 | mpteq1d 4172 |
. . . . . . 7
⊢ (𝜑 → (𝑗 ∈ ((𝑀 + (1 − 𝑀))...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀))) = (𝑗 ∈ (1...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀)))) |
| 26 | 25 | adantr 276 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (𝑗 ∈ ((𝑀 + (1 − 𝑀))...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀))) = (𝑗 ∈ (1...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀)))) |
| 27 | 23 | adantr 276 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (𝑀 + (1 − 𝑀)) = 1) |
| 28 | | hashfz 11078 |
. . . . . . . . 9
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → (♯‘(𝑀...𝑁)) = ((𝑁 − 𝑀) + 1)) |
| 29 | 10, 28 | syl 14 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (♯‘(𝑀...𝑁)) = ((𝑁 − 𝑀) + 1)) |
| 30 | 7 | zcnd 9596 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → 𝑁 ∈ ℂ) |
| 31 | 21 | adantr 276 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → 𝑀 ∈ ℂ) |
| 32 | | 1cnd 8188 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → 1 ∈ ℂ) |
| 33 | 30, 31, 32 | subadd23d 8505 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → ((𝑁 − 𝑀) + 1) = (𝑁 + (1 − 𝑀))) |
| 34 | 29, 33 | eqtr2d 2263 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (𝑁 + (1 − 𝑀)) = (♯‘(𝑀...𝑁))) |
| 35 | 27, 34 | oveq12d 6031 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → ((𝑀 + (1 − 𝑀))...(𝑁 + (1 − 𝑀))) = (1...(♯‘(𝑀...𝑁)))) |
| 36 | | eqidd 2230 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (𝑀...𝑁) = (𝑀...𝑁)) |
| 37 | 26, 35, 36 | f1oeq123d 5574 |
. . . . 5
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → ((𝑗 ∈ ((𝑀 + (1 − 𝑀))...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀))):((𝑀 + (1 − 𝑀))...(𝑁 + (1 − 𝑀)))–1-1-onto→(𝑀...𝑁) ↔ (𝑗 ∈ (1...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀))):(1...(♯‘(𝑀...𝑁)))–1-1-onto→(𝑀...𝑁))) |
| 38 | 20, 37 | mpbid 147 |
. . . 4
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (𝑗 ∈ (1...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀))):(1...(♯‘(𝑀...𝑁)))–1-1-onto→(𝑀...𝑁)) |
| 39 | 1, 3, 12, 16, 38 | gfsumval 16630 |
. . 3
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (𝐺 Σgf 𝐹) = (𝐺 Σg (𝐹 ∘ (𝑗 ∈ (1...(𝑁 + (1 − 𝑀))) ↦ (𝑗 − (1 − 𝑀)))))) |
| 40 | 14, 39 | eqtr4d 2265 |
. 2
⊢ ((𝜑 ∧ 𝑀 ≤ 𝑁) → (𝐺 Σg 𝐹) = (𝐺 Σgf 𝐹)) |
| 41 | 2 | adantr 276 |
. . . 4
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → 𝐺 ∈ CMnd) |
| 42 | | gfsum0 16632 |
. . . 4
⊢ (𝐺 ∈ CMnd → (𝐺 Σgf
∅) = (0g‘𝐺)) |
| 43 | 41, 42 | syl 14 |
. . 3
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → (𝐺 Σgf ∅) =
(0g‘𝐺)) |
| 44 | 11 | adantr 276 |
. . . . . 6
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → 𝐹:(𝑀...𝑁)⟶𝐵) |
| 45 | | simpr 110 |
. . . . . . . . 9
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → ¬ 𝑀 ≤ 𝑁) |
| 46 | 6 | adantr 276 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → 𝑁 ∈ ℤ) |
| 47 | 4 | adantr 276 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → 𝑀 ∈ ℤ) |
| 48 | | zltnle 9518 |
. . . . . . . . . 10
⊢ ((𝑁 ∈ ℤ ∧ 𝑀 ∈ ℤ) → (𝑁 < 𝑀 ↔ ¬ 𝑀 ≤ 𝑁)) |
| 49 | 46, 47, 48 | syl2anc 411 |
. . . . . . . . 9
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → (𝑁 < 𝑀 ↔ ¬ 𝑀 ≤ 𝑁)) |
| 50 | 45, 49 | mpbird 167 |
. . . . . . . 8
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → 𝑁 < 𝑀) |
| 51 | | fzn 10270 |
. . . . . . . . 9
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 < 𝑀 ↔ (𝑀...𝑁) = ∅)) |
| 52 | 47, 46, 51 | syl2anc 411 |
. . . . . . . 8
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → (𝑁 < 𝑀 ↔ (𝑀...𝑁) = ∅)) |
| 53 | 50, 52 | mpbid 147 |
. . . . . . 7
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → (𝑀...𝑁) = ∅) |
| 54 | 53 | feq2d 5467 |
. . . . . 6
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → (𝐹:(𝑀...𝑁)⟶𝐵 ↔ 𝐹:∅⟶𝐵)) |
| 55 | 44, 54 | mpbid 147 |
. . . . 5
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → 𝐹:∅⟶𝐵) |
| 56 | | f0bi 5526 |
. . . . 5
⊢ (𝐹:∅⟶𝐵 ↔ 𝐹 = ∅) |
| 57 | 55, 56 | sylib 122 |
. . . 4
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → 𝐹 = ∅) |
| 58 | 57 | oveq2d 6029 |
. . 3
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → (𝐺 Σgf 𝐹) = (𝐺 Σgf
∅)) |
| 59 | 57 | oveq2d 6029 |
. . . 4
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → (𝐺 Σg 𝐹) = (𝐺 Σg
∅)) |
| 60 | | eqid 2229 |
. . . . . 6
⊢
(0g‘𝐺) = (0g‘𝐺) |
| 61 | 60 | gsum0g 13472 |
. . . . 5
⊢ (𝐺 ∈ CMnd → (𝐺 Σg
∅) = (0g‘𝐺)) |
| 62 | 41, 61 | syl 14 |
. . . 4
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → (𝐺 Σg ∅) =
(0g‘𝐺)) |
| 63 | 59, 62 | eqtrd 2262 |
. . 3
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → (𝐺 Σg 𝐹) = (0g‘𝐺)) |
| 64 | 43, 58, 63 | 3eqtr4rd 2273 |
. 2
⊢ ((𝜑 ∧ ¬ 𝑀 ≤ 𝑁) → (𝐺 Σg 𝐹) = (𝐺 Σgf 𝐹)) |
| 65 | | zdcle 9549 |
. . . 4
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) →
DECID 𝑀 ≤
𝑁) |
| 66 | 4, 6, 65 | syl2anc 411 |
. . 3
⊢ (𝜑 → DECID 𝑀 ≤ 𝑁) |
| 67 | | exmiddc 841 |
. . 3
⊢
(DECID 𝑀 ≤ 𝑁 → (𝑀 ≤ 𝑁 ∨ ¬ 𝑀 ≤ 𝑁)) |
| 68 | 66, 67 | syl 14 |
. 2
⊢ (𝜑 → (𝑀 ≤ 𝑁 ∨ ¬ 𝑀 ≤ 𝑁)) |
| 69 | 40, 64, 68 | mpjaodan 803 |
1
⊢ (𝜑 → (𝐺 Σg 𝐹) = (𝐺 Σgf 𝐹)) |