Theorem resghm 17883

Description: Restriction of a homomorphism to a subgroup. (Contributed by Stefan O'Rear, 31-Dec-2014.)

Hypothesis

Ref	Expression
resghm.u	⊢ 𝑈 = (𝑆 ↾s 𝑋)

Assertion

Ref	Expression
resghm	⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) → (𝐹 ↾ 𝑋) ∈ (𝑈 GrpHom 𝑇))

Proof of Theorem resghm

Dummy variables 𝑎 𝑏 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqid 2770	. 2 ⊢ (Base‘𝑈) = (Base‘𝑈)
2		eqid 2770	. 2 ⊢ (Base‘𝑇) = (Base‘𝑇)
3		eqid 2770	. 2 ⊢ (+g‘𝑈) = (+g‘𝑈)
4		eqid 2770	. 2 ⊢ (+g‘𝑇) = (+g‘𝑇)
5		resghm.u	. . . 4 ⊢ 𝑈 = (𝑆 ↾s 𝑋)
6	5	subggrp 17804	. . 3 ⊢ (𝑋 ∈ (SubGrp‘𝑆) → 𝑈 ∈ Grp)
7	6	adantl 467	. 2 ⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) → 𝑈 ∈ Grp)
8		ghmgrp2 17870	. . 3 ⊢ (𝐹 ∈ (𝑆 GrpHom 𝑇) → 𝑇 ∈ Grp)
9	8	adantr 466	. 2 ⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) → 𝑇 ∈ Grp)
10		eqid 2770	. . . . 5 ⊢ (Base‘𝑆) = (Base‘𝑆)
11	10, 2	ghmf 17871	. . . 4 ⊢ (𝐹 ∈ (𝑆 GrpHom 𝑇) → 𝐹:(Base‘𝑆)⟶(Base‘𝑇))
12	10	subgss 17802	. . . 4 ⊢ (𝑋 ∈ (SubGrp‘𝑆) → 𝑋 ⊆ (Base‘𝑆))
13		fssres 6210	. . . 4 ⊢ ((𝐹:(Base‘𝑆)⟶(Base‘𝑇) ∧ 𝑋 ⊆ (Base‘𝑆)) → (𝐹 ↾ 𝑋):𝑋⟶(Base‘𝑇))
14	11, 12, 13	syl2an 575	. . 3 ⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) → (𝐹 ↾ 𝑋):𝑋⟶(Base‘𝑇))
15	12	adantl 467	. . . . 5 ⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) → 𝑋 ⊆ (Base‘𝑆))
16	5, 10	ressbas2 16137	. . . . 5 ⊢ (𝑋 ⊆ (Base‘𝑆) → 𝑋 = (Base‘𝑈))
17	15, 16	syl 17	. . . 4 ⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) → 𝑋 = (Base‘𝑈))
18	17	feq2d 6171	. . 3 ⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) → ((𝐹 ↾ 𝑋):𝑋⟶(Base‘𝑇) ↔ (𝐹 ↾ 𝑋):(Base‘𝑈)⟶(Base‘𝑇)))
19	14, 18	mpbid 222	. 2 ⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) → (𝐹 ↾ 𝑋):(Base‘𝑈)⟶(Base‘𝑇))
20		eleq2 2838	. . . . . 6 ⊢ (𝑋 = (Base‘𝑈) → (𝑎 ∈ 𝑋 ↔ 𝑎 ∈ (Base‘𝑈)))
21		eleq2 2838	. . . . . 6 ⊢ (𝑋 = (Base‘𝑈) → (𝑏 ∈ 𝑋 ↔ 𝑏 ∈ (Base‘𝑈)))
22	20, 21	anbi12d 608	. . . . 5 ⊢ (𝑋 = (Base‘𝑈) → ((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) ↔ (𝑎 ∈ (Base‘𝑈) ∧ 𝑏 ∈ (Base‘𝑈))))
23	17, 22	syl 17	. . . 4 ⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) → ((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) ↔ (𝑎 ∈ (Base‘𝑈) ∧ 𝑏 ∈ (Base‘𝑈))))
24	23	biimpar 463	. . 3 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ (Base‘𝑈) ∧ 𝑏 ∈ (Base‘𝑈))) → (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋))
25		simpll 742	. . . . 5 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝐹 ∈ (𝑆 GrpHom 𝑇))
26	15	sselda 3750	. . . . . 6 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ 𝑎 ∈ 𝑋) → 𝑎 ∈ (Base‘𝑆))
27	26	adantrr 688	. . . . 5 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝑎 ∈ (Base‘𝑆))
28	15	sselda 3750	. . . . . 6 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ 𝑏 ∈ 𝑋) → 𝑏 ∈ (Base‘𝑆))
29	28	adantrl 687	. . . . 5 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝑏 ∈ (Base‘𝑆))
30		eqid 2770	. . . . . 6 ⊢ (+g‘𝑆) = (+g‘𝑆)
31	10, 30, 4	ghmlin 17872	. . . . 5 ⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑎 ∈ (Base‘𝑆) ∧ 𝑏 ∈ (Base‘𝑆)) → (𝐹‘(𝑎(+g‘𝑆)𝑏)) = ((𝐹‘𝑎)(+g‘𝑇)(𝐹‘𝑏)))
32	25, 27, 29, 31	syl3anc 1475	. . . 4 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (𝐹‘(𝑎(+g‘𝑆)𝑏)) = ((𝐹‘𝑎)(+g‘𝑇)(𝐹‘𝑏)))
33	5, 30	ressplusg 16200	. . . . . . . 8 ⊢ (𝑋 ∈ (SubGrp‘𝑆) → (+g‘𝑆) = (+g‘𝑈))
34	33	ad2antlr 698	. . . . . . 7 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (+g‘𝑆) = (+g‘𝑈))
35	34	oveqd 6809	. . . . . 6 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (𝑎(+g‘𝑆)𝑏) = (𝑎(+g‘𝑈)𝑏))
36	35	fveq2d 6336	. . . . 5 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ((𝐹 ↾ 𝑋)‘(𝑎(+g‘𝑆)𝑏)) = ((𝐹 ↾ 𝑋)‘(𝑎(+g‘𝑈)𝑏)))
37	30	subgcl 17811	. . . . . . . 8 ⊢ ((𝑋 ∈ (SubGrp‘𝑆) ∧ 𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) → (𝑎(+g‘𝑆)𝑏) ∈ 𝑋)
38	37	3expb 1112	. . . . . . 7 ⊢ ((𝑋 ∈ (SubGrp‘𝑆) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (𝑎(+g‘𝑆)𝑏) ∈ 𝑋)
39	38	adantll 685	. . . . . 6 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (𝑎(+g‘𝑆)𝑏) ∈ 𝑋)
40		fvres 6348	. . . . . 6 ⊢ ((𝑎(+g‘𝑆)𝑏) ∈ 𝑋 → ((𝐹 ↾ 𝑋)‘(𝑎(+g‘𝑆)𝑏)) = (𝐹‘(𝑎(+g‘𝑆)𝑏)))
41	39, 40	syl 17	. . . . 5 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ((𝐹 ↾ 𝑋)‘(𝑎(+g‘𝑆)𝑏)) = (𝐹‘(𝑎(+g‘𝑆)𝑏)))
42	36, 41	eqtr3d 2806	. . . 4 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ((𝐹 ↾ 𝑋)‘(𝑎(+g‘𝑈)𝑏)) = (𝐹‘(𝑎(+g‘𝑆)𝑏)))
43		fvres 6348	. . . . . 6 ⊢ (𝑎 ∈ 𝑋 → ((𝐹 ↾ 𝑋)‘𝑎) = (𝐹‘𝑎))
44		fvres 6348	. . . . . 6 ⊢ (𝑏 ∈ 𝑋 → ((𝐹 ↾ 𝑋)‘𝑏) = (𝐹‘𝑏))
45	43, 44	oveqan12d 6811	. . . . 5 ⊢ ((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) → (((𝐹 ↾ 𝑋)‘𝑎)(+g‘𝑇)((𝐹 ↾ 𝑋)‘𝑏)) = ((𝐹‘𝑎)(+g‘𝑇)(𝐹‘𝑏)))
46	45	adantl 467	. . . 4 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (((𝐹 ↾ 𝑋)‘𝑎)(+g‘𝑇)((𝐹 ↾ 𝑋)‘𝑏)) = ((𝐹‘𝑎)(+g‘𝑇)(𝐹‘𝑏)))
47	32, 42, 46	3eqtr4d 2814	. . 3 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ((𝐹 ↾ 𝑋)‘(𝑎(+g‘𝑈)𝑏)) = (((𝐹 ↾ 𝑋)‘𝑎)(+g‘𝑇)((𝐹 ↾ 𝑋)‘𝑏)))
48	24, 47	syldan 571	. 2 ⊢ (((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) ∧ (𝑎 ∈ (Base‘𝑈) ∧ 𝑏 ∈ (Base‘𝑈))) → ((𝐹 ↾ 𝑋)‘(𝑎(+g‘𝑈)𝑏)) = (((𝐹 ↾ 𝑋)‘𝑎)(+g‘𝑇)((𝐹 ↾ 𝑋)‘𝑏)))
49	1, 2, 3, 4, 7, 9, 19, 48	isghmd 17876	1 ⊢ ((𝐹 ∈ (𝑆 GrpHom 𝑇) ∧ 𝑋 ∈ (SubGrp‘𝑆)) → (𝐹 ↾ 𝑋) ∈ (𝑈 GrpHom 𝑇))

Syntax hints:   → wi 4   ↔ wb 196   ∧ wa 382   = wceq 1630   ∈ wcel 2144   ⊆ wss 3721   ↾ cres 5251  ⟶wf 6027  ‘cfv 6031  (class class class)co 6792  Basecbs 16063   ↾_s cress 16064  +_gcplusg 16148  Grpcgrp 17629  SubGrpcsubg 17795   GrpHom cghm 17864

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1869  ax-4 1884  ax-5 1990  ax-6 2056  ax-7 2092  ax-8 2146  ax-9 2153  ax-10 2173  ax-11 2189  ax-12 2202  ax-13 2407  ax-ext 2750  ax-rep 4902  ax-sep 4912  ax-nul 4920  ax-pow 4971  ax-pr 5034  ax-un 7095  ax-cnex 10193  ax-resscn 10194  ax-1cn 10195  ax-icn 10196  ax-addcl 10197  ax-addrcl 10198  ax-mulcl 10199  ax-mulrcl 10200  ax-mulcom 10201  ax-addass 10202  ax-mulass 10203  ax-distr 10204  ax-i2m1 10205  ax-1ne0 10206  ax-1rid 10207  ax-rnegex 10208  ax-rrecex 10209  ax-cnre 10210  ax-pre-lttri 10211  ax-pre-lttrn 10212  ax-pre-ltadd 10213  ax-pre-mulgt0 10214

This theorem depends on definitions:  df-bi 197  df-an 383  df-or 827  df-3or 1071  df-3an 1072  df-tru 1633  df-ex 1852  df-nf 1857  df-sb 2049  df-eu 2621  df-mo 2622  df-clab 2757  df-cleq 2763  df-clel 2766  df-nfc 2901  df-ne 2943  df-nel 3046  df-ral 3065  df-rex 3066  df-reu 3067  df-rab 3069  df-v 3351  df-sbc 3586  df-csb 3681  df-dif 3724  df-un 3726  df-in 3728  df-ss 3735  df-pss 3737  df-nul 4062  df-if 4224  df-pw 4297  df-sn 4315  df-pr 4317  df-tp 4319  df-op 4321  df-uni 4573  df-iun 4654  df-br 4785  df-opab 4845  df-mpt 4862  df-tr 4885  df-id 5157  df-eprel 5162  df-po 5170  df-so 5171  df-fr 5208  df-we 5210  df-xp 5255  df-rel 5256  df-cnv 5257  df-co 5258  df-dm 5259  df-rn 5260  df-res 5261  df-ima 5262  df-pred 5823  df-ord 5869  df-on 5870  df-lim 5871  df-suc 5872  df-iota 5994  df-fun 6033  df-fn 6034  df-f 6035  df-f1 6036  df-fo 6037  df-f1o 6038  df-fv 6039  df-riota 6753  df-ov 6795  df-oprab 6796  df-mpt2 6797  df-om 7212  df-wrecs 7558  df-recs 7620  df-rdg 7658  df-er 7895  df-en 8109  df-dom 8110  df-sdom 8111  df-pnf 10277  df-mnf 10278  df-xr 10279  df-ltxr 10280  df-le 10281  df-sub 10469  df-neg 10470  df-nn 11222  df-2 11280  df-ndx 16066  df-slot 16067  df-base 16069  df-sets 16070  df-ress 16071  df-plusg 16161  df-mgm 17449  df-sgrp 17491  df-mnd 17502  df-grp 17632  df-subg 17798  df-ghm 17865

This theorem is referenced by:  ghmima  17888  resrhm  19018  reslmhm  19264