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

Theorem c0mgm 20441
Description: The constant mapping to zero is a magma homomorphism into a monoid. Remark: Instead of the assumption that T is a monoid, it would be sufficient that T is a magma with a right or left identity. (Contributed by AV, 17-Apr-2020.)
Hypotheses
Ref Expression
c0mhm.b 𝐵 = (Base‘𝑆)
c0mhm.0 0 = (0g𝑇)
c0mhm.h 𝐻 = (𝑥𝐵0 )
Assertion
Ref Expression
c0mgm ((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) → 𝐻 ∈ (𝑆 MgmHom 𝑇))
Distinct variable groups:   𝑥,𝐵   𝑥,𝑆   𝑥,𝑇   𝑥, 0
Allowed substitution hint:   𝐻(𝑥)

Proof of Theorem c0mgm
Dummy variables 𝑎 𝑏 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 mndmgm 18734 . . 3 (𝑇 ∈ Mnd → 𝑇 ∈ Mgm)
21anim2i 615 . 2 ((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) → (𝑆 ∈ Mgm ∧ 𝑇 ∈ Mgm))
3 eqid 2726 . . . . . . 7 (Base‘𝑇) = (Base‘𝑇)
4 c0mhm.0 . . . . . . 7 0 = (0g𝑇)
53, 4mndidcl 18742 . . . . . 6 (𝑇 ∈ Mnd → 0 ∈ (Base‘𝑇))
65adantl 480 . . . . 5 ((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) → 0 ∈ (Base‘𝑇))
76adantr 479 . . . 4 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ 𝑥𝐵) → 0 ∈ (Base‘𝑇))
8 c0mhm.h . . . 4 𝐻 = (𝑥𝐵0 )
97, 8fmptd 7128 . . 3 ((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) → 𝐻:𝐵⟶(Base‘𝑇))
105ancli 547 . . . . . . . 8 (𝑇 ∈ Mnd → (𝑇 ∈ Mnd ∧ 0 ∈ (Base‘𝑇)))
1110adantl 480 . . . . . . 7 ((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) → (𝑇 ∈ Mnd ∧ 0 ∈ (Base‘𝑇)))
12 eqid 2726 . . . . . . . 8 (+g𝑇) = (+g𝑇)
133, 12, 4mndlid 18747 . . . . . . 7 ((𝑇 ∈ Mnd ∧ 0 ∈ (Base‘𝑇)) → ( 0 (+g𝑇) 0 ) = 0 )
1411, 13syl 17 . . . . . 6 ((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) → ( 0 (+g𝑇) 0 ) = 0 )
1514adantr 479 . . . . 5 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → ( 0 (+g𝑇) 0 ) = 0 )
168a1i 11 . . . . . . 7 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → 𝐻 = (𝑥𝐵0 ))
17 eqidd 2727 . . . . . . 7 ((((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) ∧ 𝑥 = 𝑎) → 0 = 0 )
18 simprl 769 . . . . . . 7 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → 𝑎𝐵)
196adantr 479 . . . . . . 7 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → 0 ∈ (Base‘𝑇))
2016, 17, 18, 19fvmptd 7016 . . . . . 6 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → (𝐻𝑎) = 0 )
21 eqidd 2727 . . . . . . 7 ((((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) ∧ 𝑥 = 𝑏) → 0 = 0 )
22 simprr 771 . . . . . . 7 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → 𝑏𝐵)
2316, 21, 22, 19fvmptd 7016 . . . . . 6 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → (𝐻𝑏) = 0 )
2420, 23oveq12d 7442 . . . . 5 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → ((𝐻𝑎)(+g𝑇)(𝐻𝑏)) = ( 0 (+g𝑇) 0 ))
25 eqidd 2727 . . . . . 6 ((((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) ∧ 𝑥 = (𝑎(+g𝑆)𝑏)) → 0 = 0 )
26 c0mhm.b . . . . . . . . 9 𝐵 = (Base‘𝑆)
27 eqid 2726 . . . . . . . . 9 (+g𝑆) = (+g𝑆)
2826, 27mgmcl 18636 . . . . . . . 8 ((𝑆 ∈ Mgm ∧ 𝑎𝐵𝑏𝐵) → (𝑎(+g𝑆)𝑏) ∈ 𝐵)
29283expb 1117 . . . . . . 7 ((𝑆 ∈ Mgm ∧ (𝑎𝐵𝑏𝐵)) → (𝑎(+g𝑆)𝑏) ∈ 𝐵)
3029adantlr 713 . . . . . 6 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → (𝑎(+g𝑆)𝑏) ∈ 𝐵)
3116, 25, 30, 19fvmptd 7016 . . . . 5 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → (𝐻‘(𝑎(+g𝑆)𝑏)) = 0 )
3215, 24, 313eqtr4rd 2777 . . . 4 (((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) ∧ (𝑎𝐵𝑏𝐵)) → (𝐻‘(𝑎(+g𝑆)𝑏)) = ((𝐻𝑎)(+g𝑇)(𝐻𝑏)))
3332ralrimivva 3191 . . 3 ((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) → ∀𝑎𝐵𝑏𝐵 (𝐻‘(𝑎(+g𝑆)𝑏)) = ((𝐻𝑎)(+g𝑇)(𝐻𝑏)))
349, 33jca 510 . 2 ((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) → (𝐻:𝐵⟶(Base‘𝑇) ∧ ∀𝑎𝐵𝑏𝐵 (𝐻‘(𝑎(+g𝑆)𝑏)) = ((𝐻𝑎)(+g𝑇)(𝐻𝑏))))
3526, 3, 27, 12ismgmhm 18689 . 2 (𝐻 ∈ (𝑆 MgmHom 𝑇) ↔ ((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mgm) ∧ (𝐻:𝐵⟶(Base‘𝑇) ∧ ∀𝑎𝐵𝑏𝐵 (𝐻‘(𝑎(+g𝑆)𝑏)) = ((𝐻𝑎)(+g𝑇)(𝐻𝑏)))))
362, 34, 35sylanbrc 581 1 ((𝑆 ∈ Mgm ∧ 𝑇 ∈ Mnd) → 𝐻 ∈ (𝑆 MgmHom 𝑇))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 394   = wceq 1534  wcel 2099  wral 3051  cmpt 5236  wf 6550  cfv 6554  (class class class)co 7424  Basecbs 17213  +gcplusg 17266  0gc0g 17454  Mgmcmgm 18631   MgmHom cmgmhm 18683  Mndcmnd 18727
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2167  ax-ext 2697  ax-sep 5304  ax-nul 5311  ax-pow 5369  ax-pr 5433  ax-un 7746
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3an 1086  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2529  df-eu 2558  df-clab 2704  df-cleq 2718  df-clel 2803  df-nfc 2878  df-ne 2931  df-ral 3052  df-rex 3061  df-rmo 3364  df-reu 3365  df-rab 3420  df-v 3464  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-nul 4326  df-if 4534  df-pw 4609  df-sn 4634  df-pr 4636  df-op 4640  df-uni 4914  df-br 5154  df-opab 5216  df-mpt 5237  df-id 5580  df-xp 5688  df-rel 5689  df-cnv 5690  df-co 5691  df-dm 5692  df-rn 5693  df-res 5694  df-ima 5695  df-iota 6506  df-fun 6556  df-fn 6557  df-f 6558  df-fv 6562  df-riota 7380  df-ov 7427  df-oprab 7428  df-mpo 7429  df-map 8857  df-0g 17456  df-mgm 18633  df-mgmhm 18685  df-sgrp 18712  df-mnd 18728
This theorem is referenced by:  c0rnghm  20517
  Copyright terms: Public domain W3C validator