Theorem dchrelbasd 27458

Description: A Dirichlet character is a monoid homomorphism from the multiplicative monoid on ℤ/nℤ to the multiplicative monoid of ℂ, which is zero off the group of units of ℤ/nℤ. (Contributed by Mario Carneiro, 28-Apr-2016.)

Hypotheses

Ref	Expression
dchrval.g	⊢ 𝐺 = (DChr‘𝑁)
dchrval.z	⊢ 𝑍 = (ℤ/nℤ‘𝑁)
dchrval.b	⊢ 𝐵 = (Base‘𝑍)
dchrval.u	⊢ 𝑈 = (Unit‘𝑍)
dchrval.n	⊢ (𝜑 → 𝑁 ∈ ℕ)
dchrbas.b	⊢ 𝐷 = (Base‘𝐺)
dchrelbasd.1	⊢ (𝑘 = 𝑥 → 𝑋 = 𝐴)
dchrelbasd.2	⊢ (𝑘 = 𝑦 → 𝑋 = 𝐶)
dchrelbasd.3	⊢ (𝑘 = (𝑥(.r‘𝑍)𝑦) → 𝑋 = 𝐸)
dchrelbasd.4	⊢ (𝑘 = (1r‘𝑍) → 𝑋 = 𝑌)
dchrelbasd.5	⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑋 ∈ ℂ)
dchrelbasd.6	⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → 𝐸 = (𝐴 · 𝐶))
dchrelbasd.7	⊢ (𝜑 → 𝑌 = 1)

Assertion

Ref	Expression
dchrelbasd	⊢ (𝜑 → (𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0)) ∈ 𝐷)

Distinct variable groups:   𝐴,𝑘   𝑥,𝑘,𝑦,𝐵   𝑥,𝑁   𝑈,𝑘,𝑥,𝑦   𝐶,𝑘   𝑘,𝐸   𝜑,𝑘,𝑥,𝑦   𝑥,𝑋,𝑦   𝑘,𝑍,𝑥,𝑦   𝑘,𝑌

Allowed substitution hints:   𝐴(𝑥, 𝑦)   𝐶(𝑥, 𝑦)   𝐷(𝑥, 𝑦, 𝑘)   𝐸(𝑥, 𝑦)   𝐺(𝑥, 𝑦, 𝑘)   𝑁(𝑦, 𝑘)   𝑋(𝑘)   𝑌(𝑥, 𝑦)

Proof of Theorem dchrelbasd

Step	Hyp	Ref	Expression
1		dchrelbasd.5	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝑈) → 𝑋 ∈ ℂ)
2	1	adantlr 728	. . . 4 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝐵) ∧ 𝑘 ∈ 𝑈) → 𝑋 ∈ ℂ)
3		0cnd 11218	. . . 4 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝐵) ∧ ¬ 𝑘 ∈ 𝑈) → 0 ∈ ℂ)
4	2, 3	ifclda 4525	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐵) → if(𝑘 ∈ 𝑈, 𝑋, 0) ∈ ℂ)
5	4	fmpttd 7114	. 2 ⊢ (𝜑 → (𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0)):𝐵⟶ℂ)
6		dchrval.n	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ ℕ)
7	6	nnnn0d 12584	. . . . . . . . 9 ⊢ (𝜑 → 𝑁 ∈ ℕ0)
8		dchrval.z	. . . . . . . . . 10 ⊢ 𝑍 = (ℤ/nℤ‘𝑁)
9	8	zncrng 21748	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ0 → 𝑍 ∈ CRing)
10		crngring 20375	. . . . . . . . 9 ⊢ (𝑍 ∈ CRing → 𝑍 ∈ Ring)
11	7, 9, 10	3syl 19	. . . . . . . 8 ⊢ (𝜑 → 𝑍 ∈ Ring)
12		dchrval.u	. . . . . . . . . 10 ⊢ 𝑈 = (Unit‘𝑍)
13		eqid 2765	. . . . . . . . . 10 ⊢ (.r‘𝑍) = (.r‘𝑍)
14	12, 13	unitmulcl 20512	. . . . . . . . 9 ⊢ ((𝑍 ∈ Ring ∧ 𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈) → (𝑥(.r‘𝑍)𝑦) ∈ 𝑈)
15	14	3expb 1138	. . . . . . . 8 ⊢ ((𝑍 ∈ Ring ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → (𝑥(.r‘𝑍)𝑦) ∈ 𝑈)
16	11, 15	sylan 592	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → (𝑥(.r‘𝑍)𝑦) ∈ 𝑈)
17	16	iftrued 4497	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → if((𝑥(.r‘𝑍)𝑦) ∈ 𝑈, 𝐸, 0) = 𝐸)
18		dchrelbasd.6	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → 𝐸 = (𝐴 · 𝐶))
19	17, 18	eqtrd 2800	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → if((𝑥(.r‘𝑍)𝑦) ∈ 𝑈, 𝐸, 0) = (𝐴 · 𝐶))
20		eqid 2765	. . . . . 6 ⊢ (𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0)) = (𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))
21		eleq1 2853	. . . . . . 7 ⊢ (𝑘 = (𝑥(.r‘𝑍)𝑦) → (𝑘 ∈ 𝑈 ↔ (𝑥(.r‘𝑍)𝑦) ∈ 𝑈))
22		dchrelbasd.3	. . . . . . 7 ⊢ (𝑘 = (𝑥(.r‘𝑍)𝑦) → 𝑋 = 𝐸)
23	21, 22	ifbieq1d 4514	. . . . . 6 ⊢ (𝑘 = (𝑥(.r‘𝑍)𝑦) → if(𝑘 ∈ 𝑈, 𝑋, 0) = if((𝑥(.r‘𝑍)𝑦) ∈ 𝑈, 𝐸, 0))
24		dchrval.b	. . . . . . . 8 ⊢ 𝐵 = (Base‘𝑍)
25	24, 12	unitss 20508	. . . . . . 7 ⊢ 𝑈 ⊆ 𝐵
26	25, 16	sselid 3936	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → (𝑥(.r‘𝑍)𝑦) ∈ 𝐵)
27	22	eleq1d 2850	. . . . . . . 8 ⊢ (𝑘 = (𝑥(.r‘𝑍)𝑦) → (𝑋 ∈ ℂ ↔ 𝐸 ∈ ℂ))
28	1	ralrimiva 3159	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑘 ∈ 𝑈 𝑋 ∈ ℂ)
29	28	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → ∀𝑘 ∈ 𝑈 𝑋 ∈ ℂ)
30	27, 29, 16	rspcdva 3584	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → 𝐸 ∈ ℂ)
31	17, 30	eqeltrd 2865	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → if((𝑥(.r‘𝑍)𝑦) ∈ 𝑈, 𝐸, 0) ∈ ℂ)
32	20, 23, 26, 31	fvmptd3 7017	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘(𝑥(.r‘𝑍)𝑦)) = if((𝑥(.r‘𝑍)𝑦) ∈ 𝑈, 𝐸, 0))
33		eleq1 2853	. . . . . . . . 9 ⊢ (𝑘 = 𝑥 → (𝑘 ∈ 𝑈 ↔ 𝑥 ∈ 𝑈))
34		dchrelbasd.1	. . . . . . . . 9 ⊢ (𝑘 = 𝑥 → 𝑋 = 𝐴)
35	33, 34	ifbieq1d 4514	. . . . . . . 8 ⊢ (𝑘 = 𝑥 → if(𝑘 ∈ 𝑈, 𝑋, 0) = if(𝑥 ∈ 𝑈, 𝐴, 0))
36		simprl 783	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → 𝑥 ∈ 𝑈)
37	25, 36	sselid 3936	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → 𝑥 ∈ 𝐵)
38		iftrue 4495	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝑈 → if(𝑥 ∈ 𝑈, 𝐴, 0) = 𝐴)
39	38	ad2antrl 741	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → if(𝑥 ∈ 𝑈, 𝐴, 0) = 𝐴)
40	34	eleq1d 2850	. . . . . . . . . 10 ⊢ (𝑘 = 𝑥 → (𝑋 ∈ ℂ ↔ 𝐴 ∈ ℂ))
41	40, 29, 36	rspcdva 3584	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → 𝐴 ∈ ℂ)
42	39, 41	eqeltrd 2865	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → if(𝑥 ∈ 𝑈, 𝐴, 0) ∈ ℂ)
43	20, 35, 37, 42	fvmptd3 7017	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) = if(𝑥 ∈ 𝑈, 𝐴, 0))
44	43, 39	eqtrd 2800	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) = 𝐴)
45		eleq1 2853	. . . . . . . . 9 ⊢ (𝑘 = 𝑦 → (𝑘 ∈ 𝑈 ↔ 𝑦 ∈ 𝑈))
46		dchrelbasd.2	. . . . . . . . 9 ⊢ (𝑘 = 𝑦 → 𝑋 = 𝐶)
47	45, 46	ifbieq1d 4514	. . . . . . . 8 ⊢ (𝑘 = 𝑦 → if(𝑘 ∈ 𝑈, 𝑋, 0) = if(𝑦 ∈ 𝑈, 𝐶, 0))
48		simprr 785	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → 𝑦 ∈ 𝑈)
49	25, 48	sselid 3936	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → 𝑦 ∈ 𝐵)
50		iftrue 4495	. . . . . . . . . 10 ⊢ (𝑦 ∈ 𝑈 → if(𝑦 ∈ 𝑈, 𝐶, 0) = 𝐶)
51	50	ad2antll 742	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → if(𝑦 ∈ 𝑈, 𝐶, 0) = 𝐶)
52	46	eleq1d 2850	. . . . . . . . . 10 ⊢ (𝑘 = 𝑦 → (𝑋 ∈ ℂ ↔ 𝐶 ∈ ℂ))
53	52, 29, 48	rspcdva 3584	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → 𝐶 ∈ ℂ)
54	51, 53	eqeltrd 2865	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → if(𝑦 ∈ 𝑈, 𝐶, 0) ∈ ℂ)
55	20, 47, 49, 54	fvmptd3 7017	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑦) = if(𝑦 ∈ 𝑈, 𝐶, 0))
56	55, 51	eqtrd 2800	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑦) = 𝐶)
57	44, 56	oveq12d 7437	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → (((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) · ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑦)) = (𝐴 · 𝐶))
58	19, 32, 57	3eqtr4d 2810	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘(𝑥(.r‘𝑍)𝑦)) = (((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) · ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑦)))
59	58	ralrimivva 3210	. . 3 ⊢ (𝜑 → ∀𝑥 ∈ 𝑈 ∀𝑦 ∈ 𝑈 ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘(𝑥(.r‘𝑍)𝑦)) = (((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) · ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑦)))
60		eleq1 2853	. . . . . 6 ⊢ (𝑘 = (1r‘𝑍) → (𝑘 ∈ 𝑈 ↔ (1r‘𝑍) ∈ 𝑈))
61		dchrelbasd.4	. . . . . 6 ⊢ (𝑘 = (1r‘𝑍) → 𝑋 = 𝑌)
62	60, 61	ifbieq1d 4514	. . . . 5 ⊢ (𝑘 = (1r‘𝑍) → if(𝑘 ∈ 𝑈, 𝑋, 0) = if((1r‘𝑍) ∈ 𝑈, 𝑌, 0))
63		eqid 2765	. . . . . . . 8 ⊢ (1r‘𝑍) = (1r‘𝑍)
64	12, 63	1unit 20506	. . . . . . 7 ⊢ (𝑍 ∈ Ring → (1r‘𝑍) ∈ 𝑈)
65	11, 64	syl 18	. . . . . 6 ⊢ (𝜑 → (1r‘𝑍) ∈ 𝑈)
66	25, 65	sselid 3936	. . . . 5 ⊢ (𝜑 → (1r‘𝑍) ∈ 𝐵)
67	65	iftrued 4497	. . . . . . 7 ⊢ (𝜑 → if((1r‘𝑍) ∈ 𝑈, 𝑌, 0) = 𝑌)
68		dchrelbasd.7	. . . . . . 7 ⊢ (𝜑 → 𝑌 = 1)
69	67, 68	eqtrd 2800	. . . . . 6 ⊢ (𝜑 → if((1r‘𝑍) ∈ 𝑈, 𝑌, 0) = 1)
70		ax-1cn 11177	. . . . . 6 ⊢ 1 ∈ ℂ
71	69, 70	eqeltrdi 2873	. . . . 5 ⊢ (𝜑 → if((1r‘𝑍) ∈ 𝑈, 𝑌, 0) ∈ ℂ)
72	20, 62, 66, 71	fvmptd3 7017	. . . 4 ⊢ (𝜑 → ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘(1r‘𝑍)) = if((1r‘𝑍) ∈ 𝑈, 𝑌, 0))
73	72, 69	eqtrd 2800	. . 3 ⊢ (𝜑 → ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘(1r‘𝑍)) = 1)
74		simpr 490	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → 𝑥 ∈ 𝐵)
75	40	rspcv 3579	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝑈 → (∀𝑘 ∈ 𝑈 𝑋 ∈ ℂ → 𝐴 ∈ ℂ))
76	28, 75	mpan9 516	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑈) → 𝐴 ∈ ℂ)
77	76	adantlr 728	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐵) ∧ 𝑥 ∈ 𝑈) → 𝐴 ∈ ℂ)
78		0cnd 11218	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐵) ∧ ¬ 𝑥 ∈ 𝑈) → 0 ∈ ℂ)
79	77, 78	ifclda 4525	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → if(𝑥 ∈ 𝑈, 𝐴, 0) ∈ ℂ)
80	20, 35, 74, 79	fvmptd3 7017	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) = if(𝑥 ∈ 𝑈, 𝐴, 0))
81	80	neeq1d 3019	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → (((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) ≠ 0 ↔ if(𝑥 ∈ 𝑈, 𝐴, 0) ≠ 0))
82		iffalse 4498	. . . . . 6 ⊢ (¬ 𝑥 ∈ 𝑈 → if(𝑥 ∈ 𝑈, 𝐴, 0) = 0)
83	82	necon1ai 2987	. . . . 5 ⊢ (if(𝑥 ∈ 𝑈, 𝐴, 0) ≠ 0 → 𝑥 ∈ 𝑈)
84	81, 83	biimtrdi 256	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → (((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) ≠ 0 → 𝑥 ∈ 𝑈))
85	84	ralrimiva 3159	. . 3 ⊢ (𝜑 → ∀𝑥 ∈ 𝐵 (((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) ≠ 0 → 𝑥 ∈ 𝑈))
86	59, 73, 85	3jca 1146	. 2 ⊢ (𝜑 → (∀𝑥 ∈ 𝑈 ∀𝑦 ∈ 𝑈 ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘(𝑥(.r‘𝑍)𝑦)) = (((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) · ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑦)) ∧ ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘(1r‘𝑍)) = 1 ∧ ∀𝑥 ∈ 𝐵 (((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) ≠ 0 → 𝑥 ∈ 𝑈)))
87		dchrval.g	. . 3 ⊢ 𝐺 = (DChr‘𝑁)
88		dchrbas.b	. . 3 ⊢ 𝐷 = (Base‘𝐺)
89	87, 8, 24, 12, 6, 88	dchrelbas3 27457	. 2 ⊢ (𝜑 → ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0)) ∈ 𝐷 ↔ ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0)):𝐵⟶ℂ ∧ (∀𝑥 ∈ 𝑈 ∀𝑦 ∈ 𝑈 ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘(𝑥(.r‘𝑍)𝑦)) = (((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) · ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑦)) ∧ ((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘(1r‘𝑍)) = 1 ∧ ∀𝑥 ∈ 𝐵 (((𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0))‘𝑥) ≠ 0 → 𝑥 ∈ 𝑈)))))
90	5, 86, 89	mpbir2and 726	1 ⊢ (𝜑 → (𝑘 ∈ 𝐵 ↦ if(𝑘 ∈ 𝑈, 𝑋, 0)) ∈ 𝐷)

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2146   ≠ wne 2960  ∀wral 3081  ifcif 4489   ↦ cmpt 5194  ⟶wf 6536  ‘cfv 6540  (class class class)co 7419  ℂcc 11117  0cc0 11119  1c1 11120   · cmul 11124  ℕcn 12252  ℕ₀cn0 12523  Basecbs 17295  ._rcmulr 17337  1_rcur 20311  Ringcrg 20363  CRingccrg 20364  Unitcui 20487  ℤ/nℤczn 21706  DChrcdchr 27451

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7742  ax-cnex 11175  ax-resscn 11176  ax-1cn 11177  ax-icn 11178  ax-addcl 11179  ax-addrcl 11180  ax-mulcl 11181  ax-mulrcl 11182  ax-mulcom 11183  ax-addass 11184  ax-mulass 11185  ax-distr 11186  ax-i2m1 11187  ax-1ne0 11188  ax-1rid 11189  ax-rnegex 11190  ax-rrecex 11191  ax-cnre 11192  ax-pre-lttri 11193  ax-pre-lttrn 11194  ax-pre-ltadd 11195  ax-pre-mulgt0 11196  ax-addf 11198  ax-mulf 11199

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-rmo 3371  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-tp 4596  df-op 4598  df-uni 4875  df-int 4915  df-iun 4960  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6306  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-riota 7376  df-ov 7422  df-oprab 7423  df-mpo 7424  df-om 7869  df-1st 7992  df-2nd 7993  df-tpos 8228  df-frecs 8284  df-wrecs 8315  df-recs 8364  df-rdg 8403  df-1o 8459  df-er 8700  df-ec 8702  df-qs 8706  df-map 8832  df-en 8950  df-dom 8951  df-sdom 8952  df-fin 8953  df-sup 9409  df-inf 9410  df-pnf 11264  df-mnf 11265  df-xr 11266  df-ltxr 11267  df-le 11268  df-sub 11462  df-neg 11463  df-nn 12253  df-2 12322  df-3 12323  df-4 12324  df-5 12325  df-6 12326  df-7 12327  df-8 12328  df-9 12329  df-n0 12524  df-z 12611  df-dec 12732  df-uz 12883  df-fz 13556  df-struct 17233  df-sets 17250  df-slot 17268  df-ndx 17280  df-base 17296  df-ress 17317  df-plusg 17349  df-mulr 17350  df-starv 17351  df-sca 17352  df-vsca 17353  df-ip 17354  df-tset 17355  df-ple 17356  df-ds 17358  df-unif 17359  df-0g 17520  df-imas 17588  df-qus 17589  df-mgm 18724  df-sgrp 18813  df-mnd 18829  df-mhm 18882  df-grp 19051  df-minusg 19052  df-sbg 19053  df-subg 19237  df-nsg 19238  df-eqg 19239  df-cmn 19900  df-abl 19901  df-mgp 20265  df-rng 20279  df-ur 20312  df-ring 20365  df-cring 20366  df-oppr 20469  df-dvdsr 20489  df-unit 20490  df-subrng 20699  df-subrg 20723  df-lmod 21037  df-lss 21107  df-lsp 21147  df-sra 21348  df-rgmod 21349  df-lidl 21386  df-rsp 21387  df-2idl 21443  df-cnfld 21577  df-zring 21651  df-zn 21710  df-dchr 27452

This theorem is used by:  dchr1cl  27470  dchrinvcl  27472  dchrptlem2  27484