| Step | Hyp | Ref
| Expression |
| 1 | | eqeq2 2633 |
. 2
⊢
((#‘𝐷) =
if(𝐴 = 1 , (#‘𝐷), 0) → (Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = (#‘𝐷) ↔ Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = if(𝐴 = 1 , (#‘𝐷), 0))) |
| 2 | | eqeq2 2633 |
. 2
⊢ (0 =
if(𝐴 = 1 , (#‘𝐷), 0) → (Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = 0 ↔ Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = if(𝐴 = 1 , (#‘𝐷), 0))) |
| 3 | | fveq2 6191 |
. . . . . 6
⊢ (𝐴 = 1 → (𝑥‘𝐴) = (𝑥‘ 1 )) |
| 4 | | sumdchr.g |
. . . . . . . . 9
⊢ 𝐺 = (DChr‘𝑁) |
| 5 | | sumdchr2.z |
. . . . . . . . 9
⊢ 𝑍 =
(ℤ/nℤ‘𝑁) |
| 6 | | sumdchr.d |
. . . . . . . . 9
⊢ 𝐷 = (Base‘𝐺) |
| 7 | 4, 5, 6 | dchrmhm 24966 |
. . . . . . . 8
⊢ 𝐷 ⊆ ((mulGrp‘𝑍) MndHom
(mulGrp‘ℂfld)) |
| 8 | | simpr 477 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐷) → 𝑥 ∈ 𝐷) |
| 9 | 7, 8 | sseldi 3601 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐷) → 𝑥 ∈ ((mulGrp‘𝑍) MndHom
(mulGrp‘ℂfld))) |
| 10 | | eqid 2622 |
. . . . . . . . 9
⊢
(mulGrp‘𝑍) =
(mulGrp‘𝑍) |
| 11 | | sumdchr2.1 |
. . . . . . . . 9
⊢ 1 =
(1r‘𝑍) |
| 12 | 10, 11 | ringidval 18503 |
. . . . . . . 8
⊢ 1 =
(0g‘(mulGrp‘𝑍)) |
| 13 | | eqid 2622 |
. . . . . . . . 9
⊢
(mulGrp‘ℂfld) =
(mulGrp‘ℂfld) |
| 14 | | cnfld1 19771 |
. . . . . . . . 9
⊢ 1 =
(1r‘ℂfld) |
| 15 | 13, 14 | ringidval 18503 |
. . . . . . . 8
⊢ 1 =
(0g‘(mulGrp‘ℂfld)) |
| 16 | 12, 15 | mhm0 17343 |
. . . . . . 7
⊢ (𝑥 ∈ ((mulGrp‘𝑍) MndHom
(mulGrp‘ℂfld)) → (𝑥‘ 1 ) = 1) |
| 17 | 9, 16 | syl 17 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐷) → (𝑥‘ 1 ) = 1) |
| 18 | 3, 17 | sylan9eqr 2678 |
. . . . 5
⊢ (((𝜑 ∧ 𝑥 ∈ 𝐷) ∧ 𝐴 = 1 ) → (𝑥‘𝐴) = 1) |
| 19 | 18 | an32s 846 |
. . . 4
⊢ (((𝜑 ∧ 𝐴 = 1 ) ∧ 𝑥 ∈ 𝐷) → (𝑥‘𝐴) = 1) |
| 20 | 19 | sumeq2dv 14433 |
. . 3
⊢ ((𝜑 ∧ 𝐴 = 1 ) → Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = Σ𝑥 ∈ 𝐷 1) |
| 21 | | sumdchr2.n |
. . . . . . 7
⊢ (𝜑 → 𝑁 ∈ ℕ) |
| 22 | 4, 6 | dchrfi 24980 |
. . . . . . 7
⊢ (𝑁 ∈ ℕ → 𝐷 ∈ Fin) |
| 23 | 21, 22 | syl 17 |
. . . . . 6
⊢ (𝜑 → 𝐷 ∈ Fin) |
| 24 | | ax-1cn 9994 |
. . . . . 6
⊢ 1 ∈
ℂ |
| 25 | | fsumconst 14522 |
. . . . . 6
⊢ ((𝐷 ∈ Fin ∧ 1 ∈
ℂ) → Σ𝑥
∈ 𝐷 1 =
((#‘𝐷) ·
1)) |
| 26 | 23, 24, 25 | sylancl 694 |
. . . . 5
⊢ (𝜑 → Σ𝑥 ∈ 𝐷 1 = ((#‘𝐷) · 1)) |
| 27 | | hashcl 13147 |
. . . . . . . 8
⊢ (𝐷 ∈ Fin →
(#‘𝐷) ∈
ℕ0) |
| 28 | 21, 22, 27 | 3syl 18 |
. . . . . . 7
⊢ (𝜑 → (#‘𝐷) ∈
ℕ0) |
| 29 | 28 | nn0cnd 11353 |
. . . . . 6
⊢ (𝜑 → (#‘𝐷) ∈ ℂ) |
| 30 | 29 | mulid1d 10057 |
. . . . 5
⊢ (𝜑 → ((#‘𝐷) · 1) = (#‘𝐷)) |
| 31 | 26, 30 | eqtrd 2656 |
. . . 4
⊢ (𝜑 → Σ𝑥 ∈ 𝐷 1 = (#‘𝐷)) |
| 32 | 31 | adantr 481 |
. . 3
⊢ ((𝜑 ∧ 𝐴 = 1 ) → Σ𝑥 ∈ 𝐷 1 = (#‘𝐷)) |
| 33 | 20, 32 | eqtrd 2656 |
. 2
⊢ ((𝜑 ∧ 𝐴 = 1 ) → Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = (#‘𝐷)) |
| 34 | | df-ne 2795 |
. . 3
⊢ (𝐴 ≠ 1 ↔ ¬ 𝐴 = 1 ) |
| 35 | | sumdchr2.b |
. . . . 5
⊢ 𝐵 = (Base‘𝑍) |
| 36 | 21 | adantr 481 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ≠ 1 ) → 𝑁 ∈ ℕ) |
| 37 | | simpr 477 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ≠ 1 ) → 𝐴 ≠ 1 ) |
| 38 | | sumdchr2.x |
. . . . . 6
⊢ (𝜑 → 𝐴 ∈ 𝐵) |
| 39 | 38 | adantr 481 |
. . . . 5
⊢ ((𝜑 ∧ 𝐴 ≠ 1 ) → 𝐴 ∈ 𝐵) |
| 40 | 4, 5, 6, 35, 11, 36, 37, 39 | dchrpt 24992 |
. . . 4
⊢ ((𝜑 ∧ 𝐴 ≠ 1 ) → ∃𝑦 ∈ 𝐷 (𝑦‘𝐴) ≠ 1) |
| 41 | 36 | adantr 481 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → 𝑁 ∈ ℕ) |
| 42 | 41, 22 | syl 17 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → 𝐷 ∈ Fin) |
| 43 | | simpr 477 |
. . . . . . . 8
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → 𝑥 ∈ 𝐷) |
| 44 | 4, 5, 6, 35, 43 | dchrf 24967 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → 𝑥:𝐵⟶ℂ) |
| 45 | 39 | adantr 481 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → 𝐴 ∈ 𝐵) |
| 46 | 45 | adantr 481 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → 𝐴 ∈ 𝐵) |
| 47 | 44, 46 | ffvelrnd 6360 |
. . . . . 6
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → (𝑥‘𝐴) ∈ ℂ) |
| 48 | 42, 47 | fsumcl 14464 |
. . . . 5
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) ∈ ℂ) |
| 49 | | 0cnd 10033 |
. . . . 5
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → 0 ∈
ℂ) |
| 50 | | simprl 794 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → 𝑦 ∈ 𝐷) |
| 51 | 4, 5, 6, 35, 50 | dchrf 24967 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → 𝑦:𝐵⟶ℂ) |
| 52 | 51, 45 | ffvelrnd 6360 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (𝑦‘𝐴) ∈ ℂ) |
| 53 | | subcl 10280 |
. . . . . 6
⊢ (((𝑦‘𝐴) ∈ ℂ ∧ 1 ∈ ℂ)
→ ((𝑦‘𝐴) − 1) ∈
ℂ) |
| 54 | 52, 24, 53 | sylancl 694 |
. . . . 5
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → ((𝑦‘𝐴) − 1) ∈
ℂ) |
| 55 | | simprr 796 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (𝑦‘𝐴) ≠ 1) |
| 56 | | subeq0 10307 |
. . . . . . . 8
⊢ (((𝑦‘𝐴) ∈ ℂ ∧ 1 ∈ ℂ)
→ (((𝑦‘𝐴) − 1) = 0 ↔ (𝑦‘𝐴) = 1)) |
| 57 | 52, 24, 56 | sylancl 694 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (((𝑦‘𝐴) − 1) = 0 ↔ (𝑦‘𝐴) = 1)) |
| 58 | 57 | necon3bid 2838 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (((𝑦‘𝐴) − 1) ≠ 0 ↔ (𝑦‘𝐴) ≠ 1)) |
| 59 | 55, 58 | mpbird 247 |
. . . . 5
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → ((𝑦‘𝐴) − 1) ≠ 0) |
| 60 | | oveq2 6658 |
. . . . . . . . . . . 12
⊢ (𝑧 = 𝑥 → (𝑦(+g‘𝐺)𝑧) = (𝑦(+g‘𝐺)𝑥)) |
| 61 | 60 | fveq1d 6193 |
. . . . . . . . . . 11
⊢ (𝑧 = 𝑥 → ((𝑦(+g‘𝐺)𝑧)‘𝐴) = ((𝑦(+g‘𝐺)𝑥)‘𝐴)) |
| 62 | 61 | cbvsumv 14426 |
. . . . . . . . . 10
⊢
Σ𝑧 ∈
𝐷 ((𝑦(+g‘𝐺)𝑧)‘𝐴) = Σ𝑥 ∈ 𝐷 ((𝑦(+g‘𝐺)𝑥)‘𝐴) |
| 63 | | eqid 2622 |
. . . . . . . . . . . . . 14
⊢
(+g‘𝐺) = (+g‘𝐺) |
| 64 | 50 | adantr 481 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → 𝑦 ∈ 𝐷) |
| 65 | 4, 5, 6, 63, 64, 43 | dchrmul 24973 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → (𝑦(+g‘𝐺)𝑥) = (𝑦 ∘𝑓 · 𝑥)) |
| 66 | 65 | fveq1d 6193 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → ((𝑦(+g‘𝐺)𝑥)‘𝐴) = ((𝑦 ∘𝑓 · 𝑥)‘𝐴)) |
| 67 | 51 | adantr 481 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → 𝑦:𝐵⟶ℂ) |
| 68 | | ffn 6045 |
. . . . . . . . . . . . . 14
⊢ (𝑦:𝐵⟶ℂ → 𝑦 Fn 𝐵) |
| 69 | 67, 68 | syl 17 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → 𝑦 Fn 𝐵) |
| 70 | | ffn 6045 |
. . . . . . . . . . . . . 14
⊢ (𝑥:𝐵⟶ℂ → 𝑥 Fn 𝐵) |
| 71 | 44, 70 | syl 17 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → 𝑥 Fn 𝐵) |
| 72 | | fvex 6201 |
. . . . . . . . . . . . . . 15
⊢
(Base‘𝑍)
∈ V |
| 73 | 35, 72 | eqeltri 2697 |
. . . . . . . . . . . . . 14
⊢ 𝐵 ∈ V |
| 74 | 73 | a1i 11 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → 𝐵 ∈ V) |
| 75 | | fnfvof 6911 |
. . . . . . . . . . . . 13
⊢ (((𝑦 Fn 𝐵 ∧ 𝑥 Fn 𝐵) ∧ (𝐵 ∈ V ∧ 𝐴 ∈ 𝐵)) → ((𝑦 ∘𝑓 · 𝑥)‘𝐴) = ((𝑦‘𝐴) · (𝑥‘𝐴))) |
| 76 | 69, 71, 74, 46, 75 | syl22anc 1327 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → ((𝑦 ∘𝑓 · 𝑥)‘𝐴) = ((𝑦‘𝐴) · (𝑥‘𝐴))) |
| 77 | 66, 76 | eqtrd 2656 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑥 ∈ 𝐷) → ((𝑦(+g‘𝐺)𝑥)‘𝐴) = ((𝑦‘𝐴) · (𝑥‘𝐴))) |
| 78 | 77 | sumeq2dv 14433 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → Σ𝑥 ∈ 𝐷 ((𝑦(+g‘𝐺)𝑥)‘𝐴) = Σ𝑥 ∈ 𝐷 ((𝑦‘𝐴) · (𝑥‘𝐴))) |
| 79 | 62, 78 | syl5eq 2668 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → Σ𝑧 ∈ 𝐷 ((𝑦(+g‘𝐺)𝑧)‘𝐴) = Σ𝑥 ∈ 𝐷 ((𝑦‘𝐴) · (𝑥‘𝐴))) |
| 80 | | fveq1 6190 |
. . . . . . . . . 10
⊢ (𝑥 = (𝑦(+g‘𝐺)𝑧) → (𝑥‘𝐴) = ((𝑦(+g‘𝐺)𝑧)‘𝐴)) |
| 81 | 4 | dchrabl 24979 |
. . . . . . . . . . . 12
⊢ (𝑁 ∈ ℕ → 𝐺 ∈ Abel) |
| 82 | | ablgrp 18198 |
. . . . . . . . . . . 12
⊢ (𝐺 ∈ Abel → 𝐺 ∈ Grp) |
| 83 | 41, 81, 82 | 3syl 18 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → 𝐺 ∈ Grp) |
| 84 | | eqid 2622 |
. . . . . . . . . . . 12
⊢ (𝑎 ∈ 𝐷 ↦ (𝑏 ∈ 𝐷 ↦ (𝑎(+g‘𝐺)𝑏))) = (𝑎 ∈ 𝐷 ↦ (𝑏 ∈ 𝐷 ↦ (𝑎(+g‘𝐺)𝑏))) |
| 85 | 84, 6, 63 | grplactf1o 17519 |
. . . . . . . . . . 11
⊢ ((𝐺 ∈ Grp ∧ 𝑦 ∈ 𝐷) → ((𝑎 ∈ 𝐷 ↦ (𝑏 ∈ 𝐷 ↦ (𝑎(+g‘𝐺)𝑏)))‘𝑦):𝐷–1-1-onto→𝐷) |
| 86 | 83, 50, 85 | syl2anc 693 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → ((𝑎 ∈ 𝐷 ↦ (𝑏 ∈ 𝐷 ↦ (𝑎(+g‘𝐺)𝑏)))‘𝑦):𝐷–1-1-onto→𝐷) |
| 87 | 84, 6 | grplactval 17517 |
. . . . . . . . . . 11
⊢ ((𝑦 ∈ 𝐷 ∧ 𝑧 ∈ 𝐷) → (((𝑎 ∈ 𝐷 ↦ (𝑏 ∈ 𝐷 ↦ (𝑎(+g‘𝐺)𝑏)))‘𝑦)‘𝑧) = (𝑦(+g‘𝐺)𝑧)) |
| 88 | 50, 87 | sylan 488 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) ∧ 𝑧 ∈ 𝐷) → (((𝑎 ∈ 𝐷 ↦ (𝑏 ∈ 𝐷 ↦ (𝑎(+g‘𝐺)𝑏)))‘𝑦)‘𝑧) = (𝑦(+g‘𝐺)𝑧)) |
| 89 | 80, 42, 86, 88, 47 | fsumf1o 14454 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = Σ𝑧 ∈ 𝐷 ((𝑦(+g‘𝐺)𝑧)‘𝐴)) |
| 90 | 42, 52, 47 | fsummulc2 14516 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → ((𝑦‘𝐴) · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) = Σ𝑥 ∈ 𝐷 ((𝑦‘𝐴) · (𝑥‘𝐴))) |
| 91 | 79, 89, 90 | 3eqtr4rd 2667 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → ((𝑦‘𝐴) · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) = Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) |
| 92 | 48 | mulid2d 10058 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (1 · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) = Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) |
| 93 | 91, 92 | oveq12d 6668 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (((𝑦‘𝐴) · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) − (1 · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴))) = (Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) − Σ𝑥 ∈ 𝐷 (𝑥‘𝐴))) |
| 94 | 48 | subidd 10380 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) − Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) = 0) |
| 95 | 93, 94 | eqtrd 2656 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (((𝑦‘𝐴) · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) − (1 · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴))) = 0) |
| 96 | 24 | a1i 11 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → 1 ∈
ℂ) |
| 97 | 52, 96, 48 | subdird 10487 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (((𝑦‘𝐴) − 1) · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) = (((𝑦‘𝐴) · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) − (1 · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)))) |
| 98 | 54 | mul01d 10235 |
. . . . . 6
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (((𝑦‘𝐴) − 1) · 0) =
0) |
| 99 | 95, 97, 98 | 3eqtr4d 2666 |
. . . . 5
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → (((𝑦‘𝐴) − 1) · Σ𝑥 ∈ 𝐷 (𝑥‘𝐴)) = (((𝑦‘𝐴) − 1) · 0)) |
| 100 | 48, 49, 54, 59, 99 | mulcanad 10662 |
. . . 4
⊢ (((𝜑 ∧ 𝐴 ≠ 1 ) ∧ (𝑦 ∈ 𝐷 ∧ (𝑦‘𝐴) ≠ 1)) → Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = 0) |
| 101 | 40, 100 | rexlimddv 3035 |
. . 3
⊢ ((𝜑 ∧ 𝐴 ≠ 1 ) → Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = 0) |
| 102 | 34, 101 | sylan2br 493 |
. 2
⊢ ((𝜑 ∧ ¬ 𝐴 = 1 ) → Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = 0) |
| 103 | 1, 2, 33, 102 | ifbothda 4123 |
1
⊢ (𝜑 → Σ𝑥 ∈ 𝐷 (𝑥‘𝐴) = if(𝐴 = 1 , (#‘𝐷), 0)) |