Theorem mhmmnd 17537

Description: The image of a monoid 𝐺 under a monoid homomorphism 𝐹 is a monoid. (Contributed by Thierry Arnoux, 25-Jan-2020.)

Hypotheses

Ref	Expression
ghmgrp.f	⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
ghmgrp.x	⊢ 𝑋 = (Base‘𝐺)
ghmgrp.y	⊢ 𝑌 = (Base‘𝐻)
ghmgrp.p	⊢ + = (+g‘𝐺)
ghmgrp.q	⊢ ⨣ = (+g‘𝐻)
ghmgrp.1	⊢ (𝜑 → 𝐹:𝑋–onto→𝑌)
mhmmnd.3	⊢ (𝜑 → 𝐺 ∈ Mnd)

Assertion

Ref	Expression
mhmmnd	⊢ (𝜑 → 𝐻 ∈ Mnd)

Distinct variable groups:   𝑥,𝐹,𝑦   𝑥,𝐺,𝑦   𝑥, + ,𝑦   𝑥,𝐻,𝑦   𝑥,𝑋,𝑦   𝑥,𝑌,𝑦   𝑥, ⨣ ,𝑦   𝜑,𝑥,𝑦

Proof of Theorem mhmmnd

Dummy variables 𝑎 𝑑 𝑖 𝑗 𝑘 𝑏 𝑐 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpllr 799	. . . . . . . 8 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝐹‘𝑖) = 𝑎)
2		simpr 477	. . . . . . . 8 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝐹‘𝑗) = 𝑏)
3	1, 2	oveq12d 6668	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) = (𝑎 ⨣ 𝑏))
4		simp-5l 808	. . . . . . . . . 10 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → 𝜑)
5		ghmgrp.f	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
6	4, 5	syl3an1 1359	. . . . . . . . 9 ⊢ (((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
7		simp-4r 807	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → 𝑖 ∈ 𝑋)
8		simplr 792	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → 𝑗 ∈ 𝑋)
9	6, 7, 8	mhmlem 17535	. . . . . . . 8 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝐹‘(𝑖 + 𝑗)) = ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)))
10		ghmgrp.1	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹:𝑋–onto→𝑌)
11		fof 6115	. . . . . . . . . . 11 ⊢ (𝐹:𝑋–onto→𝑌 → 𝐹:𝑋⟶𝑌)
12	10, 11	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹:𝑋⟶𝑌)
13	12	ad5antr 770	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → 𝐹:𝑋⟶𝑌)
14		mhmmnd.3	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺 ∈ Mnd)
15	14	ad5antr 770	. . . . . . . . . 10 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → 𝐺 ∈ Mnd)
16		ghmgrp.x	. . . . . . . . . . 11 ⊢ 𝑋 = (Base‘𝐺)
17		ghmgrp.p	. . . . . . . . . . 11 ⊢ + = (+g‘𝐺)
18	16, 17	mndcl 17301	. . . . . . . . . 10 ⊢ ((𝐺 ∈ Mnd ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) → (𝑖 + 𝑗) ∈ 𝑋)
19	15, 7, 8, 18	syl3anc 1326	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝑖 + 𝑗) ∈ 𝑋)
20	13, 19	ffvelrnd 6360	. . . . . . . 8 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝐹‘(𝑖 + 𝑗)) ∈ 𝑌)
21	9, 20	eqeltrrd 2702	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) ∈ 𝑌)
22	3, 21	eqeltrrd 2702	. . . . . 6 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝑎 ⨣ 𝑏) ∈ 𝑌)
23		simpr 477	. . . . . . . 8 ⊢ ((𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌) → 𝑏 ∈ 𝑌)
24		foelrni 6244	. . . . . . . 8 ⊢ ((𝐹:𝑋–onto→𝑌 ∧ 𝑏 ∈ 𝑌) → ∃𝑗 ∈ 𝑋 (𝐹‘𝑗) = 𝑏)
25	10, 23, 24	syl2an 494	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) → ∃𝑗 ∈ 𝑋 (𝐹‘𝑗) = 𝑏)
26	25	ad2antrr 762	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ∃𝑗 ∈ 𝑋 (𝐹‘𝑗) = 𝑏)
27	22, 26	r19.29a 3078	. . . . 5 ⊢ ((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝑎 ⨣ 𝑏) ∈ 𝑌)
28		simpl 473	. . . . . 6 ⊢ ((𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌) → 𝑎 ∈ 𝑌)
29		foelrni 6244	. . . . . 6 ⊢ ((𝐹:𝑋–onto→𝑌 ∧ 𝑎 ∈ 𝑌) → ∃𝑖 ∈ 𝑋 (𝐹‘𝑖) = 𝑎)
30	10, 28, 29	syl2an 494	. . . . 5 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) → ∃𝑖 ∈ 𝑋 (𝐹‘𝑖) = 𝑎)
31	27, 30	r19.29a 3078	. . . 4 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) → (𝑎 ⨣ 𝑏) ∈ 𝑌)
32		simpll 790	. . . . . 6 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑐 ∈ 𝑌) → 𝜑)
33		simplrl 800	. . . . . 6 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑐 ∈ 𝑌) → 𝑎 ∈ 𝑌)
34		simplrr 801	. . . . . 6 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑐 ∈ 𝑌) → 𝑏 ∈ 𝑌)
35		simpr 477	. . . . . 6 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑐 ∈ 𝑌) → 𝑐 ∈ 𝑌)
36	14	ad2antrr 762	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) → 𝐺 ∈ Mnd)
37	36	ad5antr 770	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → 𝐺 ∈ Mnd)
38		simp-6r 811	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → 𝑖 ∈ 𝑋)
39		simp-4r 807	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → 𝑗 ∈ 𝑋)
40		simplr 792	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → 𝑘 ∈ 𝑋)
41	16, 17	mndass 17302	. . . . . . . . . . . . . 14 ⊢ ((𝐺 ∈ Mnd ∧ (𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋 ∧ 𝑘 ∈ 𝑋)) → ((𝑖 + 𝑗) + 𝑘) = (𝑖 + (𝑗 + 𝑘)))
42	37, 38, 39, 40, 41	syl13anc 1328	. . . . . . . . . . . . 13 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝑖 + 𝑗) + 𝑘) = (𝑖 + (𝑗 + 𝑘)))
43	42	fveq2d 6195	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘((𝑖 + 𝑗) + 𝑘)) = (𝐹‘(𝑖 + (𝑗 + 𝑘))))
44		simp-7l 812	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → 𝜑)
45	44, 5	syl3an1 1359	. . . . . . . . . . . . 13 ⊢ (((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
46	37, 38, 39, 18	syl3anc 1326	. . . . . . . . . . . . 13 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝑖 + 𝑗) ∈ 𝑋)
47	45, 46, 40	mhmlem 17535	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘((𝑖 + 𝑗) + 𝑘)) = ((𝐹‘(𝑖 + 𝑗)) ⨣ (𝐹‘𝑘)))
48	16, 17	mndcl 17301	. . . . . . . . . . . . . 14 ⊢ ((𝐺 ∈ Mnd ∧ 𝑗 ∈ 𝑋 ∧ 𝑘 ∈ 𝑋) → (𝑗 + 𝑘) ∈ 𝑋)
49	37, 39, 40, 48	syl3anc 1326	. . . . . . . . . . . . 13 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝑗 + 𝑘) ∈ 𝑋)
50	45, 38, 49	mhmlem 17535	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘(𝑖 + (𝑗 + 𝑘))) = ((𝐹‘𝑖) ⨣ (𝐹‘(𝑗 + 𝑘))))
51	43, 47, 50	3eqtr3d 2664	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘(𝑖 + 𝑗)) ⨣ (𝐹‘𝑘)) = ((𝐹‘𝑖) ⨣ (𝐹‘(𝑗 + 𝑘))))
52		simp1 1061	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) → 𝜑)
53	52, 5	syl3an1 1359	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
54		simp2 1062	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) → 𝑖 ∈ 𝑋)
55		simp3 1063	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) → 𝑗 ∈ 𝑋)
56	53, 54, 55	mhmlem 17535	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) → (𝐹‘(𝑖 + 𝑗)) = ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)))
57	44, 38, 39, 56	syl3anc 1326	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘(𝑖 + 𝑗)) = ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)))
58	57	oveq1d 6665	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘(𝑖 + 𝑗)) ⨣ (𝐹‘𝑘)) = (((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) ⨣ (𝐹‘𝑘)))
59	45, 39, 40	mhmlem 17535	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘(𝑗 + 𝑘)) = ((𝐹‘𝑗) ⨣ (𝐹‘𝑘)))
60	59	oveq2d 6666	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘𝑖) ⨣ (𝐹‘(𝑗 + 𝑘))) = ((𝐹‘𝑖) ⨣ ((𝐹‘𝑗) ⨣ (𝐹‘𝑘))))
61	51, 58, 60	3eqtr3d 2664	. . . . . . . . . 10 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) ⨣ (𝐹‘𝑘)) = ((𝐹‘𝑖) ⨣ ((𝐹‘𝑗) ⨣ (𝐹‘𝑘))))
62		simp-5r 809	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘𝑖) = 𝑎)
63		simpllr 799	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘𝑗) = 𝑏)
64	62, 63	oveq12d 6668	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) = (𝑎 ⨣ 𝑏))
65		simpr 477	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘𝑘) = 𝑐)
66	64, 65	oveq12d 6668	. . . . . . . . . 10 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) ⨣ (𝐹‘𝑘)) = ((𝑎 ⨣ 𝑏) ⨣ 𝑐))
67	63, 65	oveq12d 6668	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘𝑗) ⨣ (𝐹‘𝑘)) = (𝑏 ⨣ 𝑐))
68	62, 67	oveq12d 6668	. . . . . . . . . 10 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘𝑖) ⨣ ((𝐹‘𝑗) ⨣ (𝐹‘𝑘))) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
69	61, 66, 68	3eqtr3d 2664	. . . . . . . . 9 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
70		foelrni 6244	. . . . . . . . . . . 12 ⊢ ((𝐹:𝑋–onto→𝑌 ∧ 𝑐 ∈ 𝑌) → ∃𝑘 ∈ 𝑋 (𝐹‘𝑘) = 𝑐)
71	10, 70	sylan 488	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝑌) → ∃𝑘 ∈ 𝑋 (𝐹‘𝑘) = 𝑐)
72	71	3ad2antr3 1228	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) → ∃𝑘 ∈ 𝑋 (𝐹‘𝑘) = 𝑐)
73	72	ad4antr 768	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → ∃𝑘 ∈ 𝑋 (𝐹‘𝑘) = 𝑐)
74	69, 73	r19.29a 3078	. . . . . . . 8 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
75	25	3adantr3 1222	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) → ∃𝑗 ∈ 𝑋 (𝐹‘𝑗) = 𝑏)
76	75	ad2antrr 762	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ∃𝑗 ∈ 𝑋 (𝐹‘𝑗) = 𝑏)
77	74, 76	r19.29a 3078	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
78	30	3adantr3 1222	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) → ∃𝑖 ∈ 𝑋 (𝐹‘𝑖) = 𝑎)
79	77, 78	r19.29a 3078	. . . . . 6 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) → ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
80	32, 33, 34, 35, 79	syl13anc 1328	. . . . 5 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑐 ∈ 𝑌) → ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
81	80	ralrimiva 2966	. . . 4 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) → ∀𝑐 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
82	31, 81	jca 554	. . 3 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) → ((𝑎 ⨣ 𝑏) ∈ 𝑌 ∧ ∀𝑐 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐))))
83	82	ralrimivva 2971	. 2 ⊢ (𝜑 → ∀𝑎 ∈ 𝑌 ∀𝑏 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ∈ 𝑌 ∧ ∀𝑐 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐))))
84		eqid 2622	. . . . . 6 ⊢ (0g‘𝐺) = (0g‘𝐺)
85	16, 84	mndidcl 17308	. . . . 5 ⊢ (𝐺 ∈ Mnd → (0g‘𝐺) ∈ 𝑋)
86	14, 85	syl 17	. . . 4 ⊢ (𝜑 → (0g‘𝐺) ∈ 𝑋)
87	12, 86	ffvelrnd 6360	. . 3 ⊢ (𝜑 → (𝐹‘(0g‘𝐺)) ∈ 𝑌)
88		simplll 798	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → 𝜑)
89	88, 5	syl3an1 1359	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
90	14	ad3antrrr 766	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → 𝐺 ∈ Mnd)
91	90, 85	syl 17	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (0g‘𝐺) ∈ 𝑋)
92		simplr 792	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → 𝑖 ∈ 𝑋)
93	89, 91, 92	mhmlem 17535	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝐹‘((0g‘𝐺) + 𝑖)) = ((𝐹‘(0g‘𝐺)) ⨣ (𝐹‘𝑖)))
94	16, 17, 84	mndlid 17311	. . . . . . . . . 10 ⊢ ((𝐺 ∈ Mnd ∧ 𝑖 ∈ 𝑋) → ((0g‘𝐺) + 𝑖) = 𝑖)
95	90, 92, 94	syl2anc 693	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((0g‘𝐺) + 𝑖) = 𝑖)
96	95	fveq2d 6195	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝐹‘((0g‘𝐺) + 𝑖)) = (𝐹‘𝑖))
97	93, 96	eqtr3d 2658	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝐹‘(0g‘𝐺)) ⨣ (𝐹‘𝑖)) = (𝐹‘𝑖))
98		simpr 477	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝐹‘𝑖) = 𝑎)
99	98	oveq2d 6666	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝐹‘(0g‘𝐺)) ⨣ (𝐹‘𝑖)) = ((𝐹‘(0g‘𝐺)) ⨣ 𝑎))
100	97, 99, 98	3eqtr3d 2664	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝐹‘(0g‘𝐺)) ⨣ 𝑎) = 𝑎)
101	89, 92, 91	mhmlem 17535	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝐹‘(𝑖 + (0g‘𝐺))) = ((𝐹‘𝑖) ⨣ (𝐹‘(0g‘𝐺))))
102	16, 17, 84	mndrid 17312	. . . . . . . . . 10 ⊢ ((𝐺 ∈ Mnd ∧ 𝑖 ∈ 𝑋) → (𝑖 + (0g‘𝐺)) = 𝑖)
103	90, 92, 102	syl2anc 693	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝑖 + (0g‘𝐺)) = 𝑖)
104	103	fveq2d 6195	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝐹‘(𝑖 + (0g‘𝐺))) = (𝐹‘𝑖))
105	101, 104	eqtr3d 2658	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝐹‘𝑖) ⨣ (𝐹‘(0g‘𝐺))) = (𝐹‘𝑖))
106	98	oveq1d 6665	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝐹‘𝑖) ⨣ (𝐹‘(0g‘𝐺))) = (𝑎 ⨣ (𝐹‘(0g‘𝐺))))
107	105, 106, 98	3eqtr3d 2664	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝑎 ⨣ (𝐹‘(0g‘𝐺))) = 𝑎)
108	100, 107	jca 554	. . . . 5 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (((𝐹‘(0g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0g‘𝐺))) = 𝑎))
109	10, 29	sylan 488	. . . . 5 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑌) → ∃𝑖 ∈ 𝑋 (𝐹‘𝑖) = 𝑎)
110	108, 109	r19.29a 3078	. . . 4 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑌) → (((𝐹‘(0g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0g‘𝐺))) = 𝑎))
111	110	ralrimiva 2966	. . 3 ⊢ (𝜑 → ∀𝑎 ∈ 𝑌 (((𝐹‘(0g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0g‘𝐺))) = 𝑎))
112		oveq1 6657	. . . . . . 7 ⊢ (𝑑 = (𝐹‘(0g‘𝐺)) → (𝑑 ⨣ 𝑎) = ((𝐹‘(0g‘𝐺)) ⨣ 𝑎))
113	112	eqeq1d 2624	. . . . . 6 ⊢ (𝑑 = (𝐹‘(0g‘𝐺)) → ((𝑑 ⨣ 𝑎) = 𝑎 ↔ ((𝐹‘(0g‘𝐺)) ⨣ 𝑎) = 𝑎))
114		oveq2 6658	. . . . . . 7 ⊢ (𝑑 = (𝐹‘(0g‘𝐺)) → (𝑎 ⨣ 𝑑) = (𝑎 ⨣ (𝐹‘(0g‘𝐺))))
115	114	eqeq1d 2624	. . . . . 6 ⊢ (𝑑 = (𝐹‘(0g‘𝐺)) → ((𝑎 ⨣ 𝑑) = 𝑎 ↔ (𝑎 ⨣ (𝐹‘(0g‘𝐺))) = 𝑎))
116	113, 115	anbi12d 747	. . . . 5 ⊢ (𝑑 = (𝐹‘(0g‘𝐺)) → (((𝑑 ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ 𝑑) = 𝑎) ↔ (((𝐹‘(0g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0g‘𝐺))) = 𝑎)))
117	116	ralbidv 2986	. . . 4 ⊢ (𝑑 = (𝐹‘(0g‘𝐺)) → (∀𝑎 ∈ 𝑌 ((𝑑 ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ 𝑑) = 𝑎) ↔ ∀𝑎 ∈ 𝑌 (((𝐹‘(0g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0g‘𝐺))) = 𝑎)))
118	117	rspcev 3309	. . 3 ⊢ (((𝐹‘(0g‘𝐺)) ∈ 𝑌 ∧ ∀𝑎 ∈ 𝑌 (((𝐹‘(0g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0g‘𝐺))) = 𝑎)) → ∃𝑑 ∈ 𝑌 ∀𝑎 ∈ 𝑌 ((𝑑 ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ 𝑑) = 𝑎))
119	87, 111, 118	syl2anc 693	. 2 ⊢ (𝜑 → ∃𝑑 ∈ 𝑌 ∀𝑎 ∈ 𝑌 ((𝑑 ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ 𝑑) = 𝑎))
120		ghmgrp.y	. . 3 ⊢ 𝑌 = (Base‘𝐻)
121		ghmgrp.q	. . 3 ⊢ ⨣ = (+g‘𝐻)
122	120, 121	ismnd 17297	. 2 ⊢ (𝐻 ∈ Mnd ↔ (∀𝑎 ∈ 𝑌 ∀𝑏 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ∈ 𝑌 ∧ ∀𝑐 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐))) ∧ ∃𝑑 ∈ 𝑌 ∀𝑎 ∈ 𝑌 ((𝑑 ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ 𝑑) = 𝑎)))
123	83, 119, 122	sylanbrc 698	1 ⊢ (𝜑 → 𝐻 ∈ Mnd)

Syntax hints:   → wi 4   ∧ wa 384   ∧ w3a 1037   = wceq 1483   ∈ wcel 1990  ∀wral 2912  ∃wrex 2913  ⟶wf 5884  –onto→wfo 5886  ‘cfv 5888  (class class class)co 6650  Basecbs 15857  +_gcplusg 15941  0_gc0g 16100  Mndcmnd 17294

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-nul 3916  df-if 4087  df-sn 4178  df-pr 4180  df-op 4184  df-uni 4437  df-br 4654  df-opab 4713  df-mpt 4730  df-id 5024  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-fo 5894  df-fv 5896  df-riota 6611  df-ov 6653  df-0g 16102  df-mgm 17242  df-sgrp 17284  df-mnd 17295

This theorem is referenced by:  mhmfmhm  17538  ghmgrp  17539  ghmcmn  18237