Theorem ghmgrp1 19276

Description: A group homomorphism is only defined when the domain is a group. (Contributed by Stefan O'Rear, 31-Dec-2014.)

Assertion

Ref	Expression
ghmgrp1	⊢ (𝐹 ∈ (𝑆 GrpHom 𝑇) → 𝑆 ∈ Grp)

Proof of Theorem ghmgrp1

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

Step	Hyp	Ref	Expression
1		eqid 2765	. . . 4 ⊢ (Base‘𝑆) = (Base‘𝑆)
2		eqid 2765	. . . 4 ⊢ (Base‘𝑇) = (Base‘𝑇)
3		eqid 2765	. . . 4 ⊢ (+g‘𝑆) = (+g‘𝑆)
4		eqid 2765	. . . 4 ⊢ (+g‘𝑇) = (+g‘𝑇)
5	1, 2, 3, 4	isghm 19274	. . 3 ⊢ (𝐹 ∈ (𝑆 GrpHom 𝑇) ↔ ((𝑆 ∈ Grp ∧ 𝑇 ∈ Grp) ∧ (𝐹:(Base‘𝑆)⟶(Base‘𝑇) ∧ ∀𝑦 ∈ (Base‘𝑆)∀𝑥 ∈ (Base‘𝑆)(𝐹‘(𝑦(+g‘𝑆)𝑥)) = ((𝐹‘𝑦)(+g‘𝑇)(𝐹‘𝑥)))))
6	5	simplbi 501	. 2 ⊢ (𝐹 ∈ (𝑆 GrpHom 𝑇) → (𝑆 ∈ Grp ∧ 𝑇 ∈ Grp))
7	6	simpld 499	1 ⊢ (𝐹 ∈ (𝑆 GrpHom 𝑇) → 𝑆 ∈ Grp)

Syntax hints:   → wi 4   ∧ wa 400   = wceq 1563   ∈ wcel 2145  ∀wral 3079  ⟶wf 6521  ‘cfv 6525  (class class class)co 7400  Basecbs 17257  +_gcplusg 17298  Grpcgrp 18988   GrpHom cghm 19271

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-sep 5250  ax-nul 5260  ax-pow 5326  ax-pr 5394  ax-un 7722

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3080  df-rex 3090  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4868  df-iun 4953  df-br 5105  df-opab 5167  df-mpt 5186  df-id 5546  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-fv 6533  df-ov 7403  df-oprab 7404  df-mpo 7405  df-1st 7974  df-2nd 7975  df-map 8814  df-ghm 19272

This theorem is referenced by:  ghmid  19280  ghminv  19281  ghmsub  19282  ghmmhm  19284  ghmmulg  19286  ghmrn  19287  resghm2  19291  resghm2b  19292  ghmco  19294  ghmpreima  19296  ghmeql  19297  ghmnsgima  19298  ghmnsgpreima  19299  ghmeqker  19301  f1ghm0to0  19303  ghmf1  19304  kerf1ghm  19305  ghmf1o  19306  ghmpropd  19314  isgim  19320  giclcl  19331  ghmqusnsglem1  19338  ghmqusnsglem2  19339  ghmqusnsg  19340  ghmquskerlem1  19341  ghmquskerlem2  19343  ghmquskerlem3  19344  ghmqusker  19345  lactghmga  19463  invghm  19891  ghmplusg  19904  evladdval  22211  evlsaddval  22237  evl1addd  22458  evl1subd  22459  ghmcnp  24229  fxpsubg  33401  gicabl  43683