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 27219

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 2747	. 2 ⊢ ((ϕ‘𝑁) = if(𝑋 = 1 , (ϕ‘𝑁), 0) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = (ϕ‘𝑁) ↔ Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0)))
2		eqeq2 2747	. 2 ⊢ (0 = if(𝑋 = 1 , (ϕ‘𝑁), 0) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0 ↔ Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0)))
3		fveq1 6828	. . . . . 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 27191	. . . . . . . . 9 ⊢ (𝑋 ∈ 𝐷 → 𝑁 ∈ ℕ)
11	8, 10	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
12	11	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → 𝑁 ∈ ℕ)
13		simpr 484	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → 𝑎 ∈ 𝑈)
14	4, 5, 6, 7, 12, 13	dchr1 27208	. . . . . 6 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → ( 1 ‘𝑎) = 1)
15	3, 14	sylan9eqr 2792	. . . . 5 ⊢ (((𝜑 ∧ 𝑎 ∈ 𝑈) ∧ 𝑋 = 1 ) → (𝑋‘𝑎) = 1)
16	15	an32s 653	. . . 4 ⊢ (((𝜑 ∧ 𝑋 = 1 ) ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) = 1)
17	16	sumeq2dv 15653	. . 3 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = Σ𝑎 ∈ 𝑈 1)
18	5, 7	znunithash 21533	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (♯‘𝑈) = (ϕ‘𝑁))
19	11, 18	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑈) = (ϕ‘𝑁))
20	11	phicld 16731	. . . . . . . . 9 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℕ)
21	20	nnnn0d 12487	. . . . . . . 8 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℕ₀)
22	19, 21	eqeltrd 2835	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑈) ∈ ℕ₀)
23	7	fvexi 6843	. . . . . . . 8 ⊢ 𝑈 ∈ V
24		hashclb 14309	. . . . . . . 8 ⊢ (𝑈 ∈ V → (𝑈 ∈ Fin ↔ (♯‘𝑈) ∈ ℕ₀))
25	23, 24	ax-mp 5	. . . . . . 7 ⊢ (𝑈 ∈ Fin ↔ (♯‘𝑈) ∈ ℕ₀)
26	22, 25	sylibr 234	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ Fin)
27		ax-1cn 11085	. . . . . 6 ⊢ 1 ∈ ℂ
28		fsumconst 15741	. . . . . 6 ⊢ ((𝑈 ∈ Fin ∧ 1 ∈ ℂ) → Σ𝑎 ∈ 𝑈 1 = ((♯‘𝑈) · 1))
29	26, 27, 28	sylancl 587	. . . . 5 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 1 = ((♯‘𝑈) · 1))
30	19	oveq1d 7371	. . . . 5 ⊢ (𝜑 → ((♯‘𝑈) · 1) = ((ϕ‘𝑁) · 1))
31	20	nncnd 12179	. . . . . 6 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℂ)
32	31	mulridd 11151	. . . . 5 ⊢ (𝜑 → ((ϕ‘𝑁) · 1) = (ϕ‘𝑁))
33	29, 30, 32	3eqtrd 2774	. . . 4 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 1 = (ϕ‘𝑁))
34	33	adantr 480	. . 3 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 1 = (ϕ‘𝑁))
35	17, 34	eqtrd 2770	. 2 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = (ϕ‘𝑁))
36	4	dchrabl 27205	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → 𝐺 ∈ Abel)
37		ablgrp 19749	. . . . . . . 8 ⊢ (𝐺 ∈ Abel → 𝐺 ∈ Grp)
38	9, 6	grpidcl 18930	. . . . . . . 8 ⊢ (𝐺 ∈ Grp → 1 ∈ 𝐷)
39	11, 36, 37, 38	4syl 19	. . . . . . 7 ⊢ (𝜑 → 1 ∈ 𝐷)
40	4, 5, 9, 7, 8, 39	dchreq 27209	. . . . . 6 ⊢ (𝜑 → (𝑋 = 1 ↔ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘)))
41	40	notbid 318	. . . . 5 ⊢ (𝜑 → (¬ 𝑋 = 1 ↔ ¬ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘)))
42		rexnal 3087	. . . . 5 ⊢ (∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘) ↔ ¬ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘))
43	41, 42	bitr4di 289	. . . 4 ⊢ (𝜑 → (¬ 𝑋 = 1 ↔ ∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘)))
44		df-ne 2931	. . . . . 6 ⊢ ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) ↔ ¬ (𝑋‘𝑘) = ( 1 ‘𝑘))
45	11	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑁 ∈ ℕ)
46		simpr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑘 ∈ 𝑈)
47	4, 5, 6, 7, 45, 46	dchr1 27208	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ( 1 ‘𝑘) = 1)
48	47	neeq2d 2990	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) ↔ (𝑋‘𝑘) ≠ 1))
49	26	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑈 ∈ Fin)
50		eqid 2735	. . . . . . . . . . . . 13 ⊢ (Base‘𝑍) = (Base‘𝑍)
51	4, 5, 9, 50, 8	dchrf 27193	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋:(Base‘𝑍)⟶ℂ)
52	50, 7	unitss 20345	. . . . . . . . . . . . 13 ⊢ 𝑈 ⊆ (Base‘𝑍)
53	52	sseli 3913	. . . . . . . . . . . 12 ⊢ (𝑎 ∈ 𝑈 → 𝑎 ∈ (Base‘𝑍))
54		ffvelcdm 7022	. . . . . . . . . . . 12 ⊢ ((𝑋:(Base‘𝑍)⟶ℂ ∧ 𝑎 ∈ (Base‘𝑍)) → (𝑋‘𝑎) ∈ ℂ)
55	51, 53, 54	syl2an 597	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) ∈ ℂ)
56	55	adantlr 716	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) ∈ ℂ)
57	49, 56	fsumcl 15684	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) ∈ ℂ)
58		0cnd 11126	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 0 ∈ ℂ)
59	51	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑋:(Base‘𝑍)⟶ℂ)
60		simprl 771	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑘 ∈ 𝑈)
61	52, 60	sselid 3915	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑘 ∈ (Base‘𝑍))
62	59, 61	ffvelcdmd 7026	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (𝑋‘𝑘) ∈ ℂ)
63		subcl 11381	. . . . . . . . . 10 ⊢ (((𝑋‘𝑘) ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑋‘𝑘) − 1) ∈ ℂ)
64	62, 27, 63	sylancl 587	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) − 1) ∈ ℂ)
65		simprr 773	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (𝑋‘𝑘) ≠ 1)
66		subeq0 11409	. . . . . . . . . . . 12 ⊢ (((𝑋‘𝑘) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝑋‘𝑘) − 1) = 0 ↔ (𝑋‘𝑘) = 1))
67	62, 27, 66	sylancl 587	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) = 0 ↔ (𝑋‘𝑘) = 1))
68	67	necon3bid 2974	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) ≠ 0 ↔ (𝑋‘𝑘) ≠ 1))
69	65, 68	mpbird 257	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) − 1) ≠ 0)
70		oveq2 7364	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑎 → (𝑘(._r‘𝑍)𝑥) = (𝑘(._r‘𝑍)𝑎))
71	70	fveq2d 6833	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → (𝑋‘(𝑘(._r‘𝑍)𝑥)) = (𝑋‘(𝑘(._r‘𝑍)𝑎)))
72	71	cbvsumv 15647	. . . . . . . . . . . . . 14 ⊢ Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)) = Σ𝑎 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑎))
73	4, 5, 9	dchrmhm 27192	. . . . . . . . . . . . . . . . . 18 ⊢ 𝐷 ⊆ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld))
74	73, 8	sselid 3915	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)))
75	74	ad2antrr 727	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → 𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)))
76	61	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → 𝑘 ∈ (Base‘𝑍))
77	53	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → 𝑎 ∈ (Base‘𝑍))
78		eqid 2735	. . . . . . . . . . . . . . . . . 18 ⊢ (mulGrp‘𝑍) = (mulGrp‘𝑍)
79	78, 50	mgpbas 20115	. . . . . . . . . . . . . . . . 17 ⊢ (Base‘𝑍) = (Base‘(mulGrp‘𝑍))
80		eqid 2735	. . . . . . . . . . . . . . . . . 18 ⊢ (._r‘𝑍) = (._r‘𝑍)
81	78, 80	mgpplusg 20114	. . . . . . . . . . . . . . . . 17 ⊢ (._r‘𝑍) = (+_g‘(mulGrp‘𝑍))
82		eqid 2735	. . . . . . . . . . . . . . . . . 18 ⊢ (mulGrp‘ℂ_fld) = (mulGrp‘ℂ_fld)
83		cnfldmul 21349	. . . . . . . . . . . . . . . . . 18 ⊢ · = (._r‘ℂ_fld)
84	82, 83	mgpplusg 20114	. . . . . . . . . . . . . . . . 17 ⊢ · = (+_g‘(mulGrp‘ℂ_fld))
85	79, 81, 84	mhmlin 18750	. . . . . . . . . . . . . . . 16 ⊢ ((𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)) ∧ 𝑘 ∈ (Base‘𝑍) ∧ 𝑎 ∈ (Base‘𝑍)) → (𝑋‘(𝑘(._r‘𝑍)𝑎)) = ((𝑋‘𝑘) · (𝑋‘𝑎)))
86	75, 76, 77, 85	syl3anc 1374	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → (𝑋‘(𝑘(._r‘𝑍)𝑎)) = ((𝑋‘𝑘) · (𝑋‘𝑎)))
87	86	sumeq2dv 15653	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑎)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
88	72, 87	eqtrid 2782	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
89		fveq2 6829	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝑘(._r‘𝑍)𝑥) → (𝑋‘𝑎) = (𝑋‘(𝑘(._r‘𝑍)𝑥)))
90	11	nnnn0d 12487	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
91	5	zncrng 21513	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ ℕ₀ → 𝑍 ∈ CRing)
92		crngring 20215	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ CRing → 𝑍 ∈ Ring)
93		eqid 2735	. . . . . . . . . . . . . . . . 17 ⊢ ((mulGrp‘𝑍) ↾_s 𝑈) = ((mulGrp‘𝑍) ↾_s 𝑈)
94	7, 93	unitgrp 20352	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ Ring → ((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp)
95	90, 91, 92, 94	4syl 19	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp)
96		eqid 2735	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐))) = (𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))
97	7, 93	unitgrpbas 20351	. . . . . . . . . . . . . . . 16 ⊢ 𝑈 = (Base‘((mulGrp‘𝑍) ↾_s 𝑈))
98	93, 81	ressplusg 17243	. . . . . . . . . . . . . . . . 17 ⊢ (𝑈 ∈ V → (._r‘𝑍) = (+_g‘((mulGrp‘𝑍) ↾_s 𝑈)))
99	23, 98	ax-mp 5	. . . . . . . . . . . . . . . 16 ⊢ (._r‘𝑍) = (+_g‘((mulGrp‘𝑍) ↾_s 𝑈))
100	96, 97, 99	grplactf1o 19009	. . . . . . . . . . . . . . 15 ⊢ ((((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp ∧ 𝑘 ∈ 𝑈) → ((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘):𝑈–1-1-onto→𝑈)
101	95, 60, 100	syl2an2r 686	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘):𝑈–1-1-onto→𝑈)
102	96, 97	grplactval 19007	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ 𝑈 ∧ 𝑥 ∈ 𝑈) → (((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘)‘𝑥) = (𝑘(._r‘𝑍)𝑥))
103	60, 102	sylan 581	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑥 ∈ 𝑈) → (((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘)‘𝑥) = (𝑘(._r‘𝑍)𝑥))
104	89, 49, 101, 103, 56	fsumf1o 15674	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)))
105	49, 62, 56	fsummulc2 15735	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
106	88, 104, 105	3eqtr4rd 2781	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))
107	57	mullidd 11152	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))
108	106, 107	oveq12d 7374	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))) = (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) − Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)))
109	57	subidd 11482	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) − Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = 0)
110	108, 109	eqtrd 2770	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))) = 0)
111		1cnd 11128	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 1 ∈ ℂ)
112	62, 111, 57	subdird 11596	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))))
113	64	mul01d 11334	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · 0) = 0)
114	110, 112, 113	3eqtr4d 2780	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = (((𝑋‘𝑘) − 1) · 0))
115	57, 58, 64, 69, 114	mulcanad 11774	. . . . . . . 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 3136	. . . 4 ⊢ (𝜑 → (∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
120	43, 119	sylbid 240	. . 3 ⊢ (𝜑 → (¬ 𝑋 = 1 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
121	120	imp 406	. 2 ⊢ ((𝜑 ∧ ¬ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0)
122	1, 2, 35, 121	ifbothda 4495	1 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 = wceq 1542 ∈ wcel 2114 ≠ wne 2930 ∀wral 3049 ∃wrex 3059 Vcvv 3427 ifcif 4456 ↦ cmpt 5155 ⟶wf 6483 –1-1-onto→wf1o 6486 ‘cfv 6487 (class class class)co 7356 Fincfn 8882 ℂcc 11025 0cc0 11027 1c1 11028 · cmul 11032 − cmin 11366 ℕcn 12163 ℕ₀cn0 12426 ♯chash 14281 Σcsu 15637 ϕcphi 16723 Basecbs 17168 ↾_s cress 17189 +_gcplusg 17209 ._rcmulr 17210 0_gc0g 17391 MndHom cmhm 18738 Grpcgrp 18898 Abelcabl 19745 mulGrpcmgp 20110 Ringcrg 20203 CRingccrg 20204 Unitcui 20324 ℂ_fldccnfld 21341 ℤ/nℤczn 21471 DChrcdchr 27183

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2184 ax-ext 2707 ax-rep 5201 ax-sep 5220 ax-nul 5230 ax-pow 5296 ax-pr 5364 ax-un 7678 ax-inf2 9551 ax-cnex 11083 ax-resscn 11084 ax-1cn 11085 ax-icn 11086 ax-addcl 11087 ax-addrcl 11088 ax-mulcl 11089 ax-mulrcl 11090 ax-mulcom 11091 ax-addass 11092 ax-mulass 11093 ax-distr 11094 ax-i2m1 11095 ax-1ne0 11096 ax-1rid 11097 ax-rnegex 11098 ax-rrecex 11099 ax-cnre 11100 ax-pre-lttri 11101 ax-pre-lttrn 11102 ax-pre-ltadd 11103 ax-pre-mulgt0 11104 ax-pre-sup 11105 ax-addf 11106 ax-mulf 11107

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2538 df-eu 2568 df-clab 2714 df-cleq 2727 df-clel 2810 df-nfc 2884 df-ne 2931 df-nel 3035 df-ral 3050 df-rex 3060 df-rmo 3340 df-reu 3341 df-rab 3388 df-v 3429 df-sbc 3726 df-csb 3834 df-dif 3888 df-un 3890 df-in 3892 df-ss 3902 df-pss 3905 df-nul 4264 df-if 4457 df-pw 4533 df-sn 4558 df-pr 4560 df-tp 4562 df-op 4564 df-uni 4841 df-int 4880 df-iun 4925 df-br 5075 df-opab 5137 df-mpt 5156 df-tr 5182 df-id 5515 df-eprel 5520 df-po 5528 df-so 5529 df-fr 5573 df-se 5574 df-we 5575 df-xp 5626 df-rel 5627 df-cnv 5628 df-co 5629 df-dm 5630 df-rn 5631 df-res 5632 df-ima 5633 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 7313 df-ov 7359 df-oprab 7360 df-mpo 7361 df-of 7620 df-om 7807 df-1st 7931 df-2nd 7932 df-tpos 8165 df-frecs 8220 df-wrecs 8251 df-recs 8300 df-rdg 8338 df-1o 8394 df-oadd 8398 df-er 8632 df-ec 8634 df-qs 8638 df-map 8764 df-en 8883 df-dom 8884 df-sdom 8885 df-fin 8886 df-sup 9344 df-inf 9345 df-oi 9414 df-card 9852 df-pnf 11170 df-mnf 11171 df-xr 11172 df-ltxr 11173 df-le 11174 df-sub 11368 df-neg 11369 df-div 11797 df-nn 12164 df-2 12233 df-3 12234 df-4 12235 df-5 12236 df-6 12237 df-7 12238 df-8 12239 df-9 12240 df-n0 12427 df-xnn0 12500 df-z 12514 df-dec 12634 df-uz 12778 df-rp 12932 df-fz 13451 df-fzo 13598 df-fl 13740 df-mod 13818 df-seq 13953 df-exp 14013 df-hash 14282 df-cj 15050 df-re 15051 df-im 15052 df-sqrt 15186 df-abs 15187 df-clim 15439 df-sum 15638 df-dvds 16211 df-gcd 16453 df-phi 16725 df-struct 17106 df-sets 17123 df-slot 17141 df-ndx 17153 df-base 17169 df-ress 17190 df-plusg 17222 df-mulr 17223 df-starv 17224 df-sca 17225 df-vsca 17226 df-ip 17227 df-tset 17228 df-ple 17229 df-ds 17231 df-unif 17232 df-0g 17393 df-imas 17461 df-qus 17462 df-mgm 18597 df-sgrp 18676 df-mnd 18692 df-mhm 18740 df-grp 18901 df-minusg 18902 df-sbg 18903 df-mulg 19033 df-subg 19088 df-nsg 19089 df-eqg 19090 df-ghm 19177 df-cmn 19746 df-abl 19747 df-mgp 20111 df-rng 20123 df-ur 20152 df-ring 20205 df-cring 20206 df-oppr 20306 df-dvdsr 20326 df-unit 20327 df-invr 20357 df-rhm 20441 df-subrng 20512 df-subrg 20536 df-lmod 20846 df-lss 20916 df-lsp 20956 df-sra 21157 df-rgmod 21158 df-lidl 21195 df-rsp 21196 df-2idl 21237 df-cnfld 21342 df-zring 21416 df-zrh 21472 df-zn 21475 df-dchr 27184

This theorem is referenced by: dchrsum 27220

W3C validator