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 fovcdmd ⊢ ⊕ ˙ ∈ 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