Theorem grpods 42993

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 7424	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → (𝑁 ↑ 𝑥) = (𝑁 ↑ 𝑦))
2	1	eqeq1d 2768	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → ((𝑁 ↑ 𝑥) = (0g‘𝐺) ↔ (𝑁 ↑ 𝑦) = (0g‘𝐺)))
3	2	elrab 3653	. . . . . . . 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 19017	. . . . . . . . . . . . . 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 12575	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝐵 ∧ (𝑁 ↑ 𝑦) = (0g‘𝐺))) → 𝑁 ∈ ℕ0)
16		grpods.1	. . . . . . . . . . . . . 14 ⊢ 𝐵 = (Base‘𝐺)
17		eqid 2766	. . . . . . . . . . . . . 14 ⊢ (od‘𝐺) = (od‘𝐺)
18		grpods.2	. . . . . . . . . . . . . 14 ⊢ ↑ = (.g‘𝐺)
19		eqid 2766	. . . . . . . . . . . . . 14 ⊢ (0g‘𝐺) = (0g‘𝐺)
20	16, 17, 18, 19	oddvdsnn0 19624	. . . . . . . . . . . . 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 5115	. . . . . . . . . . . 12 ⊢ (𝑚 = ((od‘𝐺)‘𝑦) → (𝑚 ∥ 𝑁 ↔ ((od‘𝐺)‘𝑦) ∥ 𝑁))
25		1zzd 12635	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 1 ∈ ℤ)
26	13	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 𝑁 ∈ ℕ)
27	26	nnzd 12627	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 𝑁 ∈ ℤ)
28		dvdszrcl 16325	. . . . . . . . . . . . . . 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 19645	. . . . . . . . . . . . . . 15 ⊢ ((𝐺 ∈ Grp ∧ 𝐵 ∈ Fin ∧ 𝑦 ∈ 𝐵) → ((od‘𝐺)‘𝑦) ∈ ℕ)
36	31, 33, 34, 35	syl3anc 1398	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ∈ ℕ)
37	36	nnge1d 12294	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 1 ≤ ((od‘𝐺)‘𝑦))
38	30, 26	jca 521	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → (((od‘𝐺)‘𝑦) ∈ ℤ ∧ 𝑁 ∈ ℕ))
39		simpr 490	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ∥ 𝑁)
40		dvdsle 16378	. . . . . . . . . . . . . . 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 13553	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ∈ (1...𝑁))
44	24, 43, 39	elrabd 3655	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁})
45		fveqeq2 6894	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑦 → (((od‘𝐺)‘𝑥) = ((od‘𝐺)‘𝑦) ↔ ((od‘𝐺)‘𝑦) = ((od‘𝐺)‘𝑦)))
46		eqidd 2767	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → ((od‘𝐺)‘𝑦) = ((od‘𝐺)‘𝑦))
47	45, 34, 46	elrabd 3655	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ ((od‘𝐺)‘𝑦) ∥ 𝑁) → 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = ((od‘𝐺)‘𝑦)})
48		eqeq2 2778	. . . . . . . . . . . . 13 ⊢ (𝑘 = ((od‘𝐺)‘𝑦) → (((od‘𝐺)‘𝑥) = 𝑘 ↔ ((od‘𝐺)‘𝑥) = ((od‘𝐺)‘𝑦)))
49	48	rabbidv 3426	. . . . . . . . . . . 12 ⊢ (𝑘 = ((od‘𝐺)‘𝑦) → {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} = {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = ((od‘𝐺)‘𝑦)})
50	49	eliuni 4965	. . . . . . . . . . 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 4963	. . . . . . . 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 3649	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙} → 𝑦 ∈ 𝐵)
65	64	adantl 487	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → 𝑦 ∈ 𝐵)
66		simpll 779	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}) → 𝜑)
67		breq1 5115	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑚 = 𝑙 → (𝑚 ∥ 𝑁 ↔ 𝑙 ∥ 𝑁))
68	67	elrab 3653	. . . . . . . . . . . . . . . . 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 6894	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑦 → (((od‘𝐺)‘𝑥) = 𝑙 ↔ ((od‘𝐺)‘𝑦) = 𝑙))
73	72	elrab 3653	. . . . . . . . . . . . . . 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 13562	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑙 ∈ (1...𝑁) → 𝑙 ∈ ℤ)
79	78	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁) → 𝑙 ∈ ℤ)
80	79	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) → 𝑙 ∈ ℤ)
81	13	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) → 𝑁 ∈ ℕ)
82	81	nnzd 12627	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ (𝑙 ∈ (1...𝑁) ∧ 𝑙 ∥ 𝑁)) → 𝑁 ∈ ℤ)
83		divides 16322	. . . . . . . . . . . . . . . . . . 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 7423	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑑 · 𝑙) = 𝑁 → ((𝑑 · 𝑙) ↑ 𝑦) = (𝑁 ↑ 𝑦))
91	90	eqcomd 2772	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑑 · 𝑙) = 𝑁 → (𝑁 ↑ 𝑦) = ((𝑑 · 𝑙) ↑ 𝑦))
92	91	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) ∧ (𝑑 · 𝑙) = 𝑁) → (𝑁 ↑ 𝑦) = ((𝑑 · 𝑙) ↑ 𝑦))
93		simplrr 790	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → ((od‘𝐺)‘𝑦) = 𝑙)
94	93	oveq2d 7432	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → (𝑑 · ((od‘𝐺)‘𝑦)) = (𝑑 · 𝑙))
95	94	eqcomd 2772	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → (𝑑 · 𝑙) = (𝑑 · ((od‘𝐺)‘𝑦)))
96	95	oveq1d 7431	. . . . . . . . . . . . . . . . . 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 19616	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑦 ∈ 𝐵 → ((od‘𝐺)‘𝑦) ∈ ℕ0)
105	104	ad2antlr 740	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → ((od‘𝐺)‘𝑦) ∈ ℕ0)
106	105	nn0zd 12626	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → ((od‘𝐺)‘𝑦) ∈ ℤ)
107		simplr 781	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → 𝑦 ∈ 𝐵)
108	103, 106, 107	3jca 1146	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → (𝑑 ∈ ℤ ∧ ((od‘𝐺)‘𝑦) ∈ ℤ ∧ 𝑦 ∈ 𝐵))
109	16, 18	mulgass 19187	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐺 ∈ Grp ∧ (𝑑 ∈ ℤ ∧ ((od‘𝐺)‘𝑦) ∈ ℤ ∧ 𝑦 ∈ 𝐵)) → ((𝑑 · ((od‘𝐺)‘𝑦)) ↑ 𝑦) = (𝑑 ↑ (((od‘𝐺)‘𝑦) ↑ 𝑦)))
110	102, 108, 109	syl2anc 596	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → ((𝑑 · ((od‘𝐺)‘𝑦)) ↑ 𝑦) = (𝑑 ↑ (((od‘𝐺)‘𝑦) ↑ 𝑦)))
111	16, 17, 18, 19	odid 19618	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑦 ∈ 𝐵 → (((od‘𝐺)‘𝑦) ↑ 𝑦) = (0g‘𝐺))
112	107, 111	syl 18	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → (((od‘𝐺)‘𝑦) ↑ 𝑦) = (0g‘𝐺))
113	112	oveq2d 7432	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → (𝑑 ↑ (((od‘𝐺)‘𝑦) ↑ 𝑦)) = (𝑑 ↑ (0g‘𝐺)))
114	16, 18, 19	mulgz 19178	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐺 ∈ Grp ∧ 𝑑 ∈ ℤ) → (𝑑 ↑ (0g‘𝐺)) = (0g‘𝐺))
115	102, 103, 114	syl2anc 596	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → (𝑑 ↑ (0g‘𝐺)) = (0g‘𝐺))
116	113, 115	eqtrd 2801	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → (𝑑 ↑ (((od‘𝐺)‘𝑦) ↑ 𝑦)) = (0g‘𝐺))
117	110, 116	eqtrd 2801	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐵) ∧ 𝑑 ∈ ℤ) → ((𝑑 · ((od‘𝐺)‘𝑦)) ↑ 𝑦) = (0g‘𝐺))
118	101, 117	syl 18	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → ((𝑑 · ((od‘𝐺)‘𝑦)) ↑ 𝑦) = (0g‘𝐺))
119	96, 118	eqtrd 2801	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) → ((𝑑 · 𝑙) ↑ 𝑦) = (0g‘𝐺))
120	119	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) ∧ (𝑑 · 𝑙) = 𝑁) → ((𝑑 · 𝑙) ↑ 𝑦) = (0g‘𝐺))
121	92, 120	eqtrd 2801	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) ∧ 𝑑 ∈ ℤ) ∧ (𝑑 · 𝑙) = 𝑁) → (𝑁 ↑ 𝑦) = (0g‘𝐺))
122		nfv 1947	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑑(𝑐 · 𝑙) = 𝑁
123		nfv 1947	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑐(𝑑 · 𝑙) = 𝑁
124		oveq1 7423	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑐 = 𝑑 → (𝑐 · 𝑙) = (𝑑 · 𝑙))
125	124	eqeq1d 2768	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑐 = 𝑑 → ((𝑐 · 𝑙) = 𝑁 ↔ (𝑑 · 𝑙) = 𝑁))
126	122, 123, 125	cbvrexw 3311	. . . . . . . . . . . . . . . . 17 ⊢ (∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁 ↔ ∃𝑑 ∈ ℤ (𝑑 · 𝑙) = 𝑁)
127	126	bilani 510	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) → ∃𝑑 ∈ ℤ (𝑑 · 𝑙) = 𝑁)
128	127	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ ∃𝑐 ∈ ℤ (𝑐 · 𝑙) = 𝑁) ∧ (𝑦 ∈ 𝐵 ∧ ((od‘𝐺)‘𝑦) = 𝑙)) → ∃𝑑 ∈ ℤ (𝑑 · 𝑙) = 𝑁)
129	121, 128	r19.29a 3176	. . . . . . . . . . . . . 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 3655	. . . . . . . . . . 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 2778	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑙 → (((od‘𝐺)‘𝑥) = 𝑘 ↔ ((od‘𝐺)‘𝑥) = 𝑙))
137	136	rabbidv 3426	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑙 → {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} = {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙})
138	137	eleq2d 2852	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑙 → (𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ↔ 𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙}))
139	134, 135, 138	cbvrexw 3311	. . . . . . . . . . 11 ⊢ (∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ↔ ∃𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙})
140	139	bilani 510	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ∃𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) → ∃𝑙 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}𝑦 ∈ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑙})
141	133, 140	r19.29a 3176	. . . . . . . . 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 2764	. . 3 ⊢ (𝜑 → {𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)} = ∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘})
148	147	fveq2d 6889	. 2 ⊢ (𝜑 → (♯‘{𝑥 ∈ 𝐵 ∣ (𝑁 ↑ 𝑥) = (0g‘𝐺)}) = (♯‘∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}))
149		fzfid 14020	. . . 4 ⊢ (𝜑 → (1...𝑁) ∈ Fin)
150		ssrab2 4037	. . . . 5 ⊢ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} ⊆ (1...𝑁)
151	150	a1i 11	. . . 4 ⊢ (𝜑 → {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} ⊆ (1...𝑁))
152	149, 151	ssfid 9231	. . 3 ⊢ (𝜑 → {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} ∈ Fin)
153	32	adantr 486	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) → 𝐵 ∈ Fin)
154		ssrab2 4037	. . . . 5 ⊢ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ⊆ 𝐵
155	154	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) → {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ⊆ 𝐵)
156	153, 155	ssfid 9231	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) → {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∈ Fin)
157		animorrl 996	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) ∧ 𝑘 = 𝑖) → (𝑘 = 𝑖 ∨ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅))
158		inrab 4272	. . . . . . . . . . 11 ⊢ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = {𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)}
159	158	a1i 11	. . . . . . . . . 10 ⊢ (¬ 𝑘 = 𝑖 → ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = {𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)})
160		rabn0 4349	. . . . . . . . . . . . 13 ⊢ ({𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)} ≠ ∅ ↔ ∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖))
161	160	biimpi 219	. . . . . . . . . . . 12 ⊢ ({𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)} ≠ ∅ → ∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖))
162		eqtr2 2787	. . . . . . . . . . . . . 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 6894	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑤 → (((od‘𝐺)‘𝑥) = 𝑘 ↔ ((od‘𝐺)‘𝑤) = 𝑘))
167		fveqeq2 6894	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑤 → (((od‘𝐺)‘𝑥) = 𝑖 ↔ ((od‘𝐺)‘𝑤) = 𝑖))
168	166, 167	anbi12d 644	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑤 → ((((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖) ↔ (((od‘𝐺)‘𝑤) = 𝑘 ∧ ((od‘𝐺)‘𝑤) = 𝑖)))
169	164, 165, 168	cbvrexw 3311	. . . . . . . . . . . . . 14 ⊢ (∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖) ↔ ∃𝑤 ∈ 𝐵 (((od‘𝐺)‘𝑤) = 𝑘 ∧ ((od‘𝐺)‘𝑤) = 𝑖))
170	169	biimpi 219	. . . . . . . . . . . . 13 ⊢ (∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖) → ∃𝑤 ∈ 𝐵 (((od‘𝐺)‘𝑤) = 𝑘 ∧ ((od‘𝐺)‘𝑤) = 𝑖))
171	163, 170	r19.29a 3176	. . . . . . . . . . . 12 ⊢ (∃𝑥 ∈ 𝐵 (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖) → 𝑘 = 𝑖)
172	161, 171	syl 18	. . . . . . . . . . 11 ⊢ ({𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)} ≠ ∅ → 𝑘 = 𝑖)
173	172	necon1bi 2989	. . . . . . . . . 10 ⊢ (¬ 𝑘 = 𝑖 → {𝑥 ∈ 𝐵 ∣ (((od‘𝐺)‘𝑥) = 𝑘 ∧ ((od‘𝐺)‘𝑥) = 𝑖)} = ∅)
174	159, 173	eqtrd 2801	. . . . . . . . 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 3160	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}) → ∀𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} (𝑘 = 𝑖 ∨ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅))
179	178	ralrimiva 3160	. . . 4 ⊢ (𝜑 → ∀𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}∀𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} (𝑘 = 𝑖 ∨ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅))
180		eqeq2 2778	. . . . . 6 ⊢ (𝑘 = 𝑖 → (((od‘𝐺)‘𝑥) = 𝑘 ↔ ((od‘𝐺)‘𝑥) = 𝑖))
181	180	rabbidv 3426	. . . . 5 ⊢ (𝑘 = 𝑖 → {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} = {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖})
182	181	disjor 5094	. . . 4 ⊢ (Disj 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ↔ ∀𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁}∀𝑖 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} (𝑘 = 𝑖 ∨ ({𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘} ∩ {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑖}) = ∅))
183	179, 182	sylibr 237	. . 3 ⊢ (𝜑 → Disj 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘})
184	152, 156, 183	hashiun 15885	. 2 ⊢ (𝜑 → (♯‘∪ 𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} {𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}) = Σ𝑘 ∈ {𝑚 ∈ (1...𝑁) ∣ 𝑚 ∥ 𝑁} (♯‘{𝑥 ∈ 𝐵 ∣ ((od‘𝐺)‘𝑥) = 𝑘}))
185	148, 184	eqtr2d 2802	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 2146   ≠ wne 2961  ∀wral 3082  ∃wrex 3092  {crab 3419   ∩ cin 3907   ⊆ wss 3908  ∅c0 4289  ∪ ciun 4959  Disj wdisj 5079   class class class wbr 5112  ‘cfv 6540  (class class class)co 7416  Fincfn 8945  1c1 11111   · cmul 11115   ≤ cle 11254  ℕcn 12243  ℕ₀cn0 12514  ℤcz 12601  ...cfz 13545  ♯chash 14377  Σcsu 15748   ∥ cdvds 16320  Basecbs 17279  0_gc0g 17502  Mndcmnd 18802  Grpcgrp 19010  ._gcmg 19143  odcod 19604

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 2738  ax-rep 5241  ax-sep 5260  ax-nul 5272  ax-pow 5339  ax-pr 5407  ax-un 7738  ax-inf2 9612  ax-cnex 11166  ax-resscn 11167  ax-1cn 11168  ax-icn 11169  ax-addcl 11170  ax-addrcl 11171  ax-mulcl 11172  ax-mulrcl 11173  ax-mulcom 11174  ax-addass 11175  ax-mulass 11176  ax-distr 11177  ax-i2m1 11178  ax-1ne0 11179  ax-1rid 11180  ax-rnegex 11181  ax-rrecex 11182  ax-cnre 11183  ax-pre-lttri 11184  ax-pre-lttrn 11185  ax-pre-ltadd 11186  ax-pre-mulgt0 11187  ax-pre-sup 11188

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 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-nel 3068  df-ral 3083  df-rex 3093  df-rmo 3372  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3928  df-nul 4290  df-if 4491  df-pw 4567  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4876  df-int 4916  df-iun 4961  df-disj 5080  df-br 5113  df-opab 5177  df-mpt 5196  df-tr 5222  df-id 5559  df-eprel 5564  df-po 5572  df-so 5573  df-fr 5617  df-se 5618  df-we 5619  df-xp 5670  df-rel 5671  df-cnv 5672  df-co 5673  df-dm 5674  df-rn 5675  df-res 5676  df-ima 5677  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-isom 6549  df-riota 7373  df-ov 7419  df-oprab 7420  df-mpo 7421  df-om 7865  df-1st 7988  df-2nd 7989  df-frecs 8280  df-wrecs 8311  df-recs 8360  df-rdg 8399  df-1o 8455  df-oadd 8459  df-omul 8460  df-er 8696  df-map 8828  df-en 8946  df-dom 8947  df-sdom 8948  df-fin 8949  df-sup 9404  df-inf 9405  df-oi 9474  df-card 9936  df-acn 9939  df-pnf 11255  df-mnf 11256  df-xr 11257  df-ltxr 11258  df-le 11259  df-sub 11453  df-neg 11454  df-div 11882  df-nn 12244  df-2 12313  df-3 12314  df-n0 12515  df-z 12602  df-uz 12873  df-rp 13027  df-fz 13546  df-fzo 13694  df-fl 13836  df-mod 13914  df-seq 14049  df-exp 14109  df-hash 14378  df-cj 15161  df-re 15162  df-im 15163  df-sqrt 15297  df-abs 15298  df-clim 15550  df-sum 15749  df-dvds 16321  df-0g 17504  df-mgm 18708  df-sgrp 18787  df-mnd 18803  df-grp 19013  df-minusg 19014  df-sbg 19015  df-mulg 19144  df-od 19608

This theorem is used by:  unitscyglem2  42995  unitscyglem4  42997