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 27177

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 2741	. 2 ⊢ ((ϕ‘𝑁) = if(𝑋 = 1 , (ϕ‘𝑁), 0) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = (ϕ‘𝑁) ↔ Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0)))
2		eqeq2 2741	. 2 ⊢ (0 = if(𝑋 = 1 , (ϕ‘𝑁), 0) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0 ↔ Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0)))
3		fveq1 6821	. . . . . 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 27149	. . . . . . . . 9 ⊢ (𝑋 ∈ 𝐷 → 𝑁 ∈ ℕ)
11	8, 10	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
12	11	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → 𝑁 ∈ ℕ)
13		simpr 484	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → 𝑎 ∈ 𝑈)
14	4, 5, 6, 7, 12, 13	dchr1 27166	. . . . . 6 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → ( 1 ‘𝑎) = 1)
15	3, 14	sylan9eqr 2786	. . . . 5 ⊢ (((𝜑 ∧ 𝑎 ∈ 𝑈) ∧ 𝑋 = 1 ) → (𝑋‘𝑎) = 1)
16	15	an32s 652	. . . 4 ⊢ (((𝜑 ∧ 𝑋 = 1 ) ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) = 1)
17	16	sumeq2dv 15609	. . 3 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = Σ𝑎 ∈ 𝑈 1)
18	5, 7	znunithash 21471	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → (♯‘𝑈) = (ϕ‘𝑁))
19	11, 18	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑈) = (ϕ‘𝑁))
20	11	phicld 16683	. . . . . . . . 9 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℕ)
21	20	nnnn0d 12445	. . . . . . . 8 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℕ₀)
22	19, 21	eqeltrd 2828	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑈) ∈ ℕ₀)
23	7	fvexi 6836	. . . . . . . 8 ⊢ 𝑈 ∈ V
24		hashclb 14265	. . . . . . . 8 ⊢ (𝑈 ∈ V → (𝑈 ∈ Fin ↔ (♯‘𝑈) ∈ ℕ₀))
25	23, 24	ax-mp 5	. . . . . . 7 ⊢ (𝑈 ∈ Fin ↔ (♯‘𝑈) ∈ ℕ₀)
26	22, 25	sylibr 234	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ Fin)
27		ax-1cn 11067	. . . . . 6 ⊢ 1 ∈ ℂ
28		fsumconst 15697	. . . . . 6 ⊢ ((𝑈 ∈ Fin ∧ 1 ∈ ℂ) → Σ𝑎 ∈ 𝑈 1 = ((♯‘𝑈) · 1))
29	26, 27, 28	sylancl 586	. . . . 5 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 1 = ((♯‘𝑈) · 1))
30	19	oveq1d 7364	. . . . 5 ⊢ (𝜑 → ((♯‘𝑈) · 1) = ((ϕ‘𝑁) · 1))
31	20	nncnd 12144	. . . . . 6 ⊢ (𝜑 → (ϕ‘𝑁) ∈ ℂ)
32	31	mulridd 11132	. . . . 5 ⊢ (𝜑 → ((ϕ‘𝑁) · 1) = (ϕ‘𝑁))
33	29, 30, 32	3eqtrd 2768	. . . 4 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 1 = (ϕ‘𝑁))
34	33	adantr 480	. . 3 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 1 = (ϕ‘𝑁))
35	17, 34	eqtrd 2764	. 2 ⊢ ((𝜑 ∧ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = (ϕ‘𝑁))
36	4	dchrabl 27163	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → 𝐺 ∈ Abel)
37		ablgrp 19664	. . . . . . . 8 ⊢ (𝐺 ∈ Abel → 𝐺 ∈ Grp)
38	9, 6	grpidcl 18844	. . . . . . . 8 ⊢ (𝐺 ∈ Grp → 1 ∈ 𝐷)
39	11, 36, 37, 38	4syl 19	. . . . . . 7 ⊢ (𝜑 → 1 ∈ 𝐷)
40	4, 5, 9, 7, 8, 39	dchreq 27167	. . . . . 6 ⊢ (𝜑 → (𝑋 = 1 ↔ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘)))
41	40	notbid 318	. . . . 5 ⊢ (𝜑 → (¬ 𝑋 = 1 ↔ ¬ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘)))
42		rexnal 3081	. . . . 5 ⊢ (∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘) ↔ ¬ ∀𝑘 ∈ 𝑈 (𝑋‘𝑘) = ( 1 ‘𝑘))
43	41, 42	bitr4di 289	. . . 4 ⊢ (𝜑 → (¬ 𝑋 = 1 ↔ ∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘)))
44		df-ne 2926	. . . . . 6 ⊢ ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) ↔ ¬ (𝑋‘𝑘) = ( 1 ‘𝑘))
45	11	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑁 ∈ ℕ)
46		simpr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑘 ∈ 𝑈)
47	4, 5, 6, 7, 45, 46	dchr1 27166	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ( 1 ‘𝑘) = 1)
48	47	neeq2d 2985	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → ((𝑋‘𝑘) ≠ ( 1 ‘𝑘) ↔ (𝑋‘𝑘) ≠ 1))
49	26	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑈 ∈ Fin)
50		eqid 2729	. . . . . . . . . . . . 13 ⊢ (Base‘𝑍) = (Base‘𝑍)
51	4, 5, 9, 50, 8	dchrf 27151	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋:(Base‘𝑍)⟶ℂ)
52	50, 7	unitss 20261	. . . . . . . . . . . . 13 ⊢ 𝑈 ⊆ (Base‘𝑍)
53	52	sseli 3931	. . . . . . . . . . . 12 ⊢ (𝑎 ∈ 𝑈 → 𝑎 ∈ (Base‘𝑍))
54		ffvelcdm 7015	. . . . . . . . . . . 12 ⊢ ((𝑋:(Base‘𝑍)⟶ℂ ∧ 𝑎 ∈ (Base‘𝑍)) → (𝑋‘𝑎) ∈ ℂ)
55	51, 53, 54	syl2an 596	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) ∈ ℂ)
56	55	adantlr 715	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → (𝑋‘𝑎) ∈ ℂ)
57	49, 56	fsumcl 15640	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) ∈ ℂ)
58		0cnd 11108	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 0 ∈ ℂ)
59	51	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑋:(Base‘𝑍)⟶ℂ)
60		simprl 770	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑘 ∈ 𝑈)
61	52, 60	sselid 3933	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 𝑘 ∈ (Base‘𝑍))
62	59, 61	ffvelcdmd 7019	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (𝑋‘𝑘) ∈ ℂ)
63		subcl 11362	. . . . . . . . . 10 ⊢ (((𝑋‘𝑘) ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑋‘𝑘) − 1) ∈ ℂ)
64	62, 27, 63	sylancl 586	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) − 1) ∈ ℂ)
65		simprr 772	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (𝑋‘𝑘) ≠ 1)
66		subeq0 11390	. . . . . . . . . . . 12 ⊢ (((𝑋‘𝑘) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝑋‘𝑘) − 1) = 0 ↔ (𝑋‘𝑘) = 1))
67	62, 27, 66	sylancl 586	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) = 0 ↔ (𝑋‘𝑘) = 1))
68	67	necon3bid 2969	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) ≠ 0 ↔ (𝑋‘𝑘) ≠ 1))
69	65, 68	mpbird 257	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) − 1) ≠ 0)
70		oveq2 7357	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑎 → (𝑘(._r‘𝑍)𝑥) = (𝑘(._r‘𝑍)𝑎))
71	70	fveq2d 6826	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → (𝑋‘(𝑘(._r‘𝑍)𝑥)) = (𝑋‘(𝑘(._r‘𝑍)𝑎)))
72	71	cbvsumv 15603	. . . . . . . . . . . . . 14 ⊢ Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)) = Σ𝑎 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑎))
73	4, 5, 9	dchrmhm 27150	. . . . . . . . . . . . . . . . . 18 ⊢ 𝐷 ⊆ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld))
74	73, 8	sselid 3933	. . . . . . . . . . . . . . . . 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 2729	. . . . . . . . . . . . . . . . . 18 ⊢ (mulGrp‘𝑍) = (mulGrp‘𝑍)
79	78, 50	mgpbas 20030	. . . . . . . . . . . . . . . . 17 ⊢ (Base‘𝑍) = (Base‘(mulGrp‘𝑍))
80		eqid 2729	. . . . . . . . . . . . . . . . . 18 ⊢ (._r‘𝑍) = (._r‘𝑍)
81	78, 80	mgpplusg 20029	. . . . . . . . . . . . . . . . 17 ⊢ (._r‘𝑍) = (+_g‘(mulGrp‘𝑍))
82		eqid 2729	. . . . . . . . . . . . . . . . . 18 ⊢ (mulGrp‘ℂ_fld) = (mulGrp‘ℂ_fld)
83		cnfldmul 21269	. . . . . . . . . . . . . . . . . 18 ⊢ · = (._r‘ℂ_fld)
84	82, 83	mgpplusg 20029	. . . . . . . . . . . . . . . . 17 ⊢ · = (+_g‘(mulGrp‘ℂ_fld))
85	79, 81, 84	mhmlin 18667	. . . . . . . . . . . . . . . 16 ⊢ ((𝑋 ∈ ((mulGrp‘𝑍) MndHom (mulGrp‘ℂ_fld)) ∧ 𝑘 ∈ (Base‘𝑍) ∧ 𝑎 ∈ (Base‘𝑍)) → (𝑋‘(𝑘(._r‘𝑍)𝑎)) = ((𝑋‘𝑘) · (𝑋‘𝑎)))
86	75, 76, 77, 85	syl3anc 1373	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑎 ∈ 𝑈) → (𝑋‘(𝑘(._r‘𝑍)𝑎)) = ((𝑋‘𝑘) · (𝑋‘𝑎)))
87	86	sumeq2dv 15609	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑎)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
88	72, 87	eqtrid 2776	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
89		fveq2 6822	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝑘(._r‘𝑍)𝑥) → (𝑋‘𝑎) = (𝑋‘(𝑘(._r‘𝑍)𝑥)))
90	11	nnnn0d 12445	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
91	5	zncrng 21451	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ ℕ₀ → 𝑍 ∈ CRing)
92		crngring 20130	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ CRing → 𝑍 ∈ Ring)
93		eqid 2729	. . . . . . . . . . . . . . . . 17 ⊢ ((mulGrp‘𝑍) ↾_s 𝑈) = ((mulGrp‘𝑍) ↾_s 𝑈)
94	7, 93	unitgrp 20268	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ Ring → ((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp)
95	90, 91, 92, 94	4syl 19	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp)
96		eqid 2729	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐))) = (𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))
97	7, 93	unitgrpbas 20267	. . . . . . . . . . . . . . . 16 ⊢ 𝑈 = (Base‘((mulGrp‘𝑍) ↾_s 𝑈))
98	93, 81	ressplusg 17195	. . . . . . . . . . . . . . . . 17 ⊢ (𝑈 ∈ V → (._r‘𝑍) = (+_g‘((mulGrp‘𝑍) ↾_s 𝑈)))
99	23, 98	ax-mp 5	. . . . . . . . . . . . . . . 16 ⊢ (._r‘𝑍) = (+_g‘((mulGrp‘𝑍) ↾_s 𝑈))
100	96, 97, 99	grplactf1o 18923	. . . . . . . . . . . . . . 15 ⊢ ((((mulGrp‘𝑍) ↾_s 𝑈) ∈ Grp ∧ 𝑘 ∈ 𝑈) → ((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘):𝑈–1-1-onto→𝑈)
101	95, 60, 100	syl2an2r 685	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘):𝑈–1-1-onto→𝑈)
102	96, 97	grplactval 18921	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ 𝑈 ∧ 𝑥 ∈ 𝑈) → (((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘)‘𝑥) = (𝑘(._r‘𝑍)𝑥))
103	60, 102	sylan 580	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) ∧ 𝑥 ∈ 𝑈) → (((𝑏 ∈ 𝑈 ↦ (𝑐 ∈ 𝑈 ↦ (𝑏(._r‘𝑍)𝑐)))‘𝑘)‘𝑥) = (𝑘(._r‘𝑍)𝑥))
104	89, 49, 101, 103, 56	fsumf1o 15630	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = Σ𝑥 ∈ 𝑈 (𝑋‘(𝑘(._r‘𝑍)𝑥)))
105	49, 62, 56	fsummulc2 15691	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 ((𝑋‘𝑘) · (𝑋‘𝑎)))
106	88, 104, 105	3eqtr4rd 2775	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → ((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))
107	57	mullidd 11133	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))
108	106, 107	oveq12d 7367	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))) = (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) − Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)))
109	57	subidd 11463	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) − Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = 0)
110	108, 109	eqtrd 2764	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))) = 0)
111		1cnd 11110	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → 1 ∈ ℂ)
112	62, 111, 57	subdird 11577	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = (((𝑋‘𝑘) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) − (1 · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎))))
113	64	mul01d 11315	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · 0) = 0)
114	110, 112, 113	3eqtr4d 2774	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑘 ∈ 𝑈 ∧ (𝑋‘𝑘) ≠ 1)) → (((𝑋‘𝑘) − 1) · Σ𝑎 ∈ 𝑈 (𝑋‘𝑎)) = (((𝑋‘𝑘) − 1) · 0))
115	57, 58, 64, 69, 114	mulcanad 11755	. . . . . . . 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 3130	. . . 4 ⊢ (𝜑 → (∃𝑘 ∈ 𝑈 ¬ (𝑋‘𝑘) = ( 1 ‘𝑘) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
120	43, 119	sylbid 240	. . 3 ⊢ (𝜑 → (¬ 𝑋 = 1 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0))
121	120	imp 406	. 2 ⊢ ((𝜑 ∧ ¬ 𝑋 = 1 ) → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = 0)
122	1, 2, 35, 121	ifbothda 4515	1 ⊢ (𝜑 → Σ𝑎 ∈ 𝑈 (𝑋‘𝑎) = if(𝑋 = 1 , (ϕ‘𝑁), 0))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 = wceq 1540 ∈ wcel 2109 ≠ wne 2925 ∀wral 3044 ∃wrex 3053 Vcvv 3436 ifcif 4476 ↦ cmpt 5173 ⟶wf 6478 –1-1-onto→wf1o 6481 ‘cfv 6482 (class class class)co 7349 Fincfn 8872 ℂcc 11007 0cc0 11009 1c1 11010 · cmul 11014 − cmin 11347 ℕcn 12128 ℕ₀cn0 12384 ♯chash 14237 Σcsu 15593 ϕcphi 16675 Basecbs 17120 ↾_s cress 17141 +_gcplusg 17161 ._rcmulr 17162 0_gc0g 17343 MndHom cmhm 18655 Grpcgrp 18812 Abelcabl 19660 mulGrpcmgp 20025 Ringcrg 20118 CRingccrg 20119 Unitcui 20240 ℂ_fldccnfld 21261 ℤ/nℤczn 21409 DChrcdchr 27141

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2701 ax-rep 5218 ax-sep 5235 ax-nul 5245 ax-pow 5304 ax-pr 5371 ax-un 7671 ax-inf2 9537 ax-cnex 11065 ax-resscn 11066 ax-1cn 11067 ax-icn 11068 ax-addcl 11069 ax-addrcl 11070 ax-mulcl 11071 ax-mulrcl 11072 ax-mulcom 11073 ax-addass 11074 ax-mulass 11075 ax-distr 11076 ax-i2m1 11077 ax-1ne0 11078 ax-1rid 11079 ax-rnegex 11080 ax-rrecex 11081 ax-cnre 11082 ax-pre-lttri 11083 ax-pre-lttrn 11084 ax-pre-ltadd 11085 ax-pre-mulgt0 11086 ax-pre-sup 11087 ax-addf 11088 ax-mulf 11089

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3343 df-reu 3344 df-rab 3395 df-v 3438 df-sbc 3743 df-csb 3852 df-dif 3906 df-un 3908 df-in 3910 df-ss 3920 df-pss 3923 df-nul 4285 df-if 4477 df-pw 4553 df-sn 4578 df-pr 4580 df-tp 4582 df-op 4584 df-uni 4859 df-int 4897 df-iun 4943 df-br 5093 df-opab 5155 df-mpt 5174 df-tr 5200 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 6249 df-ord 6310 df-on 6311 df-lim 6312 df-suc 6313 df-iota 6438 df-fun 6484 df-fn 6485 df-f 6486 df-f1 6487 df-fo 6488 df-f1o 6489 df-fv 6490 df-isom 6491 df-riota 7306 df-ov 7352 df-oprab 7353 df-mpo 7354 df-of 7613 df-om 7800 df-1st 7924 df-2nd 7925 df-tpos 8159 df-frecs 8214 df-wrecs 8245 df-recs 8294 df-rdg 8332 df-1o 8388 df-oadd 8392 df-er 8625 df-ec 8627 df-qs 8631 df-map 8755 df-en 8873 df-dom 8874 df-sdom 8875 df-fin 8876 df-sup 9332 df-inf 9333 df-oi 9402 df-card 9835 df-pnf 11151 df-mnf 11152 df-xr 11153 df-ltxr 11154 df-le 11155 df-sub 11349 df-neg 11350 df-div 11778 df-nn 12129 df-2 12191 df-3 12192 df-4 12193 df-5 12194 df-6 12195 df-7 12196 df-8 12197 df-9 12198 df-n0 12385 df-xnn0 12458 df-z 12472 df-dec 12592 df-uz 12736 df-rp 12894 df-fz 13411 df-fzo 13558 df-fl 13696 df-mod 13774 df-seq 13909 df-exp 13969 df-hash 14238 df-cj 15006 df-re 15007 df-im 15008 df-sqrt 15142 df-abs 15143 df-clim 15395 df-sum 15594 df-dvds 16164 df-gcd 16406 df-phi 16677 df-struct 17058 df-sets 17075 df-slot 17093 df-ndx 17105 df-base 17121 df-ress 17142 df-plusg 17174 df-mulr 17175 df-starv 17176 df-sca 17177 df-vsca 17178 df-ip 17179 df-tset 17180 df-ple 17181 df-ds 17183 df-unif 17184 df-0g 17345 df-imas 17412 df-qus 17413 df-mgm 18514 df-sgrp 18593 df-mnd 18609 df-mhm 18657 df-grp 18815 df-minusg 18816 df-sbg 18817 df-mulg 18947 df-subg 19002 df-nsg 19003 df-eqg 19004 df-ghm 19092 df-cmn 19661 df-abl 19662 df-mgp 20026 df-rng 20038 df-ur 20067 df-ring 20120 df-cring 20121 df-oppr 20222 df-dvdsr 20242 df-unit 20243 df-invr 20273 df-rhm 20357 df-subrng 20431 df-subrg 20455 df-lmod 20765 df-lss 20835 df-lsp 20875 df-sra 21077 df-rgmod 21078 df-lidl 21115 df-rsp 21116 df-2idl 21157 df-cnfld 21262 df-zring 21354 df-zrh 21410 df-zn 21413 df-dchr 27142

This theorem is referenced by: dchrsum 27178

W3C validator