Metamath Proof Explorer


Theorem gasubg

Description: The restriction of a group action to a subgroup is a group action. (Contributed by Mario Carneiro, 17-Jan-2015)

Ref Expression
Hypothesis gasubg.1 H = G 𝑠 S
Assertion gasubg ˙ G GrpAct Y S SubGrp G ˙ S × Y H GrpAct Y

Proof

Step Hyp Ref Expression
1 gasubg.1 H = G 𝑠 S
2 gaset ˙ G GrpAct Y Y V
3 1 subggrp S SubGrp G H Grp
4 2 3 anim12ci ˙ G GrpAct Y S SubGrp G H Grp Y V
5 eqid Base G = Base G
6 5 gaf ˙ G GrpAct Y ˙ : Base G × Y Y
7 6 adantr ˙ G GrpAct Y S SubGrp G ˙ : Base G × Y Y
8 simpr ˙ G GrpAct Y S SubGrp G S SubGrp G
9 5 subgss S SubGrp G S Base G
10 8 9 syl ˙ G GrpAct Y S SubGrp G S Base G
11 xpss1 S Base G S × Y Base G × Y
12 10 11 syl ˙ G GrpAct Y S SubGrp G S × Y Base G × Y
13 7 12 fssresd ˙ G GrpAct Y S SubGrp G ˙ S × Y : S × Y Y
14 1 subgbas S SubGrp G S = Base H
15 8 14 syl ˙ G GrpAct Y S SubGrp G S = Base H
16 15 xpeq1d ˙ G GrpAct Y S SubGrp G S × Y = Base H × Y
17 16 feq2d ˙ G GrpAct Y S SubGrp G ˙ S × Y : S × Y Y ˙ S × Y : Base H × Y Y
18 13 17 mpbid ˙ G GrpAct Y S SubGrp G ˙ S × Y : Base H × Y Y
19 8 adantr ˙ G GrpAct Y S SubGrp G x Y S SubGrp G
20 eqid 0 G = 0 G
21 20 subg0cl S SubGrp G 0 G S
22 19 21 syl ˙ G GrpAct Y S SubGrp G x Y 0 G S
23 simpr ˙ G GrpAct Y S SubGrp G x Y x Y
24 ovres 0 G S x Y 0 G ˙ S × Y x = 0 G ˙ x
25 22 23 24 syl2anc ˙ G GrpAct Y S SubGrp G x Y 0 G ˙ S × Y x = 0 G ˙ x
26 1 20 subg0 S SubGrp G 0 G = 0 H
27 19 26 syl ˙ G GrpAct Y S SubGrp G x Y 0 G = 0 H
28 27 oveq1d ˙ G GrpAct Y S SubGrp G x Y 0 G ˙ S × Y x = 0 H ˙ S × Y x
29 20 gagrpid ˙ G GrpAct Y x Y 0 G ˙ x = x
30 29 adantlr ˙ G GrpAct Y S SubGrp G x Y 0 G ˙ x = x
31 25 28 30 3eqtr3d ˙ G GrpAct Y S SubGrp G x Y 0 H ˙ S × Y x = x
32 eqimss2 S = Base H Base H S
33 15 32 syl ˙ G GrpAct Y S SubGrp G Base H S
34 33 adantr ˙ G GrpAct Y S SubGrp G x Y Base H S
35 34 sselda ˙ G GrpAct Y S SubGrp G x Y y Base H y S
36 34 sselda ˙ G GrpAct Y S SubGrp G x Y z Base H z S
37 35 36 anim12dan ˙ G GrpAct Y S SubGrp G x Y y Base H z Base H y S z S
38 simprl ˙ G GrpAct Y S SubGrp G x Y y S z S y S
39 7 ad2antrr ˙ G GrpAct Y S SubGrp G x Y y S z S ˙ : Base G × Y Y
40 9 ad3antlr ˙ G GrpAct Y S SubGrp G x Y y S z S S Base G
41 simprr ˙ G GrpAct Y S SubGrp G x Y y S z S z S
42 40 41 sseldd ˙ G GrpAct Y S SubGrp G x Y y S z S z Base G
43 23 adantr ˙ G GrpAct Y S SubGrp G x Y y S z S x Y
44 39 42 43 fovrnd ˙ G GrpAct Y S SubGrp G x Y y S z S z ˙ x Y
45 ovres y S z ˙ x Y y ˙ S × Y z ˙ x = y ˙ z ˙ x
46 38 44 45 syl2anc ˙ G GrpAct Y S SubGrp G x Y y S z S y ˙ S × Y z ˙ x = y ˙ z ˙ x
47 ovres z S x Y z ˙ S × Y x = z ˙ x
48 41 43 47 syl2anc ˙ G GrpAct Y S SubGrp G x Y y S z S z ˙ S × Y x = z ˙ x
49 48 oveq2d ˙ G GrpAct Y S SubGrp G x Y y S z S y ˙ S × Y z ˙ S × Y x = y ˙ S × Y z ˙ x
50 simplll ˙ G GrpAct Y S SubGrp G x Y y S z S ˙ G GrpAct Y
51 40 38 sseldd ˙ G GrpAct Y S SubGrp G x Y y S z S y Base G
52 eqid + G = + G
53 5 52 gaass ˙ G GrpAct Y y Base G z Base G x Y y + G z ˙ x = y ˙ z ˙ x
54 50 51 42 43 53 syl13anc ˙ G GrpAct Y S SubGrp G x Y y S z S y + G z ˙ x = y ˙ z ˙ x
55 46 49 54 3eqtr4d ˙ G GrpAct Y S SubGrp G x Y y S z S y ˙ S × Y z ˙ S × Y x = y + G z ˙ x
56 52 subgcl S SubGrp G y S z S y + G z S
57 56 3expb S SubGrp G y S z S y + G z S
58 19 57 sylan ˙ G GrpAct Y S SubGrp G x Y y S z S y + G z S
59 ovres y + G z S x Y y + G z ˙ S × Y x = y + G z ˙ x
60 58 43 59 syl2anc ˙ G GrpAct Y S SubGrp G x Y y S z S y + G z ˙ S × Y x = y + G z ˙ x
61 1 52 ressplusg S SubGrp G + G = + H
62 61 ad3antlr ˙ G GrpAct Y S SubGrp G x Y y S z S + G = + H
63 62 oveqd ˙ G GrpAct Y S SubGrp G x Y y S z S y + G z = y + H z
64 63 oveq1d ˙ G GrpAct Y S SubGrp G x Y y S z S y + G z ˙ S × Y x = y + H z ˙ S × Y x
65 55 60 64 3eqtr2rd ˙ G GrpAct Y S SubGrp G x Y y S z S y + H z ˙ S × Y x = y ˙ S × Y z ˙ S × Y x
66 37 65 syldan ˙ G GrpAct Y S SubGrp G x Y y Base H z Base H y + H z ˙ S × Y x = y ˙ S × Y z ˙ S × Y x
67 66 ralrimivva ˙ G GrpAct Y S SubGrp G x Y y Base H z Base H y + H z ˙ S × Y x = y ˙ S × Y z ˙ S × Y x
68 31 67 jca ˙ G GrpAct Y S SubGrp G x Y 0 H ˙ S × Y x = x y Base H z Base H y + H z ˙ S × Y x = y ˙ S × Y z ˙ S × Y x
69 68 ralrimiva ˙ G GrpAct Y S SubGrp G x Y 0 H ˙ S × Y x = x y Base H z Base H y + H z ˙ S × Y x = y ˙ S × Y z ˙ S × Y x
70 18 69 jca ˙ G GrpAct Y S SubGrp G ˙ S × Y : Base H × Y Y x Y 0 H ˙ S × Y x = x y Base H z Base H y + H z ˙ S × Y x = y ˙ S × Y z ˙ S × Y x
71 eqid Base H = Base H
72 eqid + H = + H
73 eqid 0 H = 0 H
74 71 72 73 isga ˙ S × Y H GrpAct Y H Grp Y V ˙ S × Y : Base H × Y Y x Y 0 H ˙ S × Y x = x y Base H z Base H y + H z ˙ S × Y x = y ˙ S × Y z ˙ S × Y x
75 4 70 74 sylanbrc ˙ G GrpAct Y S SubGrp G ˙ S × Y H GrpAct Y