Theorem ghmgrp1 19150

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

Syntax hints:   → wi 4   ∧ wa 395   = wceq 1540   ∈ wcel 2109  ∀wral 3044  ⟶wf 6507  ‘cfv 6511  (class class class)co 7387  Basecbs 17179  +_gcplusg 17220  Grpcgrp 18865   GrpHom cghm 19144

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-sep 5251  ax-nul 5261  ax-pow 5320  ax-pr 5387  ax-un 7711

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-ral 3045  df-rex 3054  df-rab 3406  df-v 3449  df-sbc 3754  df-csb 3863  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-nul 4297  df-if 4489  df-pw 4565  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4872  df-iun 4957  df-br 5108  df-opab 5170  df-mpt 5189  df-id 5533  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-iota 6464  df-fun 6513  df-fn 6514  df-f 6515  df-fv 6519  df-ov 7390  df-oprab 7391  df-mpo 7392  df-1st 7968  df-2nd 7969  df-map 8801  df-ghm 19145

This theorem is referenced by:  ghmid  19154  ghminv  19155  ghmsub  19156  ghmmhm  19158  ghmmulg  19160  ghmrn  19161  resghm2  19165  resghm2b  19166  ghmco  19168  ghmpreima  19170  ghmeql  19171  ghmnsgima  19172  ghmnsgpreima  19173  ghmeqker  19175  f1ghm0to0  19177  ghmf1  19178  kerf1ghm  19179  ghmf1o  19180  ghmpropd  19188  isgim  19194  giclcl  19205  ghmqusnsglem1  19212  ghmqusnsglem2  19213  ghmqusnsg  19214  ghmquskerlem1  19215  ghmquskerlem2  19217  ghmquskerlem3  19218  ghmqusker  19219  lactghmga  19335  invghm  19763  ghmplusg  19776  evl1addd  22228  evl1subd  22229  ghmcnp  24002  evlsaddval  42556  evladdval  42563  gicabl  43088