Theorem ghmgrp1 19319

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 2766	. . . 4 ⊢ (Base‘𝑆) = (Base‘𝑆)
2		eqid 2766	. . . 4 ⊢ (Base‘𝑇) = (Base‘𝑇)
3		eqid 2766	. . . 4 ⊢ (+g‘𝑆) = (+g‘𝑆)
4		eqid 2766	. . . 4 ⊢ (+g‘𝑇) = (+g‘𝑇)
5	1, 2, 3, 4	isghm 19317	. . 3 ⊢ (𝐹 ∈ (𝑆 GrpHom 𝑇) ↔ ((𝑆 ∈ Grp ∧ 𝑇 ∈ Grp) ∧ (𝐹:(Base‘𝑆)⟶(Base‘𝑇) ∧ ∀𝑦 ∈ (Base‘𝑆)∀𝑥 ∈ (Base‘𝑆)(𝐹‘(𝑦(+g‘𝑆)𝑥)) = ((𝐹‘𝑦)(+g‘𝑇)(𝐹‘𝑥)))))
6	5	simplbi 502	. 2 ⊢ (𝐹 ∈ (𝑆 GrpHom 𝑇) → (𝑆 ∈ Grp ∧ 𝑇 ∈ Grp))
7	6	simpld 500	1 ⊢ (𝐹 ∈ (𝑆 GrpHom 𝑇) → 𝑆 ∈ Grp)

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2146  ∀wral 3082  ⟶wf 6539  ‘cfv 6543  (class class class)co 7423  Basecbs 17294  +_gcplusg 17335  Grpcgrp 19031   GrpHom cghm 19314

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-sep 5262  ax-nul 5274  ax-pow 5341  ax-pr 5409  ax-un 7745

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-ral 3083  df-rex 3093  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4878  df-iun 4963  df-br 5115  df-opab 5179  df-mpt 5198  df-id 5561  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-fv 6551  df-ov 7426  df-oprab 7427  df-mpo 7428  df-1st 7995  df-2nd 7996  df-map 8835  df-ghm 19315

This theorem is used by:  ghmid  19323  ghminv  19324  ghmsub  19325  ghmmhm  19327  ghmmulg  19329  ghmrn  19330  resghm2  19334  resghm2b  19335  ghmco  19337  ghmpreima  19339  ghmeql  19340  ghmnsgima  19341  ghmnsgpreima  19342  ghmeqker  19344  f1ghm0to0  19346  ghmf1  19347  kerf1ghm  19348  ghmf1o  19349  ghmpropd  19357  isgim  19363  giclcl  19374  ghmqusnsglem1  19381  ghmqusnsglem2  19382  ghmqusnsg  19383  ghmquskerlem1  19384  ghmquskerlem2  19386  ghmquskerlem3  19387  ghmqusker  19388  lactghmga  19506  invghm  19934  ghmplusg  19947  evladdval  22291  evlsaddval  22317  evl1addd  22538  evl1subd  22539  ghmcnp  24309  fxpsubg  33524  gicabl  43867