MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  subgga Structured version   Visualization version   GIF version

Theorem subgga 17649
Description: A subgroup acts on its parent group. (Contributed by Jeff Hankins, 13-Aug-2009.) (Proof shortened by Mario Carneiro, 13-Jan-2015.)
Hypotheses
Ref Expression
subgga.1 𝑋 = (Base‘𝐺)
subgga.2 + = (+g𝐺)
subgga.3 𝐻 = (𝐺s 𝑌)
subgga.4 𝐹 = (𝑥𝑌, 𝑦𝑋 ↦ (𝑥 + 𝑦))
Assertion
Ref Expression
subgga (𝑌 ∈ (SubGrp‘𝐺) → 𝐹 ∈ (𝐻 GrpAct 𝑋))
Distinct variable groups:   𝑥,𝑦,𝐺   𝑥,𝑋,𝑦   𝑥,𝑌,𝑦   𝑥, + ,𝑦
Allowed substitution hints:   𝐹(𝑥,𝑦)   𝐻(𝑥,𝑦)

Proof of Theorem subgga
Dummy variables 𝑣 𝑢 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 subgga.3 . . . 4 𝐻 = (𝐺s 𝑌)
21subggrp 17513 . . 3 (𝑌 ∈ (SubGrp‘𝐺) → 𝐻 ∈ Grp)
3 subgga.1 . . . 4 𝑋 = (Base‘𝐺)
4 fvex 6160 . . . 4 (Base‘𝐺) ∈ V
53, 4eqeltri 2700 . . 3 𝑋 ∈ V
62, 5jctir 560 . 2 (𝑌 ∈ (SubGrp‘𝐺) → (𝐻 ∈ Grp ∧ 𝑋 ∈ V))
7 subgrcl 17515 . . . . . . . 8 (𝑌 ∈ (SubGrp‘𝐺) → 𝐺 ∈ Grp)
87adantr 481 . . . . . . 7 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥𝑌𝑦𝑋)) → 𝐺 ∈ Grp)
93subgss 17511 . . . . . . . . 9 (𝑌 ∈ (SubGrp‘𝐺) → 𝑌𝑋)
109sselda 3588 . . . . . . . 8 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑥𝑌) → 𝑥𝑋)
1110adantrr 752 . . . . . . 7 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥𝑌𝑦𝑋)) → 𝑥𝑋)
12 simprr 795 . . . . . . 7 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥𝑌𝑦𝑋)) → 𝑦𝑋)
13 subgga.2 . . . . . . . 8 + = (+g𝐺)
143, 13grpcl 17346 . . . . . . 7 ((𝐺 ∈ Grp ∧ 𝑥𝑋𝑦𝑋) → (𝑥 + 𝑦) ∈ 𝑋)
158, 11, 12, 14syl3anc 1323 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑥𝑌𝑦𝑋)) → (𝑥 + 𝑦) ∈ 𝑋)
1615ralrimivva 2970 . . . . 5 (𝑌 ∈ (SubGrp‘𝐺) → ∀𝑥𝑌𝑦𝑋 (𝑥 + 𝑦) ∈ 𝑋)
17 subgga.4 . . . . . 6 𝐹 = (𝑥𝑌, 𝑦𝑋 ↦ (𝑥 + 𝑦))
1817fmpt2 7183 . . . . 5 (∀𝑥𝑌𝑦𝑋 (𝑥 + 𝑦) ∈ 𝑋𝐹:(𝑌 × 𝑋)⟶𝑋)
1916, 18sylib 208 . . . 4 (𝑌 ∈ (SubGrp‘𝐺) → 𝐹:(𝑌 × 𝑋)⟶𝑋)
201subgbas 17514 . . . . . 6 (𝑌 ∈ (SubGrp‘𝐺) → 𝑌 = (Base‘𝐻))
2120xpeq1d 5103 . . . . 5 (𝑌 ∈ (SubGrp‘𝐺) → (𝑌 × 𝑋) = ((Base‘𝐻) × 𝑋))
2221feq2d 5990 . . . 4 (𝑌 ∈ (SubGrp‘𝐺) → (𝐹:(𝑌 × 𝑋)⟶𝑋𝐹:((Base‘𝐻) × 𝑋)⟶𝑋))
2319, 22mpbid 222 . . 3 (𝑌 ∈ (SubGrp‘𝐺) → 𝐹:((Base‘𝐻) × 𝑋)⟶𝑋)
24 eqid 2626 . . . . . . . 8 (0g𝐺) = (0g𝐺)
2524subg0cl 17518 . . . . . . 7 (𝑌 ∈ (SubGrp‘𝐺) → (0g𝐺) ∈ 𝑌)
26 oveq12 6614 . . . . . . . 8 ((𝑥 = (0g𝐺) ∧ 𝑦 = 𝑢) → (𝑥 + 𝑦) = ((0g𝐺) + 𝑢))
27 ovex 6633 . . . . . . . 8 ((0g𝐺) + 𝑢) ∈ V
2826, 17, 27ovmpt2a 6745 . . . . . . 7 (((0g𝐺) ∈ 𝑌𝑢𝑋) → ((0g𝐺)𝐹𝑢) = ((0g𝐺) + 𝑢))
2925, 28sylan 488 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) → ((0g𝐺)𝐹𝑢) = ((0g𝐺) + 𝑢))
301, 24subg0 17516 . . . . . . . 8 (𝑌 ∈ (SubGrp‘𝐺) → (0g𝐺) = (0g𝐻))
3130oveq1d 6620 . . . . . . 7 (𝑌 ∈ (SubGrp‘𝐺) → ((0g𝐺)𝐹𝑢) = ((0g𝐻)𝐹𝑢))
3231adantr 481 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) → ((0g𝐺)𝐹𝑢) = ((0g𝐻)𝐹𝑢))
333, 13, 24grplid 17368 . . . . . . 7 ((𝐺 ∈ Grp ∧ 𝑢𝑋) → ((0g𝐺) + 𝑢) = 𝑢)
347, 33sylan 488 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) → ((0g𝐺) + 𝑢) = 𝑢)
3529, 32, 343eqtr3d 2668 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) → ((0g𝐻)𝐹𝑢) = 𝑢)
367ad2antrr 761 . . . . . . . . . 10 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → 𝐺 ∈ Grp)
379ad2antrr 761 . . . . . . . . . . 11 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → 𝑌𝑋)
38 simprl 793 . . . . . . . . . . 11 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → 𝑣𝑌)
3937, 38sseldd 3589 . . . . . . . . . 10 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → 𝑣𝑋)
40 simprr 795 . . . . . . . . . . 11 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → 𝑤𝑌)
4137, 40sseldd 3589 . . . . . . . . . 10 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → 𝑤𝑋)
42 simplr 791 . . . . . . . . . 10 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → 𝑢𝑋)
433, 13grpass 17347 . . . . . . . . . 10 ((𝐺 ∈ Grp ∧ (𝑣𝑋𝑤𝑋𝑢𝑋)) → ((𝑣 + 𝑤) + 𝑢) = (𝑣 + (𝑤 + 𝑢)))
4436, 39, 41, 42, 43syl13anc 1325 . . . . . . . . 9 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → ((𝑣 + 𝑤) + 𝑢) = (𝑣 + (𝑤 + 𝑢)))
453, 13grpcl 17346 . . . . . . . . . . 11 ((𝐺 ∈ Grp ∧ 𝑤𝑋𝑢𝑋) → (𝑤 + 𝑢) ∈ 𝑋)
4636, 41, 42, 45syl3anc 1323 . . . . . . . . . 10 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → (𝑤 + 𝑢) ∈ 𝑋)
47 oveq12 6614 . . . . . . . . . . 11 ((𝑥 = 𝑣𝑦 = (𝑤 + 𝑢)) → (𝑥 + 𝑦) = (𝑣 + (𝑤 + 𝑢)))
48 ovex 6633 . . . . . . . . . . 11 (𝑣 + (𝑤 + 𝑢)) ∈ V
4947, 17, 48ovmpt2a 6745 . . . . . . . . . 10 ((𝑣𝑌 ∧ (𝑤 + 𝑢) ∈ 𝑋) → (𝑣𝐹(𝑤 + 𝑢)) = (𝑣 + (𝑤 + 𝑢)))
5038, 46, 49syl2anc 692 . . . . . . . . 9 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → (𝑣𝐹(𝑤 + 𝑢)) = (𝑣 + (𝑤 + 𝑢)))
5144, 50eqtr4d 2663 . . . . . . . 8 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → ((𝑣 + 𝑤) + 𝑢) = (𝑣𝐹(𝑤 + 𝑢)))
5213subgcl 17520 . . . . . . . . . . 11 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑣𝑌𝑤𝑌) → (𝑣 + 𝑤) ∈ 𝑌)
53523expb 1263 . . . . . . . . . 10 ((𝑌 ∈ (SubGrp‘𝐺) ∧ (𝑣𝑌𝑤𝑌)) → (𝑣 + 𝑤) ∈ 𝑌)
5453adantlr 750 . . . . . . . . 9 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → (𝑣 + 𝑤) ∈ 𝑌)
55 oveq12 6614 . . . . . . . . . 10 ((𝑥 = (𝑣 + 𝑤) ∧ 𝑦 = 𝑢) → (𝑥 + 𝑦) = ((𝑣 + 𝑤) + 𝑢))
56 ovex 6633 . . . . . . . . . 10 ((𝑣 + 𝑤) + 𝑢) ∈ V
5755, 17, 56ovmpt2a 6745 . . . . . . . . 9 (((𝑣 + 𝑤) ∈ 𝑌𝑢𝑋) → ((𝑣 + 𝑤)𝐹𝑢) = ((𝑣 + 𝑤) + 𝑢))
5854, 42, 57syl2anc 692 . . . . . . . 8 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → ((𝑣 + 𝑤)𝐹𝑢) = ((𝑣 + 𝑤) + 𝑢))
59 oveq12 6614 . . . . . . . . . . 11 ((𝑥 = 𝑤𝑦 = 𝑢) → (𝑥 + 𝑦) = (𝑤 + 𝑢))
60 ovex 6633 . . . . . . . . . . 11 (𝑤 + 𝑢) ∈ V
6159, 17, 60ovmpt2a 6745 . . . . . . . . . 10 ((𝑤𝑌𝑢𝑋) → (𝑤𝐹𝑢) = (𝑤 + 𝑢))
6240, 42, 61syl2anc 692 . . . . . . . . 9 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → (𝑤𝐹𝑢) = (𝑤 + 𝑢))
6362oveq2d 6621 . . . . . . . 8 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → (𝑣𝐹(𝑤𝐹𝑢)) = (𝑣𝐹(𝑤 + 𝑢)))
6451, 58, 633eqtr4d 2670 . . . . . . 7 (((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) ∧ (𝑣𝑌𝑤𝑌)) → ((𝑣 + 𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢)))
6564ralrimivva 2970 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) → ∀𝑣𝑌𝑤𝑌 ((𝑣 + 𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢)))
661, 13ressplusg 15909 . . . . . . . . . . . 12 (𝑌 ∈ (SubGrp‘𝐺) → + = (+g𝐻))
6766oveqd 6622 . . . . . . . . . . 11 (𝑌 ∈ (SubGrp‘𝐺) → (𝑣 + 𝑤) = (𝑣(+g𝐻)𝑤))
6867oveq1d 6620 . . . . . . . . . 10 (𝑌 ∈ (SubGrp‘𝐺) → ((𝑣 + 𝑤)𝐹𝑢) = ((𝑣(+g𝐻)𝑤)𝐹𝑢))
6968eqeq1d 2628 . . . . . . . . 9 (𝑌 ∈ (SubGrp‘𝐺) → (((𝑣 + 𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢)) ↔ ((𝑣(+g𝐻)𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢))))
7020, 69raleqbidv 3146 . . . . . . . 8 (𝑌 ∈ (SubGrp‘𝐺) → (∀𝑤𝑌 ((𝑣 + 𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢)) ↔ ∀𝑤 ∈ (Base‘𝐻)((𝑣(+g𝐻)𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢))))
7120, 70raleqbidv 3146 . . . . . . 7 (𝑌 ∈ (SubGrp‘𝐺) → (∀𝑣𝑌𝑤𝑌 ((𝑣 + 𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢)) ↔ ∀𝑣 ∈ (Base‘𝐻)∀𝑤 ∈ (Base‘𝐻)((𝑣(+g𝐻)𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢))))
7271biimpa 501 . . . . . 6 ((𝑌 ∈ (SubGrp‘𝐺) ∧ ∀𝑣𝑌𝑤𝑌 ((𝑣 + 𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢))) → ∀𝑣 ∈ (Base‘𝐻)∀𝑤 ∈ (Base‘𝐻)((𝑣(+g𝐻)𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢)))
7365, 72syldan 487 . . . . 5 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) → ∀𝑣 ∈ (Base‘𝐻)∀𝑤 ∈ (Base‘𝐻)((𝑣(+g𝐻)𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢)))
7435, 73jca 554 . . . 4 ((𝑌 ∈ (SubGrp‘𝐺) ∧ 𝑢𝑋) → (((0g𝐻)𝐹𝑢) = 𝑢 ∧ ∀𝑣 ∈ (Base‘𝐻)∀𝑤 ∈ (Base‘𝐻)((𝑣(+g𝐻)𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢))))
7574ralrimiva 2965 . . 3 (𝑌 ∈ (SubGrp‘𝐺) → ∀𝑢𝑋 (((0g𝐻)𝐹𝑢) = 𝑢 ∧ ∀𝑣 ∈ (Base‘𝐻)∀𝑤 ∈ (Base‘𝐻)((𝑣(+g𝐻)𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢))))
7623, 75jca 554 . 2 (𝑌 ∈ (SubGrp‘𝐺) → (𝐹:((Base‘𝐻) × 𝑋)⟶𝑋 ∧ ∀𝑢𝑋 (((0g𝐻)𝐹𝑢) = 𝑢 ∧ ∀𝑣 ∈ (Base‘𝐻)∀𝑤 ∈ (Base‘𝐻)((𝑣(+g𝐻)𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢)))))
77 eqid 2626 . . 3 (Base‘𝐻) = (Base‘𝐻)
78 eqid 2626 . . 3 (+g𝐻) = (+g𝐻)
79 eqid 2626 . . 3 (0g𝐻) = (0g𝐻)
8077, 78, 79isga 17640 . 2 (𝐹 ∈ (𝐻 GrpAct 𝑋) ↔ ((𝐻 ∈ Grp ∧ 𝑋 ∈ V) ∧ (𝐹:((Base‘𝐻) × 𝑋)⟶𝑋 ∧ ∀𝑢𝑋 (((0g𝐻)𝐹𝑢) = 𝑢 ∧ ∀𝑣 ∈ (Base‘𝐻)∀𝑤 ∈ (Base‘𝐻)((𝑣(+g𝐻)𝑤)𝐹𝑢) = (𝑣𝐹(𝑤𝐹𝑢))))))
816, 76, 80sylanbrc 697 1 (𝑌 ∈ (SubGrp‘𝐺) → 𝐹 ∈ (𝐻 GrpAct 𝑋))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 384   = wceq 1480  wcel 1992  wral 2912  Vcvv 3191  wss 3560   × cxp 5077  wf 5846  cfv 5850  (class class class)co 6605  cmpt2 6607  Basecbs 15776  s cress 15777  +gcplusg 15857  0gc0g 16016  Grpcgrp 17338  SubGrpcsubg 17504   GrpAct cga 17638
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1841  ax-6 1890  ax-7 1937  ax-8 1994  ax-9 2001  ax-10 2021  ax-11 2036  ax-12 2049  ax-13 2250  ax-ext 2606  ax-sep 4746  ax-nul 4754  ax-pow 4808  ax-pr 4872  ax-un 6903  ax-cnex 9937  ax-resscn 9938  ax-1cn 9939  ax-icn 9940  ax-addcl 9941  ax-addrcl 9942  ax-mulcl 9943  ax-mulrcl 9944  ax-mulcom 9945  ax-addass 9946  ax-mulass 9947  ax-distr 9948  ax-i2m1 9949  ax-1ne0 9950  ax-1rid 9951  ax-rnegex 9952  ax-rrecex 9953  ax-cnre 9954  ax-pre-lttri 9955  ax-pre-lttrn 9956  ax-pre-ltadd 9957  ax-pre-mulgt0 9958
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1883  df-eu 2478  df-mo 2479  df-clab 2613  df-cleq 2619  df-clel 2622  df-nfc 2756  df-ne 2797  df-nel 2900  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3193  df-sbc 3423  df-csb 3520  df-dif 3563  df-un 3565  df-in 3567  df-ss 3574  df-pss 3576  df-nul 3897  df-if 4064  df-pw 4137  df-sn 4154  df-pr 4156  df-tp 4158  df-op 4160  df-uni 4408  df-iun 4492  df-br 4619  df-opab 4679  df-mpt 4680  df-tr 4718  df-eprel 4990  df-id 4994  df-po 5000  df-so 5001  df-fr 5038  df-we 5040  df-xp 5085  df-rel 5086  df-cnv 5087  df-co 5088  df-dm 5089  df-rn 5090  df-res 5091  df-ima 5092  df-pred 5642  df-ord 5688  df-on 5689  df-lim 5690  df-suc 5691  df-iota 5813  df-fun 5852  df-fn 5853  df-f 5854  df-f1 5855  df-fo 5856  df-f1o 5857  df-fv 5858  df-riota 6566  df-ov 6608  df-oprab 6609  df-mpt2 6610  df-om 7014  df-1st 7116  df-2nd 7117  df-wrecs 7353  df-recs 7414  df-rdg 7452  df-er 7688  df-map 7805  df-en 7901  df-dom 7902  df-sdom 7903  df-pnf 10021  df-mnf 10022  df-xr 10023  df-ltxr 10024  df-le 10025  df-sub 10213  df-neg 10214  df-nn 10966  df-2 11024  df-ndx 15779  df-slot 15780  df-base 15781  df-sets 15782  df-ress 15783  df-plusg 15870  df-0g 16018  df-mgm 17158  df-sgrp 17200  df-mnd 17211  df-grp 17341  df-subg 17507  df-ga 17639
This theorem is referenced by:  gaid2  17652
  Copyright terms: Public domain W3C validator