mhmmnd - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > mhmmnd		Structured version Visualization version GIF version

Theorem mhmmnd 17360

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 795	. . . . . . . 8 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝐹‘𝑖) = 𝑎)
2		simpr 476	. . . . . . . 8 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝐹‘𝑗) = 𝑏)
3	1, 2	oveq12d 6567	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) = (𝑎 ⨣ 𝑏))
4		simp-5l 804	. . . . . . . . . 10 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → 𝜑)
5		ghmgrp.f	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
6	4, 5	syl3an1 1351	. . . . . . . . 9 ⊢ (((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
7		simp-4r 803	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → 𝑖 ∈ 𝑋)
8		simplr 788	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → 𝑗 ∈ 𝑋)
9	6, 7, 8	mhmlem 17358	. . . . . . . 8 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝐹‘(𝑖 + 𝑗)) = ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)))
10		ghmgrp.1	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹:𝑋–onto→𝑌)
11		fof 6028	. . . . . . . . . . 11 ⊢ (𝐹:𝑋–onto→𝑌 → 𝐹:𝑋⟶𝑌)
12	10, 11	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹:𝑋⟶𝑌)
13	12	ad5antr 766	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → 𝐹:𝑋⟶𝑌)
14		mhmmnd.3	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺 ∈ Mnd)
15	14	ad5antr 766	. . . . . . . . . 10 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → 𝐺 ∈ Mnd)
16		ghmgrp.x	. . . . . . . . . . 11 ⊢ 𝑋 = (Base‘𝐺)
17		ghmgrp.p	. . . . . . . . . . 11 ⊢ + = (+_g‘𝐺)
18	16, 17	mndcl 17124	. . . . . . . . . 10 ⊢ ((𝐺 ∈ Mnd ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) → (𝑖 + 𝑗) ∈ 𝑋)
19	15, 7, 8, 18	syl3anc 1318	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝑖 + 𝑗) ∈ 𝑋)
20	13, 19	ffvelrnd 6268	. . . . . . . 8 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝐹‘(𝑖 + 𝑗)) ∈ 𝑌)
21	9, 20	eqeltrrd 2689	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) ∈ 𝑌)
22	3, 21	eqeltrrd 2689	. . . . . 6 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → (𝑎 ⨣ 𝑏) ∈ 𝑌)
23		simpr 476	. . . . . . . 8 ⊢ ((𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌) → 𝑏 ∈ 𝑌)
24		foelrni 6154	. . . . . . . 8 ⊢ ((𝐹:𝑋–onto→𝑌 ∧ 𝑏 ∈ 𝑌) → ∃𝑗 ∈ 𝑋 (𝐹‘𝑗) = 𝑏)
25	10, 23, 24	syl2an 493	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) → ∃𝑗 ∈ 𝑋 (𝐹‘𝑗) = 𝑏)
26	25	ad2antrr 758	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ∃𝑗 ∈ 𝑋 (𝐹‘𝑗) = 𝑏)
27	22, 26	r19.29a 3060	. . . . 5 ⊢ ((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝑎 ⨣ 𝑏) ∈ 𝑌)
28		simpl 472	. . . . . 6 ⊢ ((𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌) → 𝑎 ∈ 𝑌)
29		foelrni 6154	. . . . . 6 ⊢ ((𝐹:𝑋–onto→𝑌 ∧ 𝑎 ∈ 𝑌) → ∃𝑖 ∈ 𝑋 (𝐹‘𝑖) = 𝑎)
30	10, 28, 29	syl2an 493	. . . . 5 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) → ∃𝑖 ∈ 𝑋 (𝐹‘𝑖) = 𝑎)
31	27, 30	r19.29a 3060	. . . 4 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) → (𝑎 ⨣ 𝑏) ∈ 𝑌)
32		simpll 786	. . . . . 6 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑐 ∈ 𝑌) → 𝜑)
33		simplrl 796	. . . . . 6 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑐 ∈ 𝑌) → 𝑎 ∈ 𝑌)
34		simplrr 797	. . . . . 6 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑐 ∈ 𝑌) → 𝑏 ∈ 𝑌)
35		simpr 476	. . . . . 6 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑐 ∈ 𝑌) → 𝑐 ∈ 𝑌)
36	14	ad2antrr 758	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) → 𝐺 ∈ Mnd)
37	36	ad5antr 766	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → 𝐺 ∈ Mnd)
38		simp-6r 807	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → 𝑖 ∈ 𝑋)
39		simp-4r 803	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → 𝑗 ∈ 𝑋)
40		simplr 788	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → 𝑘 ∈ 𝑋)
41	16, 17	mndass 17125	. . . . . . . . . . . . . 14 ⊢ ((𝐺 ∈ Mnd ∧ (𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋 ∧ 𝑘 ∈ 𝑋)) → ((𝑖 + 𝑗) + 𝑘) = (𝑖 + (𝑗 + 𝑘)))
42	37, 38, 39, 40, 41	syl13anc 1320	. . . . . . . . . . . . 13 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝑖 + 𝑗) + 𝑘) = (𝑖 + (𝑗 + 𝑘)))
43	42	fveq2d 6107	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘((𝑖 + 𝑗) + 𝑘)) = (𝐹‘(𝑖 + (𝑗 + 𝑘))))
44		simp-7l 808	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → 𝜑)
45	44, 5	syl3an1 1351	. . . . . . . . . . . . 13 ⊢ (((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
46	37, 38, 39, 18	syl3anc 1318	. . . . . . . . . . . . 13 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝑖 + 𝑗) ∈ 𝑋)
47	45, 46, 40	mhmlem 17358	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘((𝑖 + 𝑗) + 𝑘)) = ((𝐹‘(𝑖 + 𝑗)) ⨣ (𝐹‘𝑘)))
48	16, 17	mndcl 17124	. . . . . . . . . . . . . 14 ⊢ ((𝐺 ∈ Mnd ∧ 𝑗 ∈ 𝑋 ∧ 𝑘 ∈ 𝑋) → (𝑗 + 𝑘) ∈ 𝑋)
49	37, 39, 40, 48	syl3anc 1318	. . . . . . . . . . . . 13 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝑗 + 𝑘) ∈ 𝑋)
50	45, 38, 49	mhmlem 17358	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘(𝑖 + (𝑗 + 𝑘))) = ((𝐹‘𝑖) ⨣ (𝐹‘(𝑗 + 𝑘))))
51	43, 47, 50	3eqtr3d 2652	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘(𝑖 + 𝑗)) ⨣ (𝐹‘𝑘)) = ((𝐹‘𝑖) ⨣ (𝐹‘(𝑗 + 𝑘))))
52		simp1 1054	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) → 𝜑)
53	52, 5	syl3an1 1351	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
54		simp2 1055	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) → 𝑖 ∈ 𝑋)
55		simp3 1056	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) → 𝑗 ∈ 𝑋)
56	53, 54, 55	mhmlem 17358	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝑋 ∧ 𝑗 ∈ 𝑋) → (𝐹‘(𝑖 + 𝑗)) = ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)))
57	44, 38, 39, 56	syl3anc 1318	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘(𝑖 + 𝑗)) = ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)))
58	57	oveq1d 6564	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘(𝑖 + 𝑗)) ⨣ (𝐹‘𝑘)) = (((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) ⨣ (𝐹‘𝑘)))
59	45, 39, 40	mhmlem 17358	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘(𝑗 + 𝑘)) = ((𝐹‘𝑗) ⨣ (𝐹‘𝑘)))
60	59	oveq2d 6565	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘𝑖) ⨣ (𝐹‘(𝑗 + 𝑘))) = ((𝐹‘𝑖) ⨣ ((𝐹‘𝑗) ⨣ (𝐹‘𝑘))))
61	51, 58, 60	3eqtr3d 2652	. . . . . . . . . 10 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) ⨣ (𝐹‘𝑘)) = ((𝐹‘𝑖) ⨣ ((𝐹‘𝑗) ⨣ (𝐹‘𝑘))))
62		simp-5r 805	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘𝑖) = 𝑎)
63		simpllr 795	. . . . . . . . . . . 12 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘𝑗) = 𝑏)
64	62, 63	oveq12d 6567	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) = (𝑎 ⨣ 𝑏))
65		simpr 476	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (𝐹‘𝑘) = 𝑐)
66	64, 65	oveq12d 6567	. . . . . . . . . 10 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → (((𝐹‘𝑖) ⨣ (𝐹‘𝑗)) ⨣ (𝐹‘𝑘)) = ((𝑎 ⨣ 𝑏) ⨣ 𝑐))
67	63, 65	oveq12d 6567	. . . . . . . . . . 11 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘𝑗) ⨣ (𝐹‘𝑘)) = (𝑏 ⨣ 𝑐))
68	62, 67	oveq12d 6567	. . . . . . . . . 10 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝐹‘𝑖) ⨣ ((𝐹‘𝑗) ⨣ (𝐹‘𝑘))) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
69	61, 66, 68	3eqtr3d 2652	. . . . . . . . 9 ⊢ ((((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) ∧ 𝑘 ∈ 𝑋) ∧ (𝐹‘𝑘) = 𝑐) → ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
70		foelrni 6154	. . . . . . . . . . . 12 ⊢ ((𝐹:𝑋–onto→𝑌 ∧ 𝑐 ∈ 𝑌) → ∃𝑘 ∈ 𝑋 (𝐹‘𝑘) = 𝑐)
71	10, 70	sylan 487	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝑌) → ∃𝑘 ∈ 𝑋 (𝐹‘𝑘) = 𝑐)
72	71	3ad2antr3 1221	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) → ∃𝑘 ∈ 𝑋 (𝐹‘𝑘) = 𝑐)
73	72	ad4antr 764	. . . . . . . . 9 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → ∃𝑘 ∈ 𝑋 (𝐹‘𝑘) = 𝑐)
74	69, 73	r19.29a 3060	. . . . . . . 8 ⊢ ((((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑗 ∈ 𝑋) ∧ (𝐹‘𝑗) = 𝑏) → ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
75	25	3adantr3 1215	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) → ∃𝑗 ∈ 𝑋 (𝐹‘𝑗) = 𝑏)
76	75	ad2antrr 758	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ∃𝑗 ∈ 𝑋 (𝐹‘𝑗) = 𝑏)
77	74, 76	r19.29a 3060	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
78	30	3adantr3 1215	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) → ∃𝑖 ∈ 𝑋 (𝐹‘𝑖) = 𝑎)
79	77, 78	r19.29a 3060	. . . . . 6 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌 ∧ 𝑐 ∈ 𝑌)) → ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
80	32, 33, 34, 35, 79	syl13anc 1320	. . . . 5 ⊢ (((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) ∧ 𝑐 ∈ 𝑌) → ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
81	80	ralrimiva 2949	. . . 4 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) → ∀𝑐 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐)))
82	31, 81	jca 553	. . 3 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝑌 ∧ 𝑏 ∈ 𝑌)) → ((𝑎 ⨣ 𝑏) ∈ 𝑌 ∧ ∀𝑐 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐))))
83	82	ralrimivva 2954	. 2 ⊢ (𝜑 → ∀𝑎 ∈ 𝑌 ∀𝑏 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ∈ 𝑌 ∧ ∀𝑐 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐))))
84		eqid 2610	. . . . . 6 ⊢ (0_g‘𝐺) = (0_g‘𝐺)
85	16, 84	mndidcl 17131	. . . . 5 ⊢ (𝐺 ∈ Mnd → (0_g‘𝐺) ∈ 𝑋)
86	14, 85	syl 17	. . . 4 ⊢ (𝜑 → (0_g‘𝐺) ∈ 𝑋)
87	12, 86	ffvelrnd 6268	. . 3 ⊢ (𝜑 → (𝐹‘(0_g‘𝐺)) ∈ 𝑌)
88		simplll 794	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → 𝜑)
89	88, 5	syl3an1 1351	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) ∧ 𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) → (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
90	14	ad3antrrr 762	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → 𝐺 ∈ Mnd)
91	90, 85	syl 17	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (0_g‘𝐺) ∈ 𝑋)
92		simplr 788	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → 𝑖 ∈ 𝑋)
93	89, 91, 92	mhmlem 17358	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝐹‘((0_g‘𝐺) + 𝑖)) = ((𝐹‘(0_g‘𝐺)) ⨣ (𝐹‘𝑖)))
94	16, 17, 84	mndlid 17134	. . . . . . . . . 10 ⊢ ((𝐺 ∈ Mnd ∧ 𝑖 ∈ 𝑋) → ((0_g‘𝐺) + 𝑖) = 𝑖)
95	90, 92, 94	syl2anc 691	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((0_g‘𝐺) + 𝑖) = 𝑖)
96	95	fveq2d 6107	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝐹‘((0_g‘𝐺) + 𝑖)) = (𝐹‘𝑖))
97	93, 96	eqtr3d 2646	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝐹‘(0_g‘𝐺)) ⨣ (𝐹‘𝑖)) = (𝐹‘𝑖))
98		simpr 476	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝐹‘𝑖) = 𝑎)
99	98	oveq2d 6565	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝐹‘(0_g‘𝐺)) ⨣ (𝐹‘𝑖)) = ((𝐹‘(0_g‘𝐺)) ⨣ 𝑎))
100	97, 99, 98	3eqtr3d 2652	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝐹‘(0_g‘𝐺)) ⨣ 𝑎) = 𝑎)
101	89, 92, 91	mhmlem 17358	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝐹‘(𝑖 + (0_g‘𝐺))) = ((𝐹‘𝑖) ⨣ (𝐹‘(0_g‘𝐺))))
102	16, 17, 84	mndrid 17135	. . . . . . . . . 10 ⊢ ((𝐺 ∈ Mnd ∧ 𝑖 ∈ 𝑋) → (𝑖 + (0_g‘𝐺)) = 𝑖)
103	90, 92, 102	syl2anc 691	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝑖 + (0_g‘𝐺)) = 𝑖)
104	103	fveq2d 6107	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝐹‘(𝑖 + (0_g‘𝐺))) = (𝐹‘𝑖))
105	101, 104	eqtr3d 2646	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝐹‘𝑖) ⨣ (𝐹‘(0_g‘𝐺))) = (𝐹‘𝑖))
106	98	oveq1d 6564	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → ((𝐹‘𝑖) ⨣ (𝐹‘(0_g‘𝐺))) = (𝑎 ⨣ (𝐹‘(0_g‘𝐺))))
107	105, 106, 98	3eqtr3d 2652	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (𝑎 ⨣ (𝐹‘(0_g‘𝐺))) = 𝑎)
108	100, 107	jca 553	. . . . 5 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝑌) ∧ 𝑖 ∈ 𝑋) ∧ (𝐹‘𝑖) = 𝑎) → (((𝐹‘(0_g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0_g‘𝐺))) = 𝑎))
109	10, 29	sylan 487	. . . . 5 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑌) → ∃𝑖 ∈ 𝑋 (𝐹‘𝑖) = 𝑎)
110	108, 109	r19.29a 3060	. . . 4 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝑌) → (((𝐹‘(0_g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0_g‘𝐺))) = 𝑎))
111	110	ralrimiva 2949	. . 3 ⊢ (𝜑 → ∀𝑎 ∈ 𝑌 (((𝐹‘(0_g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0_g‘𝐺))) = 𝑎))
112		oveq1 6556	. . . . . . 7 ⊢ (𝑑 = (𝐹‘(0_g‘𝐺)) → (𝑑 ⨣ 𝑎) = ((𝐹‘(0_g‘𝐺)) ⨣ 𝑎))
113	112	eqeq1d 2612	. . . . . 6 ⊢ (𝑑 = (𝐹‘(0_g‘𝐺)) → ((𝑑 ⨣ 𝑎) = 𝑎 ↔ ((𝐹‘(0_g‘𝐺)) ⨣ 𝑎) = 𝑎))
114		oveq2 6557	. . . . . . 7 ⊢ (𝑑 = (𝐹‘(0_g‘𝐺)) → (𝑎 ⨣ 𝑑) = (𝑎 ⨣ (𝐹‘(0_g‘𝐺))))
115	114	eqeq1d 2612	. . . . . 6 ⊢ (𝑑 = (𝐹‘(0_g‘𝐺)) → ((𝑎 ⨣ 𝑑) = 𝑎 ↔ (𝑎 ⨣ (𝐹‘(0_g‘𝐺))) = 𝑎))
116	113, 115	anbi12d 743	. . . . 5 ⊢ (𝑑 = (𝐹‘(0_g‘𝐺)) → (((𝑑 ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ 𝑑) = 𝑎) ↔ (((𝐹‘(0_g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0_g‘𝐺))) = 𝑎)))
117	116	ralbidv 2969	. . . 4 ⊢ (𝑑 = (𝐹‘(0_g‘𝐺)) → (∀𝑎 ∈ 𝑌 ((𝑑 ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ 𝑑) = 𝑎) ↔ ∀𝑎 ∈ 𝑌 (((𝐹‘(0_g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0_g‘𝐺))) = 𝑎)))
118	117	rspcev 3282	. . 3 ⊢ (((𝐹‘(0_g‘𝐺)) ∈ 𝑌 ∧ ∀𝑎 ∈ 𝑌 (((𝐹‘(0_g‘𝐺)) ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ (𝐹‘(0_g‘𝐺))) = 𝑎)) → ∃𝑑 ∈ 𝑌 ∀𝑎 ∈ 𝑌 ((𝑑 ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ 𝑑) = 𝑎))
119	87, 111, 118	syl2anc 691	. 2 ⊢ (𝜑 → ∃𝑑 ∈ 𝑌 ∀𝑎 ∈ 𝑌 ((𝑑 ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ 𝑑) = 𝑎))
120		ghmgrp.y	. . 3 ⊢ 𝑌 = (Base‘𝐻)
121		ghmgrp.q	. . 3 ⊢ ⨣ = (+_g‘𝐻)
122	120, 121	ismnd 17120	. 2 ⊢ (𝐻 ∈ Mnd ↔ (∀𝑎 ∈ 𝑌 ∀𝑏 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ∈ 𝑌 ∧ ∀𝑐 ∈ 𝑌 ((𝑎 ⨣ 𝑏) ⨣ 𝑐) = (𝑎 ⨣ (𝑏 ⨣ 𝑐))) ∧ ∃𝑑 ∈ 𝑌 ∀𝑎 ∈ 𝑌 ((𝑑 ⨣ 𝑎) = 𝑎 ∧ (𝑎 ⨣ 𝑑) = 𝑎)))
123	83, 119, 122	sylanbrc 695	1 ⊢ (𝜑 → 𝐻 ∈ Mnd)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 383 ∧ w3a 1031 = wceq 1475 ∈ wcel 1977 ∀wral 2896 ∃wrex 2897 ⟶wf 5800 –onto→wfo 5802 ‘cfv 5804 (class class class)co 6549 Basecbs 15695 +_gcplusg 15768 0_gc0g 15923 Mndcmnd 17117

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1713 ax-4 1728 ax-5 1827 ax-6 1875 ax-7 1922 ax-8 1979 ax-9 1986 ax-10 2006 ax-11 2021 ax-12 2034 ax-13 2234 ax-ext 2590 ax-sep 4709 ax-nul 4717 ax-pow 4769 ax-pr 4833

This theorem depends on definitions: df-bi 196 df-or 384 df-an 385 df-3an 1033 df-tru 1478 df-ex 1696 df-nf 1701 df-sb 1868 df-eu 2462 df-mo 2463 df-clab 2597 df-cleq 2603 df-clel 2606 df-nfc 2740 df-ne 2782 df-ral 2901 df-rex 2902 df-reu 2903 df-rmo 2904 df-rab 2905 df-v 3175 df-sbc 3403 df-dif 3543 df-un 3545 df-in 3547 df-ss 3554 df-nul 3875 df-if 4037 df-sn 4126 df-pr 4128 df-op 4132 df-uni 4373 df-br 4584 df-opab 4644 df-mpt 4645 df-id 4953 df-xp 5044 df-rel 5045 df-cnv 5046 df-co 5047 df-dm 5048 df-rn 5049 df-iota 5768 df-fun 5806 df-fn 5807 df-f 5808 df-fo 5810 df-fv 5812 df-riota 6511 df-ov 6552 df-0g 15925 df-mgm 17065 df-sgrp 17107 df-mnd 17118

This theorem is referenced by: mhmfmhm 17361 ghmgrp 17362 ghmcmn 18060

W3C validator