dchrsum2 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > dchrsum2		Structured version Visualization version GIF version

Theorem dchrsum2 27212

Description: An orthogonality relation for Dirichlet characters: the sum of all the values of a Dirichlet character 𝑋 is 0 if 𝑋 is non-principal and ϕ(𝑛) otherwise. Part of Theorem 6.5.1 of [Shapiro] p. 230. (Contributed by Mario Carneiro, 28-Apr-2016.)

**Hypotheses**
Ref	Expression
dchrsum.g	⊢ 𝐺 = (DChr‘𝑁)
dchrsum.z	⊢ 𝑍 = (ℤ/nℤ‘𝑁)
dchrsum.d	⊢ 𝐷 = (Base‘𝐺)
dchrsum.1	⊢ 1 = (0_g‘𝐺)
dchrsum.x	⊢ (𝜑 → 𝑋 ∈ 𝐷)
dchrsum2.u	⊢ 𝑈 = (Unit‘𝑍)

**Assertion**
Ref	Expression
dchrsum2	⊢ (𝜑 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0))

Distinct variable groups: 1 ,𝑎 𝜑,𝑎 𝑈,𝑎 𝑋,𝑎 𝑍,𝑎 Allowed substitution hints: 𝐷(𝑎) 𝐺(𝑎) 𝑁(𝑎)

Proof of Theorem dchrsum2 Dummy variables 𝑘 𝑥 𝑏 𝑐 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqeq2 2743	. 2 ⊢ ((ϕ‘𝑁) = if(𝑋 = 1 , (ϕ‘𝑁), 0) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = (ϕ‘𝑁) ↔ Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0)))
2		eqeq2 2743	. 2 ⊢ (0 = if(𝑋 = 1 , (ϕ‘𝑁), 0) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0 ↔ Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0)))
3		fveq1 6827	. . . . . 6 ⊢ (𝑋 = 1 → (𝑋‘𝑎) = ( 1 ‘𝑎))
4		dchrsum.g	. . . . . . 7 ⊢ 𝐺 = (DChr‘𝑁)
5		dchrsum.z	. . . . . . 7 ⊢ 𝑍 = (ℤ/nℤ‘𝑁)
6		dchrsum.1	. . . . . . 7 ⊢ 1 = (0_g‘𝐺)
7		dchrsum2.u	. . . . . . 7 ⊢ 𝑈 = (Unit‘𝑍)
8		dchrsum.x	. . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ 𝐷)
9		dchrsum.d	. . . . . . . . . 10 ⊢ 𝐷 = (Base‘𝐺)
10	4, 9	dchrrcl 27184	. . . . . . . . 9 ⊢ (𝑋 ∈ 𝐷 → 𝑁 ∈ ℕ)
11	8, 10	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
12	11	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → 𝑁 ∈ ℕ)
13		simpr 484	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → 𝑎 ∈ 𝑈)
14	4, 5, 6, 7, 12, 13	dchr1 27201	. . . . . 6 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → ( 1 ‘𝑎) = 1)
15	3, 14	sylan9eqr 2788	. . . . 5 ⊢ (((𝜑 ∧ 𝑎 ∈ 𝑈) ∧ 𝑋 = 1 ) → (𝑋‘𝑎) = 1)
16	15	an32s 652	. . . 4 ⊢ (((𝜑 ∧ 𝑋 = 1 ) ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) = 1)
17	16	sumeq2dv 15615	. . 3 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = Σ𝑎 ∈ 𝑈 1)
18	5, 7	znunithash 21507	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (♯‘𝑈) = (ϕ‘𝑁))
19	11, 18	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑈) = (ϕ‘𝑁))
20	11	phicld 16689	. . . . . . . . 9 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℕ)
21	20	nnnn0d 12448	. . . . . . . 8 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℕ₀)
22	19, 21	eqeltrd 2831	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑈) ∈ ℕ₀)
23	7	fvexi 6842	. . . . . . . 8 ⊢ 𝑈 ∈ V
24		hashclb 14271	. . . . . . . 8 ⊢ (𝑈 ∈ V → (𝑈 ∈ Fin ↔ (♯‘𝑈) ∈ ℕ₀))
25	23, 24	ax-mp 5	. . . . . . 7 ⊢ (𝑈 ∈ Fin ↔ (♯‘𝑈) ∈ ℕ₀)
26	22, 25	sylibr 234	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ Fin)
27		ax-1cn 11070	. . . . . 6 ⊢ 1 ∈ ℂ
28		fsumconst 15703	. . . . . 6 ⊢ ((𝑈 ∈ Fin ∧ 1 ∈ ℂ) → Σ𝑎 ∈ 𝑈 1 = ((♯‘𝑈) · 1))
29	26, 27, 28	sylancl 586	. . . . 5 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 1 = ((♯‘𝑈) · 1))
30	19	oveq1d 7367	. . . . 5 ⊢ (𝜑 → ((♯‘𝑈) · 1) = ((ϕ‘𝑁) · 1))
31	20	nncnd 12147	. . . . . 6 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℂ)
32	31	mulridd 11135	. . . . 5 ⊢ (𝜑 → ((ϕ‘𝑁) · 1) = (ϕ‘𝑁))
33	29, 30, 32	3eqtrd 2770	. . . 4 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 1 = (ϕ‘𝑁))
34	33	adantr 480	. . 3 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 1 = (ϕ‘𝑁))
35	17, 34	eqtrd 2766	. 2 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = (ϕ‘𝑁))
36	4	dchrabl 27198	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → 𝐺 ∈ Abel)
37		ablgrp 19703	. . . . . . . 8 ⊢ (𝐺 ∈ Abel → 𝐺 ∈ Grp)
38	9, 6	grpidcl 18884	. . . . . . . 8 ⊢ (𝐺 ∈ Grp → 1 ∈ 𝐷)
39	11, 36, 37, 38	4syl 19	. . . . . . 7 ⊢ (𝜑 → 1 ∈ 𝐷)
40	4, 5, 9, 7, 8, 39	dchreq 27202	. . . . . 6 ⊢ (𝜑 → (𝑋 = 1 ↔ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘)))
41	40	notbid 318	. . . . 5 ⊢ (𝜑 → (¬ 𝑋 = 1 ↔ ¬ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘)))
42		rexnal 3084	. . . . 5 ⊢ (∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘) ↔ ¬ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘))
43	41, 42	bitr4di 289	. . . 4 ⊢ (𝜑 → (¬ 𝑋 = 1 ↔ ∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘)))
44		df-ne 2929	. . . . . 6 ⊢ ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) ↔ ¬ (𝑋‘𝑘) = ( 1 ‘𝑘))
45	11	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑁 ∈ ℕ)
46		simpr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑘 ∈ 𝑈)
47	4, 5, 6, 7, 45, 46	dchr1 27201	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ( 1 ‘𝑘) = 1)
48	47	neeq2d 2988	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) ↔ (𝑋‘𝑘) ≠ 1))
49	26	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑈 ∈ Fin)
50		eqid 2731	. . . . . . . . . . . . 13 ⊢ (Base‘𝑍) = (Base‘𝑍)
51	4, 5, 9, 50, 8	dchrf 27186	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋:(Base‘𝑍)⟶ℂ)
52	50, 7	unitss 20300	. . . . . . . . . . . . 13 ⊢ 𝑈 ⊆ (Base‘𝑍)
53	52	sseli 3925	. . . . . . . . . . . 12 ⊢ (𝑎 ∈ 𝑈 → 𝑎 ∈ (Base‘𝑍))
54		ffvelcdm 7020	. . . . . . . . . . . 12 ⊢ ((𝑋:(Base‘𝑍)⟶ℂ ∧ 𝑎 ∈ (Base‘𝑍)) → (𝑋‘𝑎) ∈ ℂ)
55	51, 53, 54	syl2an 596	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) ∈ ℂ)
56	55	adantlr 715	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) ∈ ℂ)
57	49, 56	fsumcl 15646	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) ∈ ℂ)
58		0cnd 11111	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 0 ∈ ℂ)
59	51	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑋:(Base‘𝑍)⟶ℂ)
60		simprl 770	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑘 ∈ 𝑈)
61	52, 60	sselid 3927	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑘 ∈ (Base‘𝑍))
62	59, 61	ffvelcdmd 7024	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (𝑋‘𝑘) ∈ ℂ)
63		subcl 11365	. . . . . . . . . 10 ⊢ (((𝑋‘𝑘) ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑋‘𝑘) − 1) ∈ ℂ)
64	62, 27, 63	sylancl 586	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) − 1) ∈ ℂ)
65		simprr 772	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (𝑋‘𝑘) ≠ 1)
66		subeq0 11393	. . . . . . . . . . . 12 ⊢ (((𝑋‘𝑘) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝑋‘𝑘) − 1) = 0 ↔ (𝑋‘𝑘) = 1))
67	62, 27, 66	sylancl 586	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) = 0 ↔ (𝑋‘𝑘) = 1))
68	67	necon3bid 2972	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) ≠ 0 ↔ (𝑋‘𝑘) ≠ 1))
69	65, 68	mpbird 257	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) − 1) ≠ 0)
70		oveq2 7360	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑎 → (𝑘(._r‘𝑍)𝑥) = (𝑘(._r‘𝑍)𝑎))
71	70	fveq2d 6832	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → (𝑋‘(𝑘(._r‘𝑍)𝑥)) = (𝑋‘(𝑘(._r‘𝑍)𝑎)))
72	71	cbvsumv 15609	. . . . . . . . . . . . . 14 ⊢ Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)) = Σ𝑎 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑎))
73	4, 5, 9	dchrmhm 27185	. . . . . . . . . . . . . . . . . 18 ⊢ 𝐷 ⊆ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld))
74	73, 8	sselid 3927	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)))
75	74	ad2antrr 726	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → 𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)))
76	61	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → 𝑘 ∈ (Base‘𝑍))
77	53	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → 𝑎 ∈ (Base‘𝑍))
78		eqid 2731	. . . . . . . . . . . . . . . . . 18 ⊢ (mulGrp‘𝑍) = (mulGrp‘𝑍)
79	78, 50	mgpbas 20069	. . . . . . . . . . . . . . . . 17 ⊢ (Base‘𝑍) = (Base‘(mulGrp‘𝑍))
80		eqid 2731	. . . . . . . . . . . . . . . . . 18 ⊢ (._r‘𝑍) = (._r‘𝑍)
81	78, 80	mgpplusg 20068	. . . . . . . . . . . . . . . . 17 ⊢ (._r‘𝑍) = (+_g‘(mulGrp‘𝑍))
82		eqid 2731	. . . . . . . . . . . . . . . . . 18 ⊢ (mulGrp‘ℂ_fld) = (mulGrp‘ℂ_fld)
83		cnfldmul 21305	. . . . . . . . . . . . . . . . . 18 ⊢ · = (._r‘ℂ_fld)
84	82, 83	mgpplusg 20068	. . . . . . . . . . . . . . . . 17 ⊢ · = (+_g‘(mulGrp‘ℂ_fld))
85	79, 81, 84	mhmlin 18707	. . . . . . . . . . . . . . . 16 ⊢ ((𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)) ∧ 𝑘 ∈ (Base‘𝑍) ∧ 𝑎 ∈ (Base‘𝑍)) → (𝑋‘(𝑘(._r‘𝑍)𝑎)) = ((𝑋‘𝑘) · (𝑋‘𝑎)))
86	75, 76, 77, 85	syl3anc 1373	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → (𝑋‘(𝑘(._r‘𝑍)𝑎)) = ((𝑋‘𝑘) · (𝑋‘𝑎)))
87	86	sumeq2dv 15615	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑎)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
88	72, 87	eqtrid 2778	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
89		fveq2 6828	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝑘(._r‘𝑍)𝑥) → (𝑋‘𝑎) = (𝑋‘(𝑘(._r‘𝑍)𝑥)))
90	11	nnnn0d 12448	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
91	5	zncrng 21487	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ ℕ₀ → 𝑍 ∈ CRing)
92		crngring 20169	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ CRing → 𝑍 ∈ Ring)
93		eqid 2731	. . . . . . . . . . . . . . . . 17 ⊢ ((mulGrp‘𝑍) ↾_s 𝑈) = ((mulGrp‘𝑍) ↾_s 𝑈)
94	7, 93	unitgrp 20307	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ Ring → ((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp)
95	90, 91, 92, 94	4syl 19	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp)
96		eqid 2731	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐))) = (𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))
97	7, 93	unitgrpbas 20306	. . . . . . . . . . . . . . . 16 ⊢ 𝑈 = (Base‘((mulGrp‘𝑍) ↾_s 𝑈))
98	93, 81	ressplusg 17201	. . . . . . . . . . . . . . . . 17 ⊢ (𝑈 ∈ V → (._r‘𝑍) = (+_g‘((mulGrp‘𝑍) ↾_s 𝑈)))
99	23, 98	ax-mp 5	. . . . . . . . . . . . . . . 16 ⊢ (._r‘𝑍) = (+_g‘((mulGrp‘𝑍) ↾_s 𝑈))
100	96, 97, 99	grplactf1o 18963	. . . . . . . . . . . . . . 15 ⊢ ((((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp ∧ 𝑘 ∈ 𝑈) → ((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘):𝑈–1-1-onto→𝑈)
101	95, 60, 100	syl2an2r 685	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘):𝑈–1-1-onto→𝑈)
102	96, 97	grplactval 18961	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ 𝑈 ∧ 𝑥 ∈ 𝑈) → (((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘)‘𝑥) = (𝑘(._r‘𝑍)𝑥))
103	60, 102	sylan 580	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑥 ∈ 𝑈) → (((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘)‘𝑥) = (𝑘(._r‘𝑍)𝑥))
104	89, 49, 101, 103, 56	fsumf1o 15636	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)))
105	49, 62, 56	fsummulc2 15697	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
106	88, 104, 105	3eqtr4rd 2777	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))
107	57	mullidd 11136	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))
108	106, 107	oveq12d 7370	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))) = (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) − Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)))
109	57	subidd 11466	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) − Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = 0)
110	108, 109	eqtrd 2766	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))) = 0)
111		1cnd 11113	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 1 ∈ ℂ)
112	62, 111, 57	subdird 11580	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))))
113	64	mul01d 11318	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · 0) = 0)
114	110, 112, 113	3eqtr4d 2776	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = (((𝑋‘𝑘) − 1) · 0))
115	57, 58, 64, 69, 114	mulcanad 11758	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0)
116	115	expr 456	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ((𝑋‘𝑘) ≠ 1 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
117	48, 116	sylbid 240	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
118	44, 117	biimtrrid 243	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → (¬ (𝑋‘𝑘) = ( 1 ‘𝑘) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
119	118	rexlimdva 3133	. . . 4 ⊢ (𝜑 → (∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
120	43, 119	sylbid 240	. . 3 ⊢ (𝜑 → (¬ 𝑋 = 1 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
121	120	imp 406	. 2 ⊢ ((𝜑 ∧ ¬ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0)
122	1, 2, 35, 121	ifbothda 4513	1 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 = wceq 1541 ∈ wcel 2111 ≠ wne 2928 ∀wral 3047 ∃wrex 3056 Vcvv 3436 ifcif 4474 ↦ cmpt 5174 ⟶wf 6483 –1-1-onto→wf1o 6486 ‘cfv 6487 (class class class)co 7352 Fincfn 8875 ℂcc 11010 0cc0 11012 1c1 11013 · cmul 11017 − cmin 11350 ℕcn 12131 ℕ₀cn0 12387 ♯chash 14243 Σcsu 15599 ϕcphi 16681 Basecbs 17126 ↾_s cress 17147 +_gcplusg 17167 ._rcmulr 17168 0_gc0g 17349 MndHom cmhm 18695 Grpcgrp 18852 Abelcabl 19699 mulGrpcmgp 20064 Ringcrg 20157 CRingccrg 20158 Unitcui 20279 ℂ_fldccnfld 21297 ℤ/nℤczn 21445 DChrcdchr 27176

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2113 ax-9 2121 ax-10 2144 ax-11 2160 ax-12 2180 ax-ext 2703 ax-rep 5219 ax-sep 5236 ax-nul 5246 ax-pow 5305 ax-pr 5372 ax-un 7674 ax-inf2 9537 ax-cnex 11068 ax-resscn 11069 ax-1cn 11070 ax-icn 11071 ax-addcl 11072 ax-addrcl 11073 ax-mulcl 11074 ax-mulrcl 11075 ax-mulcom 11076 ax-addass 11077 ax-mulass 11078 ax-distr 11079 ax-i2m1 11080 ax-1ne0 11081 ax-1rid 11082 ax-rnegex 11083 ax-rrecex 11084 ax-cnre 11085 ax-pre-lttri 11086 ax-pre-lttrn 11087 ax-pre-ltadd 11088 ax-pre-mulgt0 11089 ax-pre-sup 11090 ax-addf 11091 ax-mulf 11092

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2535 df-eu 2564 df-clab 2710 df-cleq 2723 df-clel 2806 df-nfc 2881 df-ne 2929 df-nel 3033 df-ral 3048 df-rex 3057 df-rmo 3346 df-reu 3347 df-rab 3396 df-v 3438 df-sbc 3737 df-csb 3846 df-dif 3900 df-un 3902 df-in 3904 df-ss 3914 df-pss 3917 df-nul 4283 df-if 4475 df-pw 4551 df-sn 4576 df-pr 4578 df-tp 4580 df-op 4582 df-uni 4859 df-int 4898 df-iun 4943 df-br 5094 df-opab 5156 df-mpt 5175 df-tr 5201 df-id 5514 df-eprel 5519 df-po 5527 df-so 5528 df-fr 5572 df-se 5573 df-we 5574 df-xp 5625 df-rel 5626 df-cnv 5627 df-co 5628 df-dm 5629 df-rn 5630 df-res 5631 df-ima 5632 df-pred 6254 df-ord 6315 df-on 6316 df-lim 6317 df-suc 6318 df-iota 6443 df-fun 6489 df-fn 6490 df-f 6491 df-f1 6492 df-fo 6493 df-f1o 6494 df-fv 6495 df-isom 6496 df-riota 7309 df-ov 7355 df-oprab 7356 df-mpo 7357 df-of 7616 df-om 7803 df-1st 7927 df-2nd 7928 df-tpos 8162 df-frecs 8217 df-wrecs 8248 df-recs 8297 df-rdg 8335 df-1o 8391 df-oadd 8395 df-er 8628 df-ec 8630 df-qs 8634 df-map 8758 df-en 8876 df-dom 8877 df-sdom 8878 df-fin 8879 df-sup 9332 df-inf 9333 df-oi 9402 df-card 9838 df-pnf 11154 df-mnf 11155 df-xr 11156 df-ltxr 11157 df-le 11158 df-sub 11352 df-neg 11353 df-div 11781 df-nn 12132 df-2 12194 df-3 12195 df-4 12196 df-5 12197 df-6 12198 df-7 12199 df-8 12200 df-9 12201 df-n0 12388 df-xnn0 12461 df-z 12475 df-dec 12595 df-uz 12739 df-rp 12897 df-fz 13414 df-fzo 13561 df-fl 13702 df-mod 13780 df-seq 13915 df-exp 13975 df-hash 14244 df-cj 15012 df-re 15013 df-im 15014 df-sqrt 15148 df-abs 15149 df-clim 15401 df-sum 15600 df-dvds 16170 df-gcd 16412 df-phi 16683 df-struct 17064 df-sets 17081 df-slot 17099 df-ndx 17111 df-base 17127 df-ress 17148 df-plusg 17180 df-mulr 17181 df-starv 17182 df-sca 17183 df-vsca 17184 df-ip 17185 df-tset 17186 df-ple 17187 df-ds 17189 df-unif 17190 df-0g 17351 df-imas 17418 df-qus 17419 df-mgm 18554 df-sgrp 18633 df-mnd 18649 df-mhm 18697 df-grp 18855 df-minusg 18856 df-sbg 18857 df-mulg 18987 df-subg 19042 df-nsg 19043 df-eqg 19044 df-ghm 19131 df-cmn 19700 df-abl 19701 df-mgp 20065 df-rng 20077 df-ur 20106 df-ring 20159 df-cring 20160 df-oppr 20261 df-dvdsr 20281 df-unit 20282 df-invr 20312 df-rhm 20396 df-subrng 20467 df-subrg 20491 df-lmod 20801 df-lss 20871 df-lsp 20911 df-sra 21113 df-rgmod 21114 df-lidl 21151 df-rsp 21152 df-2idl 21193 df-cnfld 21298 df-zring 21390 df-zrh 21446 df-zn 21449 df-dchr 27177

This theorem is referenced by: dchrsum 27213

W3C validator