Theorem ablfac2 18886

Description: Choose generators for each cyclic group in ablfac 18885. (Contributed by Mario Carneiro, 28-Apr-2016.)

Hypotheses

Ref	Expression
ablfac.b	⊢ 𝐵 = (Base‘𝐺)
ablfac.c	⊢ 𝐶 = {𝑟 ∈ (SubGrp‘𝐺) ∣ (𝐺 ↾s 𝑟) ∈ (CycGrp ∩ ran pGrp )}
ablfac.1	⊢ (𝜑 → 𝐺 ∈ Abel)
ablfac.2	⊢ (𝜑 → 𝐵 ∈ Fin)
ablfac2.m	⊢ · = (.g‘𝐺)
ablfac2.s	⊢ 𝑆 = (𝑘 ∈ dom 𝑤 ↦ ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))))

Assertion

Ref	Expression
ablfac2	⊢ (𝜑 → ∃𝑤 ∈ Word 𝐵(𝑆:dom 𝑤⟶𝐶 ∧ 𝐺dom DProd 𝑆 ∧ (𝐺 DProd 𝑆) = 𝐵))

Distinct variable groups:   𝑆,𝑟   𝑘,𝑛,𝑟,𝑤,𝐵   · ,𝑘,𝑤   𝐶,𝑘,𝑛,𝑤   𝜑,𝑘,𝑛,𝑤   𝑘,𝐺,𝑛,𝑟,𝑤

Allowed substitution hints:   𝜑(𝑟)   𝐶(𝑟)   𝑆(𝑤,𝑘,𝑛)   · (𝑛,𝑟)

Proof of Theorem ablfac2

Dummy variables 𝑠 𝑥 𝑗 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		wrdf 13610	. . . . . . . 8 ⊢ (𝑠 ∈ Word 𝐶 → 𝑠:(0..^(♯‘𝑠))⟶𝐶)
2	1	ad2antlr 717	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → 𝑠:(0..^(♯‘𝑠))⟶𝐶)
3	2	fdmd 6302	. . . . . 6 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → dom 𝑠 = (0..^(♯‘𝑠)))
4		fzofi 13097	. . . . . 6 ⊢ (0..^(♯‘𝑠)) ∈ Fin
5	3, 4	syl6eqel 2867	. . . . 5 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → dom 𝑠 ∈ Fin)
6	2	ffdmd 6315	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → 𝑠:dom 𝑠⟶𝐶)
7	6	ffvelrnda 6625	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → (𝑠‘𝑘) ∈ 𝐶)
8		oveq2 6932	. . . . . . . . . . . 12 ⊢ (𝑟 = (𝑠‘𝑘) → (𝐺 ↾s 𝑟) = (𝐺 ↾s (𝑠‘𝑘)))
9	8	eleq1d 2844	. . . . . . . . . . 11 ⊢ (𝑟 = (𝑠‘𝑘) → ((𝐺 ↾s 𝑟) ∈ (CycGrp ∩ ran pGrp ) ↔ (𝐺 ↾s (𝑠‘𝑘)) ∈ (CycGrp ∩ ran pGrp )))
10		ablfac.c	. . . . . . . . . . 11 ⊢ 𝐶 = {𝑟 ∈ (SubGrp‘𝐺) ∣ (𝐺 ↾s 𝑟) ∈ (CycGrp ∩ ran pGrp )}
11	9, 10	elrab2 3576	. . . . . . . . . 10 ⊢ ((𝑠‘𝑘) ∈ 𝐶 ↔ ((𝑠‘𝑘) ∈ (SubGrp‘𝐺) ∧ (𝐺 ↾s (𝑠‘𝑘)) ∈ (CycGrp ∩ ran pGrp )))
12	11	simplbi 493	. . . . . . . . 9 ⊢ ((𝑠‘𝑘) ∈ 𝐶 → (𝑠‘𝑘) ∈ (SubGrp‘𝐺))
13	7, 12	syl 17	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → (𝑠‘𝑘) ∈ (SubGrp‘𝐺))
14		ablfac.b	. . . . . . . . 9 ⊢ 𝐵 = (Base‘𝐺)
15	14	subgss 17990	. . . . . . . 8 ⊢ ((𝑠‘𝑘) ∈ (SubGrp‘𝐺) → (𝑠‘𝑘) ⊆ 𝐵)
16	13, 15	syl 17	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → (𝑠‘𝑘) ⊆ 𝐵)
17	11	simprbi 492	. . . . . . . . . . . 12 ⊢ ((𝑠‘𝑘) ∈ 𝐶 → (𝐺 ↾s (𝑠‘𝑘)) ∈ (CycGrp ∩ ran pGrp ))
18	7, 17	syl 17	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → (𝐺 ↾s (𝑠‘𝑘)) ∈ (CycGrp ∩ ran pGrp ))
19	18	elin1d 4025	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → (𝐺 ↾s (𝑠‘𝑘)) ∈ CycGrp)
20		eqid 2778	. . . . . . . . . . . 12 ⊢ (Base‘(𝐺 ↾s (𝑠‘𝑘))) = (Base‘(𝐺 ↾s (𝑠‘𝑘)))
21		eqid 2778	. . . . . . . . . . . 12 ⊢ (.g‘(𝐺 ↾s (𝑠‘𝑘))) = (.g‘(𝐺 ↾s (𝑠‘𝑘)))
22	20, 21	iscyg 18678	. . . . . . . . . . 11 ⊢ ((𝐺 ↾s (𝑠‘𝑘)) ∈ CycGrp ↔ ((𝐺 ↾s (𝑠‘𝑘)) ∈ Grp ∧ ∃𝑥 ∈ (Base‘(𝐺 ↾s (𝑠‘𝑘)))ran (𝑛 ∈ ℤ ↦ (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥)) = (Base‘(𝐺 ↾s (𝑠‘𝑘)))))
23	22	simprbi 492	. . . . . . . . . 10 ⊢ ((𝐺 ↾s (𝑠‘𝑘)) ∈ CycGrp → ∃𝑥 ∈ (Base‘(𝐺 ↾s (𝑠‘𝑘)))ran (𝑛 ∈ ℤ ↦ (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥)) = (Base‘(𝐺 ↾s (𝑠‘𝑘))))
24	19, 23	syl 17	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → ∃𝑥 ∈ (Base‘(𝐺 ↾s (𝑠‘𝑘)))ran (𝑛 ∈ ℤ ↦ (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥)) = (Base‘(𝐺 ↾s (𝑠‘𝑘))))
25		eqid 2778	. . . . . . . . . . . 12 ⊢ (𝐺 ↾s (𝑠‘𝑘)) = (𝐺 ↾s (𝑠‘𝑘))
26	25	subgbas 17993	. . . . . . . . . . 11 ⊢ ((𝑠‘𝑘) ∈ (SubGrp‘𝐺) → (𝑠‘𝑘) = (Base‘(𝐺 ↾s (𝑠‘𝑘))))
27	13, 26	syl 17	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → (𝑠‘𝑘) = (Base‘(𝐺 ↾s (𝑠‘𝑘))))
28	27	rexeqdv 3341	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → (∃𝑥 ∈ (𝑠‘𝑘)ran (𝑛 ∈ ℤ ↦ (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥)) = (Base‘(𝐺 ↾s (𝑠‘𝑘))) ↔ ∃𝑥 ∈ (Base‘(𝐺 ↾s (𝑠‘𝑘)))ran (𝑛 ∈ ℤ ↦ (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥)) = (Base‘(𝐺 ↾s (𝑠‘𝑘)))))
29	24, 28	mpbird 249	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → ∃𝑥 ∈ (𝑠‘𝑘)ran (𝑛 ∈ ℤ ↦ (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥)) = (Base‘(𝐺 ↾s (𝑠‘𝑘))))
30	13	ad2antrr 716	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) ∧ 𝑥 ∈ (𝑠‘𝑘)) ∧ 𝑛 ∈ ℤ) → (𝑠‘𝑘) ∈ (SubGrp‘𝐺))
31		simpr 479	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) ∧ 𝑥 ∈ (𝑠‘𝑘)) ∧ 𝑛 ∈ ℤ) → 𝑛 ∈ ℤ)
32		simplr 759	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) ∧ 𝑥 ∈ (𝑠‘𝑘)) ∧ 𝑛 ∈ ℤ) → 𝑥 ∈ (𝑠‘𝑘))
33		ablfac2.m	. . . . . . . . . . . . . 14 ⊢ · = (.g‘𝐺)
34	33, 25, 21	subgmulg 18003	. . . . . . . . . . . . 13 ⊢ (((𝑠‘𝑘) ∈ (SubGrp‘𝐺) ∧ 𝑛 ∈ ℤ ∧ 𝑥 ∈ (𝑠‘𝑘)) → (𝑛 · 𝑥) = (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥))
35	30, 31, 32, 34	syl3anc 1439	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) ∧ 𝑥 ∈ (𝑠‘𝑘)) ∧ 𝑛 ∈ ℤ) → (𝑛 · 𝑥) = (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥))
36	35	mpteq2dva 4981	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) ∧ 𝑥 ∈ (𝑠‘𝑘)) → (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑛 ∈ ℤ ↦ (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥)))
37	36	rneqd 5600	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) ∧ 𝑥 ∈ (𝑠‘𝑘)) → ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = ran (𝑛 ∈ ℤ ↦ (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥)))
38	27	adantr 474	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) ∧ 𝑥 ∈ (𝑠‘𝑘)) → (𝑠‘𝑘) = (Base‘(𝐺 ↾s (𝑠‘𝑘))))
39	37, 38	eqeq12d 2793	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) ∧ 𝑥 ∈ (𝑠‘𝑘)) → (ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑠‘𝑘) ↔ ran (𝑛 ∈ ℤ ↦ (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥)) = (Base‘(𝐺 ↾s (𝑠‘𝑘)))))
40	39	rexbidva 3234	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → (∃𝑥 ∈ (𝑠‘𝑘)ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑠‘𝑘) ↔ ∃𝑥 ∈ (𝑠‘𝑘)ran (𝑛 ∈ ℤ ↦ (𝑛(.g‘(𝐺 ↾s (𝑠‘𝑘)))𝑥)) = (Base‘(𝐺 ↾s (𝑠‘𝑘)))))
41	29, 40	mpbird 249	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → ∃𝑥 ∈ (𝑠‘𝑘)ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑠‘𝑘))
42		ssrexv 3886	. . . . . . 7 ⊢ ((𝑠‘𝑘) ⊆ 𝐵 → (∃𝑥 ∈ (𝑠‘𝑘)ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑠‘𝑘) → ∃𝑥 ∈ 𝐵 ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑠‘𝑘)))
43	16, 41, 42	sylc 65	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ 𝑘 ∈ dom 𝑠) → ∃𝑥 ∈ 𝐵 ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑠‘𝑘))
44	43	ralrimiva 3148	. . . . 5 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → ∀𝑘 ∈ dom 𝑠∃𝑥 ∈ 𝐵 ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑠‘𝑘))
45		oveq2 6932	. . . . . . . . 9 ⊢ (𝑥 = (𝑤‘𝑘) → (𝑛 · 𝑥) = (𝑛 · (𝑤‘𝑘)))
46	45	mpteq2dv 4982	. . . . . . . 8 ⊢ (𝑥 = (𝑤‘𝑘) → (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))))
47	46	rneqd 5600	. . . . . . 7 ⊢ (𝑥 = (𝑤‘𝑘) → ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))))
48	47	eqeq1d 2780	. . . . . 6 ⊢ (𝑥 = (𝑤‘𝑘) → (ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑠‘𝑘) ↔ ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘)))
49	48	ac6sfi 8494	. . . . 5 ⊢ ((dom 𝑠 ∈ Fin ∧ ∀𝑘 ∈ dom 𝑠∃𝑥 ∈ 𝐵 ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝑥)) = (𝑠‘𝑘)) → ∃𝑤(𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘)))
50	5, 44, 49	syl2anc 579	. . . 4 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → ∃𝑤(𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘)))
51		simprl 761	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝑤:dom 𝑠⟶𝐵)
52	3	adantr 474	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → dom 𝑠 = (0..^(♯‘𝑠)))
53	52	feq2d 6279	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → (𝑤:dom 𝑠⟶𝐵 ↔ 𝑤:(0..^(♯‘𝑠))⟶𝐵))
54	51, 53	mpbid 224	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝑤:(0..^(♯‘𝑠))⟶𝐵)
55		iswrdi 13609	. . . . . . . 8 ⊢ (𝑤:(0..^(♯‘𝑠))⟶𝐵 → 𝑤 ∈ Word 𝐵)
56	54, 55	syl 17	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝑤 ∈ Word 𝐵)
57	51	fdmd 6302	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → dom 𝑤 = dom 𝑠)
58	57	eleq2d 2845	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → (𝑗 ∈ dom 𝑤 ↔ 𝑗 ∈ dom 𝑠))
59	58	biimpa 470	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) ∧ 𝑗 ∈ dom 𝑤) → 𝑗 ∈ dom 𝑠)
60		simprr 763	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))
61		simpl 476	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 = 𝑗 ∧ 𝑛 ∈ ℤ) → 𝑘 = 𝑗)
62	61	fveq2d 6452	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑘 = 𝑗 ∧ 𝑛 ∈ ℤ) → (𝑤‘𝑘) = (𝑤‘𝑗))
63	62	oveq2d 6940	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 = 𝑗 ∧ 𝑛 ∈ ℤ) → (𝑛 · (𝑤‘𝑘)) = (𝑛 · (𝑤‘𝑗)))
64	63	mpteq2dva 4981	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑗 → (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))))
65	64	rneqd 5600	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑗 → ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))))
66		fveq2 6448	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑗 → (𝑠‘𝑘) = (𝑠‘𝑗))
67	65, 66	eqeq12d 2793	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑗 → (ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘) ↔ ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))) = (𝑠‘𝑗)))
68	67	rspccva 3510	. . . . . . . . . . . 12 ⊢ ((∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘) ∧ 𝑗 ∈ dom 𝑠) → ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))) = (𝑠‘𝑗))
69	60, 68	sylan 575	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) ∧ 𝑗 ∈ dom 𝑠) → ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))) = (𝑠‘𝑗))
70	6	adantr 474	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝑠:dom 𝑠⟶𝐶)
71	70	ffvelrnda 6625	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) ∧ 𝑗 ∈ dom 𝑠) → (𝑠‘𝑗) ∈ 𝐶)
72	69, 71	eqeltrd 2859	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) ∧ 𝑗 ∈ dom 𝑠) → ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))) ∈ 𝐶)
73	59, 72	syldan 585	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) ∧ 𝑗 ∈ dom 𝑤) → ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))) ∈ 𝐶)
74		ablfac2.s	. . . . . . . . . 10 ⊢ 𝑆 = (𝑘 ∈ dom 𝑤 ↦ ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))))
75		fveq2 6448	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑗 → (𝑤‘𝑘) = (𝑤‘𝑗))
76	75	oveq2d 6940	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑗 → (𝑛 · (𝑤‘𝑘)) = (𝑛 · (𝑤‘𝑗)))
77	76	mpteq2dv 4982	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑗 → (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))))
78	77	rneqd 5600	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑗 → ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))))
79	78	cbvmptv 4987	. . . . . . . . . 10 ⊢ (𝑘 ∈ dom 𝑤 ↦ ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘)))) = (𝑗 ∈ dom 𝑤 ↦ ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))))
80	74, 79	eqtri 2802	. . . . . . . . 9 ⊢ 𝑆 = (𝑗 ∈ dom 𝑤 ↦ ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑗))))
81	73, 80	fmptd 6650	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝑆:dom 𝑤⟶𝐶)
82		simprl 761	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → 𝐺dom DProd 𝑠)
83	82	adantr 474	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝐺dom DProd 𝑠)
84	57	raleqdv 3340	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → (∀𝑘 ∈ dom 𝑤ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘) ↔ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘)))
85	60, 84	mpbird 249	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → ∀𝑘 ∈ dom 𝑤ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))
86		mpteq12 4973	. . . . . . . . . . . 12 ⊢ ((dom 𝑤 = dom 𝑠 ∧ ∀𝑘 ∈ dom 𝑤ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘)) → (𝑘 ∈ dom 𝑤 ↦ ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘)))) = (𝑘 ∈ dom 𝑠 ↦ (𝑠‘𝑘)))
87	57, 85, 86	syl2anc 579	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → (𝑘 ∈ dom 𝑤 ↦ ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘)))) = (𝑘 ∈ dom 𝑠 ↦ (𝑠‘𝑘)))
88	74, 87	syl5eq 2826	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝑆 = (𝑘 ∈ dom 𝑠 ↦ (𝑠‘𝑘)))
89		dprdf 18803	. . . . . . . . . . . 12 ⊢ (𝐺dom DProd 𝑠 → 𝑠:dom 𝑠⟶(SubGrp‘𝐺))
90	83, 89	syl 17	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝑠:dom 𝑠⟶(SubGrp‘𝐺))
91	90	feqmptd 6511	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝑠 = (𝑘 ∈ dom 𝑠 ↦ (𝑠‘𝑘)))
92	88, 91	eqtr4d 2817	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝑆 = 𝑠)
93	83, 92	breqtrrd 4916	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → 𝐺dom DProd 𝑆)
94	92	oveq2d 6940	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → (𝐺 DProd 𝑆) = (𝐺 DProd 𝑠))
95		simplrr 768	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → (𝐺 DProd 𝑠) = 𝐵)
96	94, 95	eqtrd 2814	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → (𝐺 DProd 𝑆) = 𝐵)
97	81, 93, 96	3jca 1119	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → (𝑆:dom 𝑤⟶𝐶 ∧ 𝐺dom DProd 𝑆 ∧ (𝐺 DProd 𝑆) = 𝐵))
98	56, 97	jca 507	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) ∧ (𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘))) → (𝑤 ∈ Word 𝐵 ∧ (𝑆:dom 𝑤⟶𝐶 ∧ 𝐺dom DProd 𝑆 ∧ (𝐺 DProd 𝑆) = 𝐵)))
99	98	ex 403	. . . . 5 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → ((𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘)) → (𝑤 ∈ Word 𝐵 ∧ (𝑆:dom 𝑤⟶𝐶 ∧ 𝐺dom DProd 𝑆 ∧ (𝐺 DProd 𝑆) = 𝐵))))
100	99	eximdv 1960	. . . 4 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → (∃𝑤(𝑤:dom 𝑠⟶𝐵 ∧ ∀𝑘 ∈ dom 𝑠ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝑤‘𝑘))) = (𝑠‘𝑘)) → ∃𝑤(𝑤 ∈ Word 𝐵 ∧ (𝑆:dom 𝑤⟶𝐶 ∧ 𝐺dom DProd 𝑆 ∧ (𝐺 DProd 𝑆) = 𝐵))))
101	50, 100	mpd 15	. . 3 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → ∃𝑤(𝑤 ∈ Word 𝐵 ∧ (𝑆:dom 𝑤⟶𝐶 ∧ 𝐺dom DProd 𝑆 ∧ (𝐺 DProd 𝑆) = 𝐵)))
102		df-rex 3096	. . 3 ⊢ (∃𝑤 ∈ Word 𝐵(𝑆:dom 𝑤⟶𝐶 ∧ 𝐺dom DProd 𝑆 ∧ (𝐺 DProd 𝑆) = 𝐵) ↔ ∃𝑤(𝑤 ∈ Word 𝐵 ∧ (𝑆:dom 𝑤⟶𝐶 ∧ 𝐺dom DProd 𝑆 ∧ (𝐺 DProd 𝑆) = 𝐵)))
103	101, 102	sylibr 226	. 2 ⊢ (((𝜑 ∧ 𝑠 ∈ Word 𝐶) ∧ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)) → ∃𝑤 ∈ Word 𝐵(𝑆:dom 𝑤⟶𝐶 ∧ 𝐺dom DProd 𝑆 ∧ (𝐺 DProd 𝑆) = 𝐵))
104		ablfac.1	. . 3 ⊢ (𝜑 → 𝐺 ∈ Abel)
105		ablfac.2	. . 3 ⊢ (𝜑 → 𝐵 ∈ Fin)
106	14, 10, 104, 105	ablfac 18885	. 2 ⊢ (𝜑 → ∃𝑠 ∈ Word 𝐶(𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵))
107	103, 106	r19.29a 3264	1 ⊢ (𝜑 → ∃𝑤 ∈ Word 𝐵(𝑆:dom 𝑤⟶𝐶 ∧ 𝐺dom DProd 𝑆 ∧ (𝐺 DProd 𝑆) = 𝐵))

Syntax hints:   → wi 4   ∧ wa 386   ∧ w3a 1071   = wceq 1601  ∃wex 1823   ∈ wcel 2107  ∀wral 3090  ∃wrex 3091  {crab 3094   ∩ cin 3791   ⊆ wss 3792   class class class wbr 4888   ↦ cmpt 4967  dom cdm 5357  ran crn 5358  ⟶wf 6133  ‘cfv 6137  (class class class)co 6924  Fincfn 8243  0cc0 10274  ℤcz 11733  ..^cfzo 12789  ♯chash 13441  Word cword 13605  Basecbs 16266   ↾_s cress 16267  Grpcgrp 17820  ._gcmg 17938  SubGrpcsubg 17983   pGrp cpgp 18341  Abelcabl 18591  CycGrpccyg 18676   DProd cdprd 18790

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1839  ax-4 1853  ax-5 1953  ax-6 2021  ax-7 2055  ax-8 2109  ax-9 2116  ax-10 2135  ax-11 2150  ax-12 2163  ax-13 2334  ax-ext 2754  ax-rep 5008  ax-sep 5019  ax-nul 5027  ax-pow 5079  ax-pr 5140  ax-un 7228  ax-inf2 8837  ax-cnex 10330  ax-resscn 10331  ax-1cn 10332  ax-icn 10333  ax-addcl 10334  ax-addrcl 10335  ax-mulcl 10336  ax-mulrcl 10337  ax-mulcom 10338  ax-addass 10339  ax-mulass 10340  ax-distr 10341  ax-i2m1 10342  ax-1ne0 10343  ax-1rid 10344  ax-rnegex 10345  ax-rrecex 10346  ax-cnre 10347  ax-pre-lttri 10348  ax-pre-lttrn 10349  ax-pre-ltadd 10350  ax-pre-mulgt0 10351  ax-pre-sup 10352

This theorem depends on definitions:  df-bi 199  df-an 387  df-or 837  df-3or 1072  df-3an 1073  df-tru 1605  df-fal 1615  df-ex 1824  df-nf 1828  df-sb 2012  df-mo 2551  df-eu 2587  df-clab 2764  df-cleq 2770  df-clel 2774  df-nfc 2921  df-ne 2970  df-nel 3076  df-ral 3095  df-rex 3096  df-reu 3097  df-rmo 3098  df-rab 3099  df-v 3400  df-sbc 3653  df-csb 3752  df-dif 3795  df-un 3797  df-in 3799  df-ss 3806  df-pss 3808  df-nul 4142  df-if 4308  df-pw 4381  df-sn 4399  df-pr 4401  df-tp 4403  df-op 4405  df-uni 4674  df-int 4713  df-iun 4757  df-iin 4758  df-disj 4857  df-br 4889  df-opab 4951  df-mpt 4968  df-tr 4990  df-id 5263  df-eprel 5268  df-po 5276  df-so 5277  df-fr 5316  df-se 5317  df-we 5318  df-xp 5363  df-rel 5364  df-cnv 5365  df-co 5366  df-dm 5367  df-rn 5368  df-res 5369  df-ima 5370  df-pred 5935  df-ord 5981  df-on 5982  df-lim 5983  df-suc 5984  df-iota 6101  df-fun 6139  df-fn 6140  df-f 6141  df-f1 6142  df-fo 6143  df-f1o 6144  df-fv 6145  df-isom 6146  df-riota 6885  df-ov 6927  df-oprab 6928  df-mpt2 6929  df-of 7176  df-rpss 7216  df-om 7346  df-1st 7447  df-2nd 7448  df-supp 7579  df-tpos 7636  df-wrecs 7691  df-recs 7753  df-rdg 7791  df-1o 7845  df-2o 7846  df-oadd 7849  df-omul 7850  df-er 8028  df-ec 8030  df-qs 8034  df-map 8144  df-ixp 8197  df-en 8244  df-dom 8245  df-sdom 8246  df-fin 8247  df-fsupp 8566  df-sup 8638  df-inf 8639  df-oi 8706  df-card 9100  df-acn 9103  df-cda 9327  df-pnf 10415  df-mnf 10416  df-xr 10417  df-ltxr 10418  df-le 10419  df-sub 10610  df-neg 10611  df-div 11036  df-nn 11380  df-2 11443  df-3 11444  df-n0 11648  df-xnn0 11720  df-z 11734  df-uz 11998  df-q 12101  df-rp 12143  df-fz 12649  df-fzo 12790  df-fl 12917  df-mod 12993  df-seq 13125  df-exp 13184  df-fac 13385  df-bc 13414  df-hash 13442  df-word 13606  df-concat 13667  df-s1 13692  df-cj 14252  df-re 14253  df-im 14254  df-sqrt 14388  df-abs 14389  df-clim 14636  df-sum 14834  df-dvds 15397  df-gcd 15633  df-prm 15801  df-pc 15957  df-ndx 16269  df-slot 16270  df-base 16272  df-sets 16273  df-ress 16274  df-plusg 16362  df-0g 16499  df-gsum 16500  df-mre 16643  df-mrc 16644  df-acs 16646  df-mgm 17639  df-sgrp 17681  df-mnd 17692  df-mhm 17732  df-submnd 17733  df-grp 17823  df-minusg 17824  df-sbg 17825  df-mulg 17939  df-subg 17986  df-eqg 17988  df-ghm 18053  df-gim 18096  df-ga 18117  df-cntz 18144  df-oppg 18170  df-od 18343  df-gex 18344  df-pgp 18345  df-lsm 18446  df-pj1 18447  df-cmn 18592  df-abl 18593  df-cyg 18677  df-dprd 18792

This theorem is referenced by:  dchrpt  25455