Theorem ghmmhm

Description: A group homomorphism is a monoid homomorphism. (Contributed by Stefan O'Rear, 7-Mar-2015)

	Ref	Expression
Assertion	ghmmhm	$$⊢F\in \left(S\mathrm{GrpHom}T\right)\to F\in \left(S\mathrm{MndHom}T\right)$$

Proof

Step	Hyp	Ref	Expression
1		ghmgrp1	$$⊢F\in \left(S\mathrm{GrpHom}T\right)\to S\in \mathrm{Grp}$$
2	1	grpmndd	$$⊢F\in \left(S\mathrm{GrpHom}T\right)\to S\in \mathrm{Mnd}$$
3		ghmgrp2	$$⊢F\in \left(S\mathrm{GrpHom}T\right)\to T\in \mathrm{Grp}$$
4	3	grpmndd	$$⊢F\in \left(S\mathrm{GrpHom}T\right)\to T\in \mathrm{Mnd}$$
5		eqid	$$⊢{\mathrm{Base}}_S={\mathrm{Base}}_S$$
6		eqid	$$⊢{\mathrm{Base}}_T={\mathrm{Base}}_T$$
7	5 6	ghmf	$$⊢F\in \left(S\mathrm{GrpHom}T\right)\to F:{\mathrm{Base}}_S⟶{\mathrm{Base}}_T$$
8		eqid	$$⊢{+}_S={+}_S$$
9		eqid	$$⊢{+}_T={+}_T$$
10	5 8 9	ghmlin	$$⊢\left(F\in \left(S\mathrm{GrpHom}T\right)\wedge x\in {\mathrm{Base}}_S\wedge y\in {\mathrm{Base}}_S\right)\to F\left(x{+}_{S}y\right)=F\left(x\right){+}_{T}F\left(y\right)$$
11	10	3expb	$$⊢\left(F\in \left(S\mathrm{GrpHom}T\right)\wedge \left(x\in {\mathrm{Base}}_S\wedge y\in {\mathrm{Base}}_S\right)\right)\to F\left(x{+}_{S}y\right)=F\left(x\right){+}_{T}F\left(y\right)$$
12	11	ralrimivva	$$⊢F\in \left(S\mathrm{GrpHom}T\right)\to \forall x\in {\mathrm{Base}}_S\forall y\in {\mathrm{Base}}_{S}F\left(x{+}_{S}y\right)=F\left(x\right){+}_{T}F\left(y\right)$$
13		eqid	$$⊢0_S=0_S$$
14		eqid	$$⊢0_T=0_T$$
15	13 14	ghmid	$$⊢F\in \left(S\mathrm{GrpHom}T\right)\to F\left(0_S\right)=0_T$$
16	7 12 15	3jca	$$⊢F\in \left(S\mathrm{GrpHom}T\right)\to \left(F:{\mathrm{Base}}_S⟶{\mathrm{Base}}_T\wedge \forall x\in {\mathrm{Base}}_S\forall y\in {\mathrm{Base}}_{S}F\left(x{+}_{S}y\right)=F\left(x\right){+}_{T}F\left(y\right)\wedge F\left(0_S\right)=0_T\right)$$
17	5 6 8 9 13 14	ismhm	$$⊢F\in \left(S\mathrm{MndHom}T\right)\leftrightarrow \left(\left(S\in \mathrm{Mnd}\wedge T\in \mathrm{Mnd}\right)\wedge \left(F:{\mathrm{Base}}_S⟶{\mathrm{Base}}_T\wedge \forall x\in {\mathrm{Base}}_S\forall y\in {\mathrm{Base}}_{S}F\left(x{+}_{S}y\right)=F\left(x\right){+}_{T}F\left(y\right)\wedge F\left(0_S\right)=0_T\right)\right)$$
18	2 4 16 17	syl21anbrc	$$⊢F\in \left(S\mathrm{GrpHom}T\right)\to F\in \left(S\mathrm{MndHom}T\right)$$