Theorem mhmlin 18803

Description: A monoid homomorphism commutes with composition. (Contributed by Mario Carneiro, 7-Mar-2015.)

Hypotheses

Ref	Expression
mhmlin.b	⊢ 𝐵 = (Base‘𝑆)
mhmlin.p	⊢ + = (+g‘𝑆)
mhmlin.q	⊢ ⨣ = (+g‘𝑇)

Assertion

Ref	Expression
mhmlin	⊢ ((𝐹 ∈ (𝑆 MndHom 𝑇) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝐹‘(𝑋 + 𝑌)) = ((𝐹‘𝑋) ⨣ (𝐹‘𝑌)))

Proof of Theorem mhmlin

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		mhmlin.b	. . . . . 6 ⊢ 𝐵 = (Base‘𝑆)
2		eqid 2756	. . . . . 6 ⊢ (Base‘𝑇) = (Base‘𝑇)
3		mhmlin.p	. . . . . 6 ⊢ + = (+g‘𝑆)
4		mhmlin.q	. . . . . 6 ⊢ ⨣ = (+g‘𝑇)
5		eqid 2756	. . . . . 6 ⊢ (0g‘𝑆) = (0g‘𝑆)
6		eqid 2756	. . . . . 6 ⊢ (0g‘𝑇) = (0g‘𝑇)
7	1, 2, 3, 4, 5, 6	ismhm 18795	. . . . 5 ⊢ (𝐹 ∈ (𝑆 MndHom 𝑇) ↔ ((𝑆 ∈ Mnd ∧ 𝑇 ∈ Mnd) ∧ (𝐹:𝐵⟶(Base‘𝑇) ∧ ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)) ∧ (𝐹‘(0g‘𝑆)) = (0g‘𝑇))))
8	7	simprbi 500	. . . 4 ⊢ (𝐹 ∈ (𝑆 MndHom 𝑇) → (𝐹:𝐵⟶(Base‘𝑇) ∧ ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)) ∧ (𝐹‘(0g‘𝑆)) = (0g‘𝑇)))
9	8	simp2d 1152	. . 3 ⊢ (𝐹 ∈ (𝑆 MndHom 𝑇) → ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)))
10		fvoveq1 7408	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝐹‘(𝑥 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
11		fveq2 6856	. . . . . 6 ⊢ (𝑥 = 𝑋 → (𝐹‘𝑥) = (𝐹‘𝑋))
12	11	oveq1d 7400	. . . . 5 ⊢ (𝑥 = 𝑋 → ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)) = ((𝐹‘𝑋) ⨣ (𝐹‘𝑦)))
13	10, 12	eqeq12d 2772	. . . 4 ⊢ (𝑥 = 𝑋 → ((𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)) ↔ (𝐹‘(𝑋 + 𝑦)) = ((𝐹‘𝑋) ⨣ (𝐹‘𝑦))))
14		oveq2 7393	. . . . . 6 ⊢ (𝑦 = 𝑌 → (𝑋 + 𝑦) = (𝑋 + 𝑌))
15	14	fveq2d 6860	. . . . 5 ⊢ (𝑦 = 𝑌 → (𝐹‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑌)))
16		fveq2 6856	. . . . . 6 ⊢ (𝑦 = 𝑌 → (𝐹‘𝑦) = (𝐹‘𝑌))
17	16	oveq2d 7401	. . . . 5 ⊢ (𝑦 = 𝑌 → ((𝐹‘𝑋) ⨣ (𝐹‘𝑦)) = ((𝐹‘𝑋) ⨣ (𝐹‘𝑌)))
18	15, 17	eqeq12d 2772	. . . 4 ⊢ (𝑦 = 𝑌 → ((𝐹‘(𝑋 + 𝑦)) = ((𝐹‘𝑋) ⨣ (𝐹‘𝑦)) ↔ (𝐹‘(𝑋 + 𝑌)) = ((𝐹‘𝑋) ⨣ (𝐹‘𝑌))))
19	13, 18	rspc2v 3587	. . 3 ⊢ ((𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 (𝐹‘(𝑥 + 𝑦)) = ((𝐹‘𝑥) ⨣ (𝐹‘𝑦)) → (𝐹‘(𝑋 + 𝑌)) = ((𝐹‘𝑋) ⨣ (𝐹‘𝑌))))
20	9, 19	syl5com 31	. 2 ⊢ (𝐹 ∈ (𝑆 MndHom 𝑇) → ((𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝐹‘(𝑋 + 𝑌)) = ((𝐹‘𝑋) ⨣ (𝐹‘𝑌))))
21	20	3impib 1125	1 ⊢ ((𝐹 ∈ (𝑆 MndHom 𝑇) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝐹‘(𝑋 + 𝑌)) = ((𝐹‘𝑋) ⨣ (𝐹‘𝑌)))

Syntax hints:   → wi 4   ∧ wa 398   ∧ w3a 1095   = wceq 1554   ∈ wcel 2136  ∀wral 3070  ⟶wf 6506  ‘cfv 6510  (class class class)co 7385  Basecbs 17221  +_gcplusg 17262  0_gc0g 17444  Mndcmnd 18744   MndHom cmhm 18791

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1809  ax-4 1823  ax-5 1924  ax-6 1981  ax-7 2022  ax-8 2138  ax-9 2146  ax-10 2169  ax-11 2185  ax-12 2206  ax-ext 2728  ax-sep 5240  ax-nul 5250  ax-pow 5316  ax-pr 5384  ax-un 7707

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3an 1097  df-tru 1557  df-fal 1567  df-ex 1794  df-nf 1798  df-sb 2085  df-mo 2560  df-eu 2590  df-clab 2735  df-cleq 2748  df-clel 2831  df-nfc 2905  df-ne 2952  df-ral 3071  df-rex 3081  df-rab 3409  df-v 3450  df-sbc 3740  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4281  df-if 4475  df-pw 4551  df-sn 4577  df-pr 4579  df-op 4583  df-uni 4860  df-br 5095  df-opab 5157  df-id 5535  df-xp 5646  df-rel 5647  df-cnv 5648  df-co 5649  df-dm 5650  df-rn 5651  df-iota 6466  df-fun 6512  df-fn 6513  df-f 6514  df-fv 6518  df-ov 7388  df-oprab 7389  df-mpo 7390  df-map 8798  df-mhm 18793

This theorem is referenced by:  mhmf1o  18806  mhmvlin  18811  resmhm  18830  resmhm2  18831  resmhm2b  18832  mhmco  18833  mhmimalem  18834  mhmeql  18836  pwsco2mhm  18843  gsumwmhm  18855  mhmmulg  19133  ghmmhmb  19243  cntzmhm  19357  gsumzmhm  19953  rhmmul  20507  rhmimasubrnglem  20587  evlslem1  22108  mpfind  22141  mdetunilem7  22651  dchrzrhmul  27280  dchrmulcl  27283  dchrn0  27284  dchrinvcl  27287  dchrsum2  27302  sum2dchr  27308  mhmimasplusg  33170  fxpsubm  33306  mplvrpmrhm  33798  mhmhmeotmd  34178