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 27297

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 2738	. 2 ⊢ ((ϕ‘𝑁) = if(𝑋 = 1 , (ϕ‘𝑁), 0) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = (ϕ‘𝑁) ↔ Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0)))
2		eqeq2 2738	. 2 ⊢ (0 = if(𝑋 = 1 , (ϕ‘𝑁), 0) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0 ↔ Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0)))
3		fveq1 6900	. . . . . 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 27269	. . . . . . . . 9 ⊢ (𝑋 ∈ 𝐷 → 𝑁 ∈ ℕ)
11	8, 10	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
12	11	adantr 479	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → 𝑁 ∈ ℕ)
13		simpr 483	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → 𝑎 ∈ 𝑈)
14	4, 5, 6, 7, 12, 13	dchr1 27286	. . . . . 6 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → ( 1 ‘𝑎) = 1)
15	3, 14	sylan9eqr 2788	. . . . 5 ⊢ (((𝜑 ∧ 𝑎 ∈ 𝑈) ∧ 𝑋 = 1 ) → (𝑋‘𝑎) = 1)
16	15	an32s 650	. . . 4 ⊢ (((𝜑 ∧ 𝑋 = 1 ) ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) = 1)
17	16	sumeq2dv 15707	. . 3 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = Σ𝑎 ∈ 𝑈 1)
18	5, 7	znunithash 21562	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (♯‘𝑈) = (ϕ‘𝑁))
19	11, 18	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑈) = (ϕ‘𝑁))
20	11	phicld 16774	. . . . . . . . 9 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℕ)
21	20	nnnn0d 12584	. . . . . . . 8 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℕ₀)
22	19, 21	eqeltrd 2826	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑈) ∈ ℕ₀)
23	7	fvexi 6915	. . . . . . . 8 ⊢ 𝑈 ∈ V
24		hashclb 14375	. . . . . . . 8 ⊢ (𝑈 ∈ V → (𝑈 ∈ Fin ↔ (♯‘𝑈) ∈ ℕ₀))
25	23, 24	ax-mp 5	. . . . . . 7 ⊢ (𝑈 ∈ Fin ↔ (♯‘𝑈) ∈ ℕ₀)
26	22, 25	sylibr 233	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ Fin)
27		ax-1cn 11216	. . . . . 6 ⊢ 1 ∈ ℂ
28		fsumconst 15794	. . . . . 6 ⊢ ((𝑈 ∈ Fin ∧ 1 ∈ ℂ) → Σ𝑎 ∈ 𝑈 1 = ((♯‘𝑈) · 1))
29	26, 27, 28	sylancl 584	. . . . 5 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 1 = ((♯‘𝑈) · 1))
30	19	oveq1d 7439	. . . . 5 ⊢ (𝜑 → ((♯‘𝑈) · 1) = ((ϕ‘𝑁) · 1))
31	20	nncnd 12280	. . . . . 6 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℂ)
32	31	mulridd 11281	. . . . 5 ⊢ (𝜑 → ((ϕ‘𝑁) · 1) = (ϕ‘𝑁))
33	29, 30, 32	3eqtrd 2770	. . . 4 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 1 = (ϕ‘𝑁))
34	33	adantr 479	. . 3 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 1 = (ϕ‘𝑁))
35	17, 34	eqtrd 2766	. 2 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = (ϕ‘𝑁))
36	4	dchrabl 27283	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → 𝐺 ∈ Abel)
37		ablgrp 19783	. . . . . . . 8 ⊢ (𝐺 ∈ Abel → 𝐺 ∈ Grp)
38	9, 6	grpidcl 18960	. . . . . . . 8 ⊢ (𝐺 ∈ Grp → 1 ∈ 𝐷)
39	11, 36, 37, 38	4syl 19	. . . . . . 7 ⊢ (𝜑 → 1 ∈ 𝐷)
40	4, 5, 9, 7, 8, 39	dchreq 27287	. . . . . 6 ⊢ (𝜑 → (𝑋 = 1 ↔ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘)))
41	40	notbid 317	. . . . 5 ⊢ (𝜑 → (¬ 𝑋 = 1 ↔ ¬ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘)))
42		rexnal 3090	. . . . 5 ⊢ (∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘) ↔ ¬ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘))
43	41, 42	bitr4di 288	. . . 4 ⊢ (𝜑 → (¬ 𝑋 = 1 ↔ ∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘)))
44		df-ne 2931	. . . . . 6 ⊢ ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) ↔ ¬ (𝑋‘𝑘) = ( 1 ‘𝑘))
45	11	adantr 479	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑁 ∈ ℕ)
46		simpr 483	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑘 ∈ 𝑈)
47	4, 5, 6, 7, 45, 46	dchr1 27286	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ( 1 ‘𝑘) = 1)
48	47	neeq2d 2991	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) ↔ (𝑋‘𝑘) ≠ 1))
49	26	adantr 479	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑈 ∈ Fin)
50		eqid 2726	. . . . . . . . . . . . 13 ⊢ (Base‘𝑍) = (Base‘𝑍)
51	4, 5, 9, 50, 8	dchrf 27271	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋:(Base‘𝑍)⟶ℂ)
52	50, 7	unitss 20358	. . . . . . . . . . . . 13 ⊢ 𝑈 ⊆ (Base‘𝑍)
53	52	sseli 3975	. . . . . . . . . . . 12 ⊢ (𝑎 ∈ 𝑈 → 𝑎 ∈ (Base‘𝑍))
54		ffvelcdm 7095	. . . . . . . . . . . 12 ⊢ ((𝑋:(Base‘𝑍)⟶ℂ ∧ 𝑎 ∈ (Base‘𝑍)) → (𝑋‘𝑎) ∈ ℂ)
55	51, 53, 54	syl2an 594	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) ∈ ℂ)
56	55	adantlr 713	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) ∈ ℂ)
57	49, 56	fsumcl 15737	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) ∈ ℂ)
58		0cnd 11257	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 0 ∈ ℂ)
59	51	adantr 479	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑋:(Base‘𝑍)⟶ℂ)
60		simprl 769	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑘 ∈ 𝑈)
61	52, 60	sselid 3977	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑘 ∈ (Base‘𝑍))
62	59, 61	ffvelcdmd 7099	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (𝑋‘𝑘) ∈ ℂ)
63		subcl 11509	. . . . . . . . . 10 ⊢ (((𝑋‘𝑘) ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑋‘𝑘) − 1) ∈ ℂ)
64	62, 27, 63	sylancl 584	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) − 1) ∈ ℂ)
65		simprr 771	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (𝑋‘𝑘) ≠ 1)
66		subeq0 11536	. . . . . . . . . . . 12 ⊢ (((𝑋‘𝑘) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝑋‘𝑘) − 1) = 0 ↔ (𝑋‘𝑘) = 1))
67	62, 27, 66	sylancl 584	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) = 0 ↔ (𝑋‘𝑘) = 1))
68	67	necon3bid 2975	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) ≠ 0 ↔ (𝑋‘𝑘) ≠ 1))
69	65, 68	mpbird 256	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) − 1) ≠ 0)
70		oveq2 7432	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑎 → (𝑘(._r‘𝑍)𝑥) = (𝑘(._r‘𝑍)𝑎))
71	70	fveq2d 6905	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → (𝑋‘(𝑘(._r‘𝑍)𝑥)) = (𝑋‘(𝑘(._r‘𝑍)𝑎)))
72	71	cbvsumv 15700	. . . . . . . . . . . . . 14 ⊢ Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)) = Σ𝑎 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑎))
73	4, 5, 9	dchrmhm 27270	. . . . . . . . . . . . . . . . . 18 ⊢ 𝐷 ⊆ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld))
74	73, 8	sselid 3977	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)))
75	74	ad2antrr 724	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → 𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)))
76	61	adantr 479	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → 𝑘 ∈ (Base‘𝑍))
77	53	adantl 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → 𝑎 ∈ (Base‘𝑍))
78		eqid 2726	. . . . . . . . . . . . . . . . . 18 ⊢ (mulGrp‘𝑍) = (mulGrp‘𝑍)
79	78, 50	mgpbas 20123	. . . . . . . . . . . . . . . . 17 ⊢ (Base‘𝑍) = (Base‘(mulGrp‘𝑍))
80		eqid 2726	. . . . . . . . . . . . . . . . . 18 ⊢ (._r‘𝑍) = (._r‘𝑍)
81	78, 80	mgpplusg 20121	. . . . . . . . . . . . . . . . 17 ⊢ (._r‘𝑍) = (+_g‘(mulGrp‘𝑍))
82		eqid 2726	. . . . . . . . . . . . . . . . . 18 ⊢ (mulGrp‘ℂ_fld) = (mulGrp‘ℂ_fld)
83		cnfldmul 21351	. . . . . . . . . . . . . . . . . 18 ⊢ · = (._r‘ℂ_fld)
84	82, 83	mgpplusg 20121	. . . . . . . . . . . . . . . . 17 ⊢ · = (+_g‘(mulGrp‘ℂ_fld))
85	79, 81, 84	mhmlin 18783	. . . . . . . . . . . . . . . 16 ⊢ ((𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)) ∧ 𝑘 ∈ (Base‘𝑍) ∧ 𝑎 ∈ (Base‘𝑍)) → (𝑋‘(𝑘(._r‘𝑍)𝑎)) = ((𝑋‘𝑘) · (𝑋‘𝑎)))
86	75, 76, 77, 85	syl3anc 1368	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → (𝑋‘(𝑘(._r‘𝑍)𝑎)) = ((𝑋‘𝑘) · (𝑋‘𝑎)))
87	86	sumeq2dv 15707	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑎)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
88	72, 87	eqtrid 2778	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
89		fveq2 6901	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝑘(._r‘𝑍)𝑥) → (𝑋‘𝑎) = (𝑋‘(𝑘(._r‘𝑍)𝑥)))
90	11	nnnn0d 12584	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
91	5	zncrng 21542	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ ℕ₀ → 𝑍 ∈ CRing)
92		crngring 20228	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ CRing → 𝑍 ∈ Ring)
93		eqid 2726	. . . . . . . . . . . . . . . . 17 ⊢ ((mulGrp‘𝑍) ↾_s 𝑈) = ((mulGrp‘𝑍) ↾_s 𝑈)
94	7, 93	unitgrp 20365	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ Ring → ((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp)
95	90, 91, 92, 94	4syl 19	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp)
96		eqid 2726	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐))) = (𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))
97	7, 93	unitgrpbas 20364	. . . . . . . . . . . . . . . 16 ⊢ 𝑈 = (Base‘((mulGrp‘𝑍) ↾_s 𝑈))
98	93, 81	ressplusg 17304	. . . . . . . . . . . . . . . . 17 ⊢ (𝑈 ∈ V → (._r‘𝑍) = (+_g‘((mulGrp‘𝑍) ↾_s 𝑈)))
99	23, 98	ax-mp 5	. . . . . . . . . . . . . . . 16 ⊢ (._r‘𝑍) = (+_g‘((mulGrp‘𝑍) ↾_s 𝑈))
100	96, 97, 99	grplactf1o 19038	. . . . . . . . . . . . . . 15 ⊢ ((((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp ∧ 𝑘 ∈ 𝑈) → ((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘):𝑈–1-1-onto→𝑈)
101	95, 60, 100	syl2an2r 683	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘):𝑈–1-1-onto→𝑈)
102	96, 97	grplactval 19036	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ 𝑈 ∧ 𝑥 ∈ 𝑈) → (((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘)‘𝑥) = (𝑘(._r‘𝑍)𝑥))
103	60, 102	sylan 578	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑥 ∈ 𝑈) → (((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘)‘𝑥) = (𝑘(._r‘𝑍)𝑥))
104	89, 49, 101, 103, 56	fsumf1o 15727	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)))
105	49, 62, 56	fsummulc2 15788	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
106	88, 104, 105	3eqtr4rd 2777	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))
107	57	mullidd 11282	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))
108	106, 107	oveq12d 7442	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))) = (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) − Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)))
109	57	subidd 11609	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) − Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = 0)
110	108, 109	eqtrd 2766	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))) = 0)
111		1cnd 11259	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 1 ∈ ℂ)
112	62, 111, 57	subdird 11721	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))))
113	64	mul01d 11463	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · 0) = 0)
114	110, 112, 113	3eqtr4d 2776	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = (((𝑋‘𝑘) − 1) · 0))
115	57, 58, 64, 69, 114	mulcanad 11899	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0)
116	115	expr 455	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ((𝑋‘𝑘) ≠ 1 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
117	48, 116	sylbid 239	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
118	44, 117	biimtrrid 242	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → (¬ (𝑋‘𝑘) = ( 1 ‘𝑘) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
119	118	rexlimdva 3145	. . . 4 ⊢ (𝜑 → (∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
120	43, 119	sylbid 239	. . 3 ⊢ (𝜑 → (¬ 𝑋 = 1 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
121	120	imp 405	. 2 ⊢ ((𝜑 ∧ ¬ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0)
122	1, 2, 35, 121	ifbothda 4571	1 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 394 = wceq 1534 ∈ wcel 2099 ≠ wne 2930 ∀wral 3051 ∃wrex 3060 Vcvv 3462 ifcif 4533 ↦ cmpt 5236 ⟶wf 6550 –1-1-onto→wf1o 6553 ‘cfv 6554 (class class class)co 7424 Fincfn 8974 ℂcc 11156 0cc0 11158 1c1 11159 · cmul 11163 − cmin 11494 ℕcn 12264 ℕ₀cn0 12524 ♯chash 14347 Σcsu 15690 ϕcphi 16766 Basecbs 17213 ↾_s cress 17242 +_gcplusg 17266 ._rcmulr 17267 0_gc0g 17454 MndHom cmhm 18771 Grpcgrp 18928 Abelcabl 19779 mulGrpcmgp 20117 Ringcrg 20216 CRingccrg 20217 Unitcui 20337 ℂ_fldccnfld 21343 ℤ/nℤczn 21492 DChrcdchr 27261

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1790 ax-4 1804 ax-5 1906 ax-6 1964 ax-7 2004 ax-8 2101 ax-9 2109 ax-10 2130 ax-11 2147 ax-12 2167 ax-ext 2697 ax-rep 5290 ax-sep 5304 ax-nul 5311 ax-pow 5369 ax-pr 5433 ax-un 7746 ax-inf2 9684 ax-cnex 11214 ax-resscn 11215 ax-1cn 11216 ax-icn 11217 ax-addcl 11218 ax-addrcl 11219 ax-mulcl 11220 ax-mulrcl 11221 ax-mulcom 11222 ax-addass 11223 ax-mulass 11224 ax-distr 11225 ax-i2m1 11226 ax-1ne0 11227 ax-1rid 11228 ax-rnegex 11229 ax-rrecex 11230 ax-cnre 11231 ax-pre-lttri 11232 ax-pre-lttrn 11233 ax-pre-ltadd 11234 ax-pre-mulgt0 11235 ax-pre-sup 11236 ax-addf 11237 ax-mulf 11238

This theorem depends on definitions: df-bi 206 df-an 395 df-or 846 df-3or 1085 df-3an 1086 df-tru 1537 df-fal 1547 df-ex 1775 df-nf 1779 df-sb 2061 df-mo 2529 df-eu 2558 df-clab 2704 df-cleq 2718 df-clel 2803 df-nfc 2878 df-ne 2931 df-nel 3037 df-ral 3052 df-rex 3061 df-rmo 3364 df-reu 3365 df-rab 3420 df-v 3464 df-sbc 3777 df-csb 3893 df-dif 3950 df-un 3952 df-in 3954 df-ss 3964 df-pss 3967 df-nul 4326 df-if 4534 df-pw 4609 df-sn 4634 df-pr 4636 df-tp 4638 df-op 4640 df-uni 4914 df-int 4955 df-iun 5003 df-br 5154 df-opab 5216 df-mpt 5237 df-tr 5271 df-id 5580 df-eprel 5586 df-po 5594 df-so 5595 df-fr 5637 df-se 5638 df-we 5639 df-xp 5688 df-rel 5689 df-cnv 5690 df-co 5691 df-dm 5692 df-rn 5693 df-res 5694 df-ima 5695 df-pred 6312 df-ord 6379 df-on 6380 df-lim 6381 df-suc 6382 df-iota 6506 df-fun 6556 df-fn 6557 df-f 6558 df-f1 6559 df-fo 6560 df-f1o 6561 df-fv 6562 df-isom 6563 df-riota 7380 df-ov 7427 df-oprab 7428 df-mpo 7429 df-of 7690 df-om 7877 df-1st 8003 df-2nd 8004 df-tpos 8241 df-frecs 8296 df-wrecs 8327 df-recs 8401 df-rdg 8440 df-1o 8496 df-oadd 8500 df-er 8734 df-ec 8736 df-qs 8740 df-map 8857 df-en 8975 df-dom 8976 df-sdom 8977 df-fin 8978 df-sup 9485 df-inf 9486 df-oi 9553 df-card 9982 df-pnf 11300 df-mnf 11301 df-xr 11302 df-ltxr 11303 df-le 11304 df-sub 11496 df-neg 11497 df-div 11922 df-nn 12265 df-2 12327 df-3 12328 df-4 12329 df-5 12330 df-6 12331 df-7 12332 df-8 12333 df-9 12334 df-n0 12525 df-xnn0 12597 df-z 12611 df-dec 12730 df-uz 12875 df-rp 13029 df-fz 13539 df-fzo 13682 df-fl 13812 df-mod 13890 df-seq 14022 df-exp 14082 df-hash 14348 df-cj 15104 df-re 15105 df-im 15106 df-sqrt 15240 df-abs 15241 df-clim 15490 df-sum 15691 df-dvds 16257 df-gcd 16495 df-phi 16768 df-struct 17149 df-sets 17166 df-slot 17184 df-ndx 17196 df-base 17214 df-ress 17243 df-plusg 17279 df-mulr 17280 df-starv 17281 df-sca 17282 df-vsca 17283 df-ip 17284 df-tset 17285 df-ple 17286 df-ds 17288 df-unif 17289 df-0g 17456 df-imas 17523 df-qus 17524 df-mgm 18633 df-sgrp 18712 df-mnd 18728 df-mhm 18773 df-grp 18931 df-minusg 18932 df-sbg 18933 df-mulg 19062 df-subg 19117 df-nsg 19118 df-eqg 19119 df-ghm 19207 df-cmn 19780 df-abl 19781 df-mgp 20118 df-rng 20136 df-ur 20165 df-ring 20218 df-cring 20219 df-oppr 20316 df-dvdsr 20339 df-unit 20340 df-invr 20370 df-rhm 20454 df-subrng 20528 df-subrg 20553 df-lmod 20838 df-lss 20909 df-lsp 20949 df-sra 21151 df-rgmod 21152 df-lidl 21197 df-rsp 21198 df-2idl 21239 df-cnfld 21344 df-zring 21437 df-zrh 21493 df-zn 21496 df-dchr 27262

This theorem is referenced by: dchrsum 27298

W3C validator