Theorem grpods 43212

Description: Relate sums of elements of orders and roots of unity. (Contributed by metakunt, 14-Jul-2025.)

Hypotheses

Ref	Expression
grpods.1	⊢ 𝐵 = (Base‘𝐺)
grpods.2	⊢ ↑ = (.g‘𝐺)
grpods.3	⊢ (𝜑 → 𝐺 ∈ Grp)
grpods.4	⊢ (𝜑 → 𝐵 ∈ Fin)
grpods.5	⊢ (𝜑 → 𝑁 ∈ ℕ)

Assertion

Ref	Expression
grpods	⊢ (𝜑 → Σ𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} (♯‘{𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) = (♯‘{𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)}))

Distinct variable groups:   𝑥, ↑   𝐵,𝑘,𝑥   𝑘,𝐺,𝑚   𝑥,𝐺   𝑘,𝑁,𝑚   𝑥,𝑁   𝜑,𝑘

Allowed substitution hints:   𝜑(𝑥, 𝑚)   𝐵(𝑚)   ↑ (𝑘, 𝑚)

Proof of Theorem grpods

Dummy variables 𝑑 𝑙 𝑦 𝑖 𝑤 𝑐 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		oveq2 7420	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → (𝑁 ↑ 𝑥) = (𝑁 ↑ 𝑦))
2	1	eqeq1d 2763	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → ((𝑁 ↑ 𝑥) = (0g‘𝐺) ↔ (𝑁 ↑ 𝑦) = (0g‘𝐺)))
3	2	elrab 3645	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)} ↔ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺)))
4	3	bilani 510	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)}) → (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺)))
5		simpl 488	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → 𝜑)
6		simprl 783	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → 𝑦 ∈ 𝐵)
7	5, 6	jca 521	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → (𝜑 ∧ 𝑦 ∈ 𝐵))
8		simprr 785	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → (𝑁 ↑ 𝑦) = (0g‘𝐺))
9		grpods.3	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐺 ∈ Grp)
10	5, 9	syl 18	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → 𝐺 ∈ Grp)
11		grpmnd 19131	. . . . . . . . . . . . . 14 ⊢ (𝐺 ∈ Grp → 𝐺 ∈ Mnd)
12	10, 11	syl 18	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → 𝐺 ∈ Mnd)
13		grpods.5	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑁 ∈ ℕ)
14	5, 13	syl 18	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → 𝑁 ∈ ℕ)
15	14	nnnn0d 12648	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → 𝑁 ∈ ℕ0)
16		grpods.1	. . . . . . . . . . . . . 14 ⊢ 𝐵 = (Base‘𝐺)
17		eqid 2761	. . . . . . . . . . . . . 14 ⊢ (od‘𝐺) = (od‘𝐺)
18		grpods.2	. . . . . . . . . . . . . 14 ⊢ ↑ = (.g‘𝐺)
19		eqid 2761	. . . . . . . . . . . . . 14 ⊢ (0g‘𝐺) = (0g‘𝐺)
20	16, 17, 18, 19	oddvdsnn0 19738	. . . . . . . . . . . . 13 ⊢ ((𝐺 ∈ Mnd ∧ 𝑦 ∈ 𝐵 ∧ 𝑁 ∈ ℕ0) → (((od‘𝐺)‘𝑦) ∥ 𝑁 ↔ (𝑁 ↑ 𝑦) = (0g‘𝐺)))
21	12, 6, 15, 20	syl3anc 1398	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → (((od‘𝐺)‘𝑦) ∥ 𝑁 ↔ (𝑁 ↑ 𝑦) = (0g‘𝐺)))
22	8, 21	mpbird 260	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → ((od‘𝐺)‘𝑦) ∥ 𝑁)
23	7, 22	jca 521	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → ((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁))
24		breq1 5106	. . . . . . . . . . . 12 ⊢ (𝑚 = ((od‘𝐺)‘𝑦) → (𝑚 ∥ 𝑁 ↔ ((od‘𝐺)‘𝑦) ∥ 𝑁))
25		1zzd 12708	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 1 ∈ ℤ)
26	13	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 𝑁 ∈ ℕ)
27	26	nnzd 12700	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 𝑁 ∈ ℤ)
28		dvdszrcl 16407	. . . . . . . . . . . . . . 15 ⊢ (((od‘𝐺)‘𝑦) ∥ 𝑁 → (((od‘𝐺)‘𝑦) ∈ ℤ ∧ 𝑁 ∈ ℤ))
29	28	simpld 500	. . . . . . . . . . . . . 14 ⊢ (((od‘𝐺)‘𝑦) ∥ 𝑁 → ((od‘𝐺)‘𝑦) ∈ ℤ)
30	29	adantl 487	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ∈ ℤ)
31	9	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 𝐺 ∈ Grp)
32		grpods.4	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐵 ∈ Fin)
33	32	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 𝐵 ∈ Fin)
34		simplr 781	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 𝑦 ∈ 𝐵)
35	16, 17	odcl2 19759	. . . . . . . . . . . . . . 15 ⊢ ((𝐺 ∈ Grp ∧ 𝐵 ∈ Fin ∧ 𝑦 ∈ 𝐵) → ((od‘𝐺)‘𝑦) ∈ ℕ)
36	31, 33, 34, 35	syl3anc 1398	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ∈ ℕ)
37	36	nnge1d 12367	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 1 ≤ ((od‘𝐺)‘𝑦))
38	30, 26	jca 521	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → (((od‘𝐺)‘𝑦) ∈ ℤ ∧ 𝑁 ∈ ℕ))
39		simpr 490	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ∥ 𝑁)
40		dvdsle 16460	. . . . . . . . . . . . . . 15 ⊢ ((((od‘𝐺)‘𝑦) ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((od‘𝐺)‘𝑦) ∥ 𝑁 → ((od‘𝐺)‘𝑦) ≤ 𝑁))
41	40	imp 412	. . . . . . . . . . . . . 14 ⊢ (((((od‘𝐺)‘𝑦) ∈ ℤ ∧ 𝑁 ∈ ℕ) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ≤ 𝑁)
42	38, 39, 41	syl2anc 596	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ≤ 𝑁)
43	25, 27, 30, 37, 42	elfzd 13628	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ∈ (1...𝑁))
44	24, 43, 39	elrabd 3647	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁})
45		fveqeq2 6886	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑦 → (((od‘𝐺)‘𝑥) = ((od‘𝐺)‘𝑦) ↔ ((od‘𝐺)‘𝑦) = ((od‘𝐺)‘𝑦)))
46		eqidd 2762	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) = ((od‘𝐺)‘𝑦))
47	45, 34, 46	elrabd 3647	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = ((od‘𝐺)‘𝑦)})
48		eqeq2 2773	. . . . . . . . . . . . 13 ⊢ (𝑘 = ((od‘𝐺)‘𝑦) → (((od‘𝐺)‘𝑥) = 𝑘 ↔ ((od‘𝐺)‘𝑥) = ((od‘𝐺)‘𝑦)))
49	48	rabbidv 3420	. . . . . . . . . . . 12 ⊢ (𝑘 = ((od‘𝐺)‘𝑦) → {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} = {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = ((od‘𝐺)‘𝑦)})
50	49	eliuni 4957	. . . . . . . . . . 11 ⊢ ((((od‘𝐺)‘𝑦) ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = ((od‘𝐺)‘𝑦)}) → 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘})
51	44, 47, 50	syl2anc 596	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘})
52	23, 51	syl 18	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘})
53	52	ex 418	. . . . . . . 8 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺)) → 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}))
54	53	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)}) → ((𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺)) → 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}))
55	4, 54	mpd 16	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)}) → 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘})
56	55	ex 418	. . . . 5 ⊢ (𝜑 → (𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)} → 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}))
57		eliun 4955	. . . . . . . 8 ⊢ (𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ↔ ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘})
58	57	bilani 510	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) → ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘})
59		simplll 787	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → 𝜑)
60		simplr 781	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁})
61	59, 60	jca 521	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → (𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}))
62		simpr 490	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙})
63	61, 62	jca 521	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → ((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}))
64		elrabi 3641	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙} → 𝑦 ∈ 𝐵)
65	64	adantl 487	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → 𝑦 ∈ 𝐵)
66		simpll 779	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → 𝜑)
67		breq1 5106	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑚 = 𝑙 → (𝑚 ∥ 𝑁 ↔ 𝑙 ∥ 𝑁))
68	67	elrab 3645	. . . . . . . . . . . . . . . . 17 ⊢ (𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} ↔ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁))
69	68	bilani 510	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) → (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁))
70	69	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁))
71	66, 70	jca 521	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → (𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)))
72		fveqeq2 6886	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑦 → (((od‘𝐺)‘𝑥) = 𝑙 ↔ ((od‘𝐺)‘𝑦) = 𝑙))
73	72	elrab 3645	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙} ↔ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙))
74	73	bilani 510	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙))
75	71, 74	jca 521	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → ((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)))
76		simpll 779	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) → 𝜑)
77		simprr 785	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) → 𝑙 ∥ 𝑁)
78		elfzelz 13637	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑙 ∈ (1...𝑁) → 𝑙 ∈ ℤ)
79	78	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁) → 𝑙 ∈ ℤ)
80	79	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) → 𝑙 ∈ ℤ)
81	13	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) → 𝑁 ∈ ℕ)
82	81	nnzd 12700	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) → 𝑁 ∈ ℤ)
83		divides 16404	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑙 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑙 ∥ 𝑁 ↔ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁))
84	80, 82, 83	syl2anc 596	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) → (𝑙 ∥ 𝑁 ↔ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁))
85	77, 84	mpbid 235	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) → ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁)
86	85	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) → ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁)
87	76, 86	jca 521	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) → (𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁))
88		simpr 490	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) → (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙))
89	87, 88	jca 521	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) → ((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)))
90		oveq1 7419	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑑 · 𝑙) = 𝑁 → ((𝑑 · 𝑙) ↑ 𝑦) = (𝑁 ↑ 𝑦))
91	90	eqcomd 2767	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑑 · 𝑙) = 𝑁 → (𝑁 ↑ 𝑦) = ((𝑑 · 𝑙) ↑ 𝑦))
92	91	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) ∧ (𝑑 · 𝑙) = 𝑁) → (𝑁 ↑ 𝑦) = ((𝑑 · 𝑙) ↑ 𝑦))
93		simplrr 790	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → ((od‘𝐺)‘𝑦) = 𝑙)
94	93	oveq2d 7428	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → (𝑑 · ((od‘𝐺)‘𝑦)) = (𝑑 · 𝑙))
95	94	eqcomd 2767	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → (𝑑 · 𝑙) = (𝑑 · ((od‘𝐺)‘𝑦)))
96	95	oveq1d 7427	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → ((𝑑 · 𝑙) ↑ 𝑦) = ((𝑑 · ((od‘𝐺)‘𝑦)) ↑ 𝑦))
97		simplll 787	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → 𝜑)
98		simplrl 789	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → 𝑦 ∈ 𝐵)
99	97, 98	jca 521	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → (𝜑 ∧ 𝑦 ∈ 𝐵))
100		simpr 490	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → 𝑑 ∈ ℤ)
101	99, 100	jca 521	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → ((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ))
102	9	ad2antrr 739	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → 𝐺 ∈ Grp)
103		simpr 490	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → 𝑑 ∈ ℤ)
104	16, 17	odcl 19730	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑦 ∈ 𝐵 → ((od‘𝐺)‘𝑦) ∈ ℕ0)
105	104	ad2antlr 740	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → ((od‘𝐺)‘𝑦) ∈ ℕ0)
106	105	nn0zd 12699	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → ((od‘𝐺)‘𝑦) ∈ ℤ)
107		simplr 781	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → 𝑦 ∈ 𝐵)
108	103, 106, 107	3jca 1146	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → (𝑑 ∈ ℤ ∧ ((od‘𝐺)‘𝑦) ∈ ℤ ∧ 𝑦 ∈ 𝐵))
109	16, 18	mulgass 19301	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐺 ∈ Grp ∧ (𝑑 ∈ ℤ ∧ ((od‘𝐺)‘𝑦) ∈ ℤ ∧ 𝑦 ∈ 𝐵)) → ((𝑑 · ((od‘𝐺)‘𝑦)) ↑ 𝑦) = (𝑑 ↑ (((od‘𝐺)‘𝑦) ↑ 𝑦)))
110	102, 108, 109	syl2anc 596	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → ((𝑑 · ((od‘𝐺)‘𝑦)) ↑ 𝑦) = (𝑑 ↑ (((od‘𝐺)‘𝑦) ↑ 𝑦)))
111	16, 17, 18, 19	odid 19732	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑦 ∈ 𝐵 → (((od‘𝐺)‘𝑦) ↑ 𝑦) = (0g‘𝐺))
112	107, 111	syl 18	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → (((od‘𝐺)‘𝑦) ↑ 𝑦) = (0g‘𝐺))
113	112	oveq2d 7428	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → (𝑑 ↑ (((od‘𝐺)‘𝑦) ↑ 𝑦)) = (𝑑 ↑ (0g‘𝐺)))
114	16, 18, 19	mulgz 19292	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐺 ∈ Grp ∧ 𝑑 ∈ ℤ) → (𝑑 ↑ (0g‘𝐺)) = (0g‘𝐺))
115	102, 103, 114	syl2anc 596	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → (𝑑 ↑ (0g‘𝐺)) = (0g‘𝐺))
116	113, 115	eqtrd 2796	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → (𝑑 ↑ (((od‘𝐺)‘𝑦) ↑ 𝑦)) = (0g‘𝐺))
117	110, 116	eqtrd 2796	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → ((𝑑 · ((od‘𝐺)‘𝑦)) ↑ 𝑦) = (0g‘𝐺))
118	101, 117	syl 18	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → ((𝑑 · ((od‘𝐺)‘𝑦)) ↑ 𝑦) = (0g‘𝐺))
119	96, 118	eqtrd 2796	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → ((𝑑 · 𝑙) ↑ 𝑦) = (0g‘𝐺))
120	119	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) ∧ (𝑑 · 𝑙) = 𝑁) → ((𝑑 · 𝑙) ↑ 𝑦) = (0g‘𝐺))
121	92, 120	eqtrd 2796	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) ∧ (𝑑 · 𝑙) = 𝑁) → (𝑁 ↑ 𝑦) = (0g‘𝐺))
122		nfv 1947	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑑(𝑐 · 𝑙) = 𝑁
123		nfv 1947	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑐(𝑑 · 𝑙) = 𝑁
124		oveq1 7419	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑐 = 𝑑 → (𝑐 · 𝑙) = (𝑑 · 𝑙))
125	124	eqeq1d 2763	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑐 = 𝑑 → ((𝑐 · 𝑙) = 𝑁 ↔ (𝑑 · 𝑙) = 𝑁))
126	122, 123, 125	cbvrexw 3306	. . . . . . . . . . . . . . . . 17 ⊢ (∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁 ↔ ∃𝑑 ∈ ℤ (𝑑 · 𝑙) = 𝑁)
127	126	bilani 510	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) → ∃𝑑 ∈ ℤ (𝑑 · 𝑙) = 𝑁)
128	127	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) → ∃𝑑 ∈ ℤ (𝑑 · 𝑙) = 𝑁)
129	121, 128	r19.29a 3171	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) → (𝑁 ↑ 𝑦) = (0g‘𝐺))
130	89, 129	syl 18	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) → (𝑁 ↑ 𝑦) = (0g‘𝐺))
131	75, 130	syl 18	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → (𝑁 ↑ 𝑦) = (0g‘𝐺))
132	2, 65, 131	elrabd 3647	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)})
133	63, 132	syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)})
134		nfv 1947	. . . . . . . . . . . 12 ⊢ Ⅎ𝑙 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}
135		nfv 1947	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}
136		eqeq2 2773	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑙 → (((od‘𝐺)‘𝑥) = 𝑘 ↔ ((od‘𝐺)‘𝑥) = 𝑙))
137	136	rabbidv 3420	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑙 → {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} = {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙})
138	137	eleq2d 2847	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑙 → (𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ↔ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}))
139	134, 135, 138	cbvrexw 3306	. . . . . . . . . . 11 ⊢ (∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ↔ ∃𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙})
140	139	bilani 510	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) → ∃𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙})
141	133, 140	r19.29a 3171	. . . . . . . . 9 ⊢ ((𝜑 ∧ ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) → 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)})
142	141	ex 418	. . . . . . . 8 ⊢ (𝜑 → (∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} → 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)}))
143	142	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) → (∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} → 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)}))
144	58, 143	mpd 16	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) → 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)})
145	144	ex 418	. . . . 5 ⊢ (𝜑 → (𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} → 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)}))
146	56, 145	impbid 215	. . . 4 ⊢ (𝜑 → (𝑦 ∈ {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)} ↔ 𝑦 ∈ ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}))
147	146	eqrdv 2759	. . 3 ⊢ (𝜑 → {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)} = ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘})
148	147	fveq2d 6881	. 2 ⊢ (𝜑 → (♯‘{𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)}) = (♯‘∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}))
149		fzfid 14096	. . . 4 ⊢ (𝜑 → (1...𝑁) ∈ Fin)
150		ssrab2 4028	. . . . 5 ⊢ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} ⊆ (1...𝑁)
151	150	a1i 11	. . . 4 ⊢ (𝜑 → {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} ⊆ (1...𝑁))
152	149, 151	ssfid 9244	. . 3 ⊢ (𝜑 → {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} ∈ Fin)
153	32	adantr 486	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) → 𝐵 ∈ Fin)
154		ssrab2 4028	. . . . 5 ⊢ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ⊆ 𝐵
155	154	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) → {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ⊆ 𝐵)
156	153, 155	ssfid 9244	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) → {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∈ Fin)
157		animorrl 996	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑘 = 𝑖) → (𝑘 = 𝑖 ∨ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅))
158		inrab 4262	. . . . . . . . . . 11 ⊢ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = {𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)}
159	158	a1i 11	. . . . . . . . . 10 ⊢ (¬ 𝑘 = 𝑖 → ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = {𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)})
160		rabn0 4339	. . . . . . . . . . . . 13 ⊢ ({𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)} ≠ ∅ ↔ ∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖))
161	160	biimpi 219	. . . . . . . . . . . 12 ⊢ ({𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)} ≠ ∅ → ∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖))
162		eqtr2 2782	. . . . . . . . . . . . . 14 ⊢ ((((od‘𝐺)‘𝑤) = 𝑘 ∧ ((od‘𝐺)‘𝑤) = 𝑖) → 𝑘 = 𝑖)
163	162	adantl 487	. . . . . . . . . . . . 13 ⊢ (((∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖) ∧ 𝑤 ∈ 𝐵) ∧ (((od‘𝐺)‘𝑤) = 𝑘 ∧ ((od‘𝐺)‘𝑤) = 𝑖)) → 𝑘 = 𝑖)
164		nfv 1947	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑤(((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)
165		nfv 1947	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑥(((od‘𝐺)‘𝑤) = 𝑘 ∧ ((od‘𝐺)‘𝑤) = 𝑖)
166		fveqeq2 6886	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑤 → (((od‘𝐺)‘𝑥) = 𝑘 ↔ ((od‘𝐺)‘𝑤) = 𝑘))
167		fveqeq2 6886	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑤 → (((od‘𝐺)‘𝑥) = 𝑖 ↔ ((od‘𝐺)‘𝑤) = 𝑖))
168	166, 167	anbi12d 644	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑤 → ((((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖) ↔ (((od‘𝐺)‘𝑤) = 𝑘 ∧ ((od‘𝐺)‘𝑤) = 𝑖)))
169	164, 165, 168	cbvrexw 3306	. . . . . . . . . . . . . 14 ⊢ (∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖) ↔ ∃𝑤 ∈ 𝐵 (((od‘𝐺)‘𝑤) = 𝑘 ∧ ((od‘𝐺)‘𝑤) = 𝑖))
170	169	biimpi 219	. . . . . . . . . . . . 13 ⊢ (∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖) → ∃𝑤 ∈ 𝐵 (((od‘𝐺)‘𝑤) = 𝑘 ∧ ((od‘𝐺)‘𝑤) = 𝑖))
171	163, 170	r19.29a 3171	. . . . . . . . . . . 12 ⊢ (∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖) → 𝑘 = 𝑖)
172	161, 171	syl 18	. . . . . . . . . . 11 ⊢ ({𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)} ≠ ∅ → 𝑘 = 𝑖)
173	172	necon1bi 2984	. . . . . . . . . 10 ⊢ (¬ 𝑘 = 𝑖 → {𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)} = ∅)
174	159, 173	eqtrd 2796	. . . . . . . . 9 ⊢ (¬ 𝑘 = 𝑖 → ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅)
175	174	adantl 487	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ ¬ 𝑘 = 𝑖) → ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅)
176	175	olcd 888	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ ¬ 𝑘 = 𝑖) → (𝑘 = 𝑖 ∨ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅))
177	157, 176	pm2.61dan 825	. . . . . 6 ⊢ (((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) → (𝑘 = 𝑖 ∨ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅))
178	177	ralrimiva 3155	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) → ∀𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} (𝑘 = 𝑖 ∨ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅))
179	178	ralrimiva 3155	. . . 4 ⊢ (𝜑 → ∀𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}∀𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} (𝑘 = 𝑖 ∨ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅))
180		eqeq2 2773	. . . . . 6 ⊢ (𝑘 = 𝑖 → (((od‘𝐺)‘𝑥) = 𝑘 ↔ ((od‘𝐺)‘𝑥) = 𝑖))
181	180	rabbidv 3420	. . . . 5 ⊢ (𝑘 = 𝑖 → {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} = {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖})
182	181	disjor 5085	. . . 4 ⊢ (Disj 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ↔ ∀𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}∀𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} (𝑘 = 𝑖 ∨ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅))
183	179, 182	sylibr 237	. . 3 ⊢ (𝜑 → Disj 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘})
184	152, 156, 183	hashiun 15969	. 2 ⊢ (𝜑 → (♯‘∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) = Σ𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} (♯‘{𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}))
185	148, 184	eqtr2d 2797	1 ⊢ (𝜑 → Σ𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} (♯‘{𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) = (♯‘{𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)}))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145   ≠ wne 2956  ∀wral 3077  ∃wrex 3087  {crab 3413   ∩ cin 3898   ⊆ wss 3899  ∅c0 4279  ∪ ciun 4951  Disj wdisj 5070   class class class wbr 5103  ‘cfv 6531  (class class class)co 7412  Fincfn 8957  1c1 11182   · cmul 11186   ≤ cle 11325  ℕcn 12316  ℕ₀cn0 12587  ℤcz 12674  ...cfz 13620  ♯chash 14454  Σcsu 15833   ∥ cdvds 16402  Basecbs 17367  0_gc0g 17590  Mndcmnd 18903  Grpcgrp 19124  ._gcmg 19257  odcod 19718

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 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7740  ax-inf2 9626  ax-cnex 11237  ax-resscn 11238  ax-1cn 11239  ax-icn 11240  ax-addcl 11241  ax-addrcl 11242  ax-mulcl 11243  ax-mulrcl 11244  ax-mulcom 11245  ax-addass 11246  ax-mulass 11247  ax-distr 11248  ax-i2m1 11249  ax-1ne0 11250  ax-1rid 11251  ax-rnegex 11252  ax-rrecex 11253  ax-cnre 11254  ax-pre-lttri 11255  ax-pre-lttrn 11256  ax-pre-ltadd 11257  ax-pre-mulgt0 11258  ax-pre-sup 11259

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 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-disj 5071  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6297  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6487  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-isom 6540  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7867  df-1st 7990  df-2nd 7991  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8460  df-oadd 8464  df-omul 8465  df-er 8701  df-map 8833  df-en 8958  df-dom 8959  df-sdom 8960  df-fin 8961  df-sup 9418  df-inf 9419  df-oi 9488  df-card 10001  df-acn 10004  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11524  df-neg 11525  df-div 11955  df-nn 12317  df-2 12386  df-3 12387  df-n0 12588  df-z 12675  df-uz 12947  df-rp 13102  df-fz 13621  df-fzo 13769  df-fl 13912  df-mod 13990  df-seq 14125  df-exp 14185  df-hash 14455  df-cj 15246  df-re 15247  df-im 15248  df-sqrt 15382  df-abs 15383  df-clim 15635  df-sum 15834  df-dvds 16403  df-0g 17592  df-mgm 18796  df-sgrp 18888  df-mnd 18904  df-grp 19127  df-minusg 19128  df-sbg 19129  df-mulg 19258  df-od 19722

This theorem is used by:  unitscyglem2  43214  unitscyglem4  43216