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 27199

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 2742	. 2 ⊢ ((ϕ‘𝑁) = if(𝑋 = 1 , (ϕ‘𝑁), 0) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = (ϕ‘𝑁) ↔ Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0)))
2		eqeq2 2742	. 2 ⊢ (0 = if(𝑋 = 1 , (ϕ‘𝑁), 0) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0 ↔ Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0)))
3		fveq1 6816	. . . . . 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 27171	. . . . . . . . 9 ⊢ (𝑋 ∈ 𝐷 → 𝑁 ∈ ℕ)
11	8, 10	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
12	11	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → 𝑁 ∈ ℕ)
13		simpr 484	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → 𝑎 ∈ 𝑈)
14	4, 5, 6, 7, 12, 13	dchr1 27188	. . . . . 6 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → ( 1 ‘𝑎) = 1)
15	3, 14	sylan9eqr 2787	. . . . 5 ⊢ (((𝜑 ∧ 𝑎 ∈ 𝑈) ∧ 𝑋 = 1 ) → (𝑋‘𝑎) = 1)
16	15	an32s 652	. . . 4 ⊢ (((𝜑 ∧ 𝑋 = 1 ) ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) = 1)
17	16	sumeq2dv 15601	. . 3 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = Σ𝑎 ∈ 𝑈 1)
18	5, 7	znunithash 21494	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (♯‘𝑈) = (ϕ‘𝑁))
19	11, 18	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑈) = (ϕ‘𝑁))
20	11	phicld 16675	. . . . . . . . 9 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℕ)
21	20	nnnn0d 12434	. . . . . . . 8 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℕ₀)
22	19, 21	eqeltrd 2829	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑈) ∈ ℕ₀)
23	7	fvexi 6831	. . . . . . . 8 ⊢ 𝑈 ∈ V
24		hashclb 14257	. . . . . . . 8 ⊢ (𝑈 ∈ V → (𝑈 ∈ Fin ↔ (♯‘𝑈) ∈ ℕ₀))
25	23, 24	ax-mp 5	. . . . . . 7 ⊢ (𝑈 ∈ Fin ↔ (♯‘𝑈) ∈ ℕ₀)
26	22, 25	sylibr 234	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ Fin)
27		ax-1cn 11056	. . . . . 6 ⊢ 1 ∈ ℂ
28		fsumconst 15689	. . . . . 6 ⊢ ((𝑈 ∈ Fin ∧ 1 ∈ ℂ) → Σ𝑎 ∈ 𝑈 1 = ((♯‘𝑈) · 1))
29	26, 27, 28	sylancl 586	. . . . 5 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 1 = ((♯‘𝑈) · 1))
30	19	oveq1d 7356	. . . . 5 ⊢ (𝜑 → ((♯‘𝑈) · 1) = ((ϕ‘𝑁) · 1))
31	20	nncnd 12133	. . . . . 6 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℂ)
32	31	mulridd 11121	. . . . 5 ⊢ (𝜑 → ((ϕ‘𝑁) · 1) = (ϕ‘𝑁))
33	29, 30, 32	3eqtrd 2769	. . . 4 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 1 = (ϕ‘𝑁))
34	33	adantr 480	. . 3 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 1 = (ϕ‘𝑁))
35	17, 34	eqtrd 2765	. 2 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = (ϕ‘𝑁))
36	4	dchrabl 27185	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → 𝐺 ∈ Abel)
37		ablgrp 19690	. . . . . . . 8 ⊢ (𝐺 ∈ Abel → 𝐺 ∈ Grp)
38	9, 6	grpidcl 18870	. . . . . . . 8 ⊢ (𝐺 ∈ Grp → 1 ∈ 𝐷)
39	11, 36, 37, 38	4syl 19	. . . . . . 7 ⊢ (𝜑 → 1 ∈ 𝐷)
40	4, 5, 9, 7, 8, 39	dchreq 27189	. . . . . 6 ⊢ (𝜑 → (𝑋 = 1 ↔ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘)))
41	40	notbid 318	. . . . 5 ⊢ (𝜑 → (¬ 𝑋 = 1 ↔ ¬ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘)))
42		rexnal 3082	. . . . 5 ⊢ (∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘) ↔ ¬ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘))
43	41, 42	bitr4di 289	. . . 4 ⊢ (𝜑 → (¬ 𝑋 = 1 ↔ ∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘)))
44		df-ne 2927	. . . . . 6 ⊢ ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) ↔ ¬ (𝑋‘𝑘) = ( 1 ‘𝑘))
45	11	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑁 ∈ ℕ)
46		simpr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑘 ∈ 𝑈)
47	4, 5, 6, 7, 45, 46	dchr1 27188	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ( 1 ‘𝑘) = 1)
48	47	neeq2d 2986	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) ↔ (𝑋‘𝑘) ≠ 1))
49	26	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑈 ∈ Fin)
50		eqid 2730	. . . . . . . . . . . . 13 ⊢ (Base‘𝑍) = (Base‘𝑍)
51	4, 5, 9, 50, 8	dchrf 27173	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋:(Base‘𝑍)⟶ℂ)
52	50, 7	unitss 20287	. . . . . . . . . . . . 13 ⊢ 𝑈 ⊆ (Base‘𝑍)
53	52	sseli 3928	. . . . . . . . . . . 12 ⊢ (𝑎 ∈ 𝑈 → 𝑎 ∈ (Base‘𝑍))
54		ffvelcdm 7009	. . . . . . . . . . . 12 ⊢ ((𝑋:(Base‘𝑍)⟶ℂ ∧ 𝑎 ∈ (Base‘𝑍)) → (𝑋‘𝑎) ∈ ℂ)
55	51, 53, 54	syl2an 596	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) ∈ ℂ)
56	55	adantlr 715	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) ∈ ℂ)
57	49, 56	fsumcl 15632	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) ∈ ℂ)
58		0cnd 11097	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 0 ∈ ℂ)
59	51	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑋:(Base‘𝑍)⟶ℂ)
60		simprl 770	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑘 ∈ 𝑈)
61	52, 60	sselid 3930	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑘 ∈ (Base‘𝑍))
62	59, 61	ffvelcdmd 7013	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (𝑋‘𝑘) ∈ ℂ)
63		subcl 11351	. . . . . . . . . 10 ⊢ (((𝑋‘𝑘) ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑋‘𝑘) − 1) ∈ ℂ)
64	62, 27, 63	sylancl 586	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) − 1) ∈ ℂ)
65		simprr 772	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (𝑋‘𝑘) ≠ 1)
66		subeq0 11379	. . . . . . . . . . . 12 ⊢ (((𝑋‘𝑘) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝑋‘𝑘) − 1) = 0 ↔ (𝑋‘𝑘) = 1))
67	62, 27, 66	sylancl 586	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) = 0 ↔ (𝑋‘𝑘) = 1))
68	67	necon3bid 2970	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) ≠ 0 ↔ (𝑋‘𝑘) ≠ 1))
69	65, 68	mpbird 257	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) − 1) ≠ 0)
70		oveq2 7349	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑎 → (𝑘(._r‘𝑍)𝑥) = (𝑘(._r‘𝑍)𝑎))
71	70	fveq2d 6821	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → (𝑋‘(𝑘(._r‘𝑍)𝑥)) = (𝑋‘(𝑘(._r‘𝑍)𝑎)))
72	71	cbvsumv 15595	. . . . . . . . . . . . . 14 ⊢ Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)) = Σ𝑎 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑎))
73	4, 5, 9	dchrmhm 27172	. . . . . . . . . . . . . . . . . 18 ⊢ 𝐷 ⊆ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld))
74	73, 8	sselid 3930	. . . . . . . . . . . . . . . . 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 2730	. . . . . . . . . . . . . . . . . 18 ⊢ (mulGrp‘𝑍) = (mulGrp‘𝑍)
79	78, 50	mgpbas 20056	. . . . . . . . . . . . . . . . 17 ⊢ (Base‘𝑍) = (Base‘(mulGrp‘𝑍))
80		eqid 2730	. . . . . . . . . . . . . . . . . 18 ⊢ (._r‘𝑍) = (._r‘𝑍)
81	78, 80	mgpplusg 20055	. . . . . . . . . . . . . . . . 17 ⊢ (._r‘𝑍) = (+_g‘(mulGrp‘𝑍))
82		eqid 2730	. . . . . . . . . . . . . . . . . 18 ⊢ (mulGrp‘ℂ_fld) = (mulGrp‘ℂ_fld)
83		cnfldmul 21292	. . . . . . . . . . . . . . . . . 18 ⊢ · = (._r‘ℂ_fld)
84	82, 83	mgpplusg 20055	. . . . . . . . . . . . . . . . 17 ⊢ · = (+_g‘(mulGrp‘ℂ_fld))
85	79, 81, 84	mhmlin 18693	. . . . . . . . . . . . . . . 16 ⊢ ((𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)) ∧ 𝑘 ∈ (Base‘𝑍) ∧ 𝑎 ∈ (Base‘𝑍)) → (𝑋‘(𝑘(._r‘𝑍)𝑎)) = ((𝑋‘𝑘) · (𝑋‘𝑎)))
86	75, 76, 77, 85	syl3anc 1373	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → (𝑋‘(𝑘(._r‘𝑍)𝑎)) = ((𝑋‘𝑘) · (𝑋‘𝑎)))
87	86	sumeq2dv 15601	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑎)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
88	72, 87	eqtrid 2777	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
89		fveq2 6817	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝑘(._r‘𝑍)𝑥) → (𝑋‘𝑎) = (𝑋‘(𝑘(._r‘𝑍)𝑥)))
90	11	nnnn0d 12434	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
91	5	zncrng 21474	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ ℕ₀ → 𝑍 ∈ CRing)
92		crngring 20156	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ CRing → 𝑍 ∈ Ring)
93		eqid 2730	. . . . . . . . . . . . . . . . 17 ⊢ ((mulGrp‘𝑍) ↾_s 𝑈) = ((mulGrp‘𝑍) ↾_s 𝑈)
94	7, 93	unitgrp 20294	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ Ring → ((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp)
95	90, 91, 92, 94	4syl 19	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp)
96		eqid 2730	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐))) = (𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))
97	7, 93	unitgrpbas 20293	. . . . . . . . . . . . . . . 16 ⊢ 𝑈 = (Base‘((mulGrp‘𝑍) ↾_s 𝑈))
98	93, 81	ressplusg 17187	. . . . . . . . . . . . . . . . 17 ⊢ (𝑈 ∈ V → (._r‘𝑍) = (+_g‘((mulGrp‘𝑍) ↾_s 𝑈)))
99	23, 98	ax-mp 5	. . . . . . . . . . . . . . . 16 ⊢ (._r‘𝑍) = (+_g‘((mulGrp‘𝑍) ↾_s 𝑈))
100	96, 97, 99	grplactf1o 18949	. . . . . . . . . . . . . . 15 ⊢ ((((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp ∧ 𝑘 ∈ 𝑈) → ((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘):𝑈–1-1-onto→𝑈)
101	95, 60, 100	syl2an2r 685	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘):𝑈–1-1-onto→𝑈)
102	96, 97	grplactval 18947	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ 𝑈 ∧ 𝑥 ∈ 𝑈) → (((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘)‘𝑥) = (𝑘(._r‘𝑍)𝑥))
103	60, 102	sylan 580	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑥 ∈ 𝑈) → (((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘)‘𝑥) = (𝑘(._r‘𝑍)𝑥))
104	89, 49, 101, 103, 56	fsumf1o 15622	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)))
105	49, 62, 56	fsummulc2 15683	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
106	88, 104, 105	3eqtr4rd 2776	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))
107	57	mullidd 11122	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))
108	106, 107	oveq12d 7359	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))) = (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) − Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)))
109	57	subidd 11452	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) − Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = 0)
110	108, 109	eqtrd 2765	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))) = 0)
111		1cnd 11099	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 1 ∈ ℂ)
112	62, 111, 57	subdird 11566	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))))
113	64	mul01d 11304	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · 0) = 0)
114	110, 112, 113	3eqtr4d 2775	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = (((𝑋‘𝑘) − 1) · 0))
115	57, 58, 64, 69, 114	mulcanad 11744	. . . . . . . 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 3131	. . . 4 ⊢ (𝜑 → (∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
120	43, 119	sylbid 240	. . 3 ⊢ (𝜑 → (¬ 𝑋 = 1 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
121	120	imp 406	. 2 ⊢ ((𝜑 ∧ ¬ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0)
122	1, 2, 35, 121	ifbothda 4512	1 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 = wceq 1541 ∈ wcel 2110 ≠ wne 2926 ∀wral 3045 ∃wrex 3054 Vcvv 3434 ifcif 4473 ↦ cmpt 5170 ⟶wf 6473 –1-1-onto→wf1o 6476 ‘cfv 6477 (class class class)co 7341 Fincfn 8864 ℂcc 10996 0cc0 10998 1c1 10999 · cmul 11003 − cmin 11336 ℕcn 12117 ℕ₀cn0 12373 ♯chash 14229 Σcsu 15585 ϕcphi 16667 Basecbs 17112 ↾_s cress 17133 +_gcplusg 17153 ._rcmulr 17154 0_gc0g 17335 MndHom cmhm 18681 Grpcgrp 18838 Abelcabl 19686 mulGrpcmgp 20051 Ringcrg 20144 CRingccrg 20145 Unitcui 20266 ℂ_fldccnfld 21284 ℤ/nℤczn 21432 DChrcdchr 27163

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 2112 ax-9 2120 ax-10 2143 ax-11 2159 ax-12 2179 ax-ext 2702 ax-rep 5215 ax-sep 5232 ax-nul 5242 ax-pow 5301 ax-pr 5368 ax-un 7663 ax-inf2 9526 ax-cnex 11054 ax-resscn 11055 ax-1cn 11056 ax-icn 11057 ax-addcl 11058 ax-addrcl 11059 ax-mulcl 11060 ax-mulrcl 11061 ax-mulcom 11062 ax-addass 11063 ax-mulass 11064 ax-distr 11065 ax-i2m1 11066 ax-1ne0 11067 ax-1rid 11068 ax-rnegex 11069 ax-rrecex 11070 ax-cnre 11071 ax-pre-lttri 11072 ax-pre-lttrn 11073 ax-pre-ltadd 11074 ax-pre-mulgt0 11075 ax-pre-sup 11076 ax-addf 11077 ax-mulf 11078

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 2067 df-mo 2534 df-eu 2563 df-clab 2709 df-cleq 2722 df-clel 2804 df-nfc 2879 df-ne 2927 df-nel 3031 df-ral 3046 df-rex 3055 df-rmo 3344 df-reu 3345 df-rab 3394 df-v 3436 df-sbc 3740 df-csb 3849 df-dif 3903 df-un 3905 df-in 3907 df-ss 3917 df-pss 3920 df-nul 4282 df-if 4474 df-pw 4550 df-sn 4575 df-pr 4577 df-tp 4579 df-op 4581 df-uni 4858 df-int 4896 df-iun 4941 df-br 5090 df-opab 5152 df-mpt 5171 df-tr 5197 df-id 5509 df-eprel 5514 df-po 5522 df-so 5523 df-fr 5567 df-se 5568 df-we 5569 df-xp 5620 df-rel 5621 df-cnv 5622 df-co 5623 df-dm 5624 df-rn 5625 df-res 5626 df-ima 5627 df-pred 6244 df-ord 6305 df-on 6306 df-lim 6307 df-suc 6308 df-iota 6433 df-fun 6479 df-fn 6480 df-f 6481 df-f1 6482 df-fo 6483 df-f1o 6484 df-fv 6485 df-isom 6486 df-riota 7298 df-ov 7344 df-oprab 7345 df-mpo 7346 df-of 7605 df-om 7792 df-1st 7916 df-2nd 7917 df-tpos 8151 df-frecs 8206 df-wrecs 8237 df-recs 8286 df-rdg 8324 df-1o 8380 df-oadd 8384 df-er 8617 df-ec 8619 df-qs 8623 df-map 8747 df-en 8865 df-dom 8866 df-sdom 8867 df-fin 8868 df-sup 9321 df-inf 9322 df-oi 9391 df-card 9824 df-pnf 11140 df-mnf 11141 df-xr 11142 df-ltxr 11143 df-le 11144 df-sub 11338 df-neg 11339 df-div 11767 df-nn 12118 df-2 12180 df-3 12181 df-4 12182 df-5 12183 df-6 12184 df-7 12185 df-8 12186 df-9 12187 df-n0 12374 df-xnn0 12447 df-z 12461 df-dec 12581 df-uz 12725 df-rp 12883 df-fz 13400 df-fzo 13547 df-fl 13688 df-mod 13766 df-seq 13901 df-exp 13961 df-hash 14230 df-cj 14998 df-re 14999 df-im 15000 df-sqrt 15134 df-abs 15135 df-clim 15387 df-sum 15586 df-dvds 16156 df-gcd 16398 df-phi 16669 df-struct 17050 df-sets 17067 df-slot 17085 df-ndx 17097 df-base 17113 df-ress 17134 df-plusg 17166 df-mulr 17167 df-starv 17168 df-sca 17169 df-vsca 17170 df-ip 17171 df-tset 17172 df-ple 17173 df-ds 17175 df-unif 17176 df-0g 17337 df-imas 17404 df-qus 17405 df-mgm 18540 df-sgrp 18619 df-mnd 18635 df-mhm 18683 df-grp 18841 df-minusg 18842 df-sbg 18843 df-mulg 18973 df-subg 19028 df-nsg 19029 df-eqg 19030 df-ghm 19118 df-cmn 19687 df-abl 19688 df-mgp 20052 df-rng 20064 df-ur 20093 df-ring 20146 df-cring 20147 df-oppr 20248 df-dvdsr 20268 df-unit 20269 df-invr 20299 df-rhm 20383 df-subrng 20454 df-subrg 20478 df-lmod 20788 df-lss 20858 df-lsp 20898 df-sra 21100 df-rgmod 21101 df-lidl 21138 df-rsp 21139 df-2idl 21180 df-cnfld 21285 df-zring 21377 df-zrh 21433 df-zn 21436 df-dchr 27164

This theorem is referenced by: dchrsum 27200

W3C validator