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

Theorem symgsssg 18587
Description: The symmetric group has subgroups restricting the set of non-fixed points. (Contributed by Stefan O'Rear, 24-Aug-2015.)
Hypotheses
Ref Expression
symgsssg.g 𝐺 = (SymGrp‘𝐷)
symgsssg.b 𝐵 = (Base‘𝐺)
Assertion
Ref Expression
symgsssg (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋} ∈ (SubGrp‘𝐺))
Distinct variable groups:   𝑥,𝐵   𝑥,𝐺   𝑥,𝑋
Allowed substitution hints:   𝐷(𝑥)   𝑉(𝑥)

Proof of Theorem symgsssg
Dummy variables 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqidd 2820 . 2 (𝐷𝑉 → (𝐺s {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋}) = (𝐺s {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋}))
2 eqidd 2820 . 2 (𝐷𝑉 → (0g𝐺) = (0g𝐺))
3 eqidd 2820 . 2 (𝐷𝑉 → (+g𝐺) = (+g𝐺))
4 ssrab2 4054 . . . 4 {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋} ⊆ 𝐵
5 symgsssg.b . . . 4 𝐵 = (Base‘𝐺)
64, 5sseqtri 4001 . . 3 {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋} ⊆ (Base‘𝐺)
76a1i 11 . 2 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋} ⊆ (Base‘𝐺))
8 difeq1 4090 . . . . 5 (𝑥 = (0g𝐺) → (𝑥 ∖ I ) = ((0g𝐺) ∖ I ))
98dmeqd 5767 . . . 4 (𝑥 = (0g𝐺) → dom (𝑥 ∖ I ) = dom ((0g𝐺) ∖ I ))
109sseq1d 3996 . . 3 (𝑥 = (0g𝐺) → (dom (𝑥 ∖ I ) ⊆ 𝑋 ↔ dom ((0g𝐺) ∖ I ) ⊆ 𝑋))
11 symgsssg.g . . . . 5 𝐺 = (SymGrp‘𝐷)
1211symggrp 18520 . . . 4 (𝐷𝑉𝐺 ∈ Grp)
13 eqid 2819 . . . . 5 (0g𝐺) = (0g𝐺)
145, 13grpidcl 18123 . . . 4 (𝐺 ∈ Grp → (0g𝐺) ∈ 𝐵)
1512, 14syl 17 . . 3 (𝐷𝑉 → (0g𝐺) ∈ 𝐵)
1611symgid 18521 . . . . . 6 (𝐷𝑉 → ( I ↾ 𝐷) = (0g𝐺))
1716difeq1d 4096 . . . . 5 (𝐷𝑉 → (( I ↾ 𝐷) ∖ I ) = ((0g𝐺) ∖ I ))
1817dmeqd 5767 . . . 4 (𝐷𝑉 → dom (( I ↾ 𝐷) ∖ I ) = dom ((0g𝐺) ∖ I ))
19 resss 5871 . . . . . . . 8 ( I ↾ 𝐷) ⊆ I
20 ssdif0 4321 . . . . . . . 8 (( I ↾ 𝐷) ⊆ I ↔ (( I ↾ 𝐷) ∖ I ) = ∅)
2119, 20mpbi 232 . . . . . . 7 (( I ↾ 𝐷) ∖ I ) = ∅
2221dmeqi 5766 . . . . . 6 dom (( I ↾ 𝐷) ∖ I ) = dom ∅
23 dm0 5783 . . . . . 6 dom ∅ = ∅
2422, 23eqtri 2842 . . . . 5 dom (( I ↾ 𝐷) ∖ I ) = ∅
25 0ss 4348 . . . . 5 ∅ ⊆ 𝑋
2624, 25eqsstri 3999 . . . 4 dom (( I ↾ 𝐷) ∖ I ) ⊆ 𝑋
2718, 26eqsstrrdi 4020 . . 3 (𝐷𝑉 → dom ((0g𝐺) ∖ I ) ⊆ 𝑋)
2810, 15, 27elrabd 3680 . 2 (𝐷𝑉 → (0g𝐺) ∈ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋})
29 biid 263 . . 3 (𝐷𝑉𝐷𝑉)
30 difeq1 4090 . . . . . 6 (𝑥 = 𝑦 → (𝑥 ∖ I ) = (𝑦 ∖ I ))
3130dmeqd 5767 . . . . 5 (𝑥 = 𝑦 → dom (𝑥 ∖ I ) = dom (𝑦 ∖ I ))
3231sseq1d 3996 . . . 4 (𝑥 = 𝑦 → (dom (𝑥 ∖ I ) ⊆ 𝑋 ↔ dom (𝑦 ∖ I ) ⊆ 𝑋))
3332elrab 3678 . . 3 (𝑦 ∈ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋} ↔ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋))
34 difeq1 4090 . . . . . 6 (𝑥 = 𝑧 → (𝑥 ∖ I ) = (𝑧 ∖ I ))
3534dmeqd 5767 . . . . 5 (𝑥 = 𝑧 → dom (𝑥 ∖ I ) = dom (𝑧 ∖ I ))
3635sseq1d 3996 . . . 4 (𝑥 = 𝑧 → (dom (𝑥 ∖ I ) ⊆ 𝑋 ↔ dom (𝑧 ∖ I ) ⊆ 𝑋))
3736elrab 3678 . . 3 (𝑧 ∈ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋} ↔ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋))
38 difeq1 4090 . . . . . 6 (𝑥 = (𝑦(+g𝐺)𝑧) → (𝑥 ∖ I ) = ((𝑦(+g𝐺)𝑧) ∖ I ))
3938dmeqd 5767 . . . . 5 (𝑥 = (𝑦(+g𝐺)𝑧) → dom (𝑥 ∖ I ) = dom ((𝑦(+g𝐺)𝑧) ∖ I ))
4039sseq1d 3996 . . . 4 (𝑥 = (𝑦(+g𝐺)𝑧) → (dom (𝑥 ∖ I ) ⊆ 𝑋 ↔ dom ((𝑦(+g𝐺)𝑧) ∖ I ) ⊆ 𝑋))
41123ad2ant1 1128 . . . . 5 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → 𝐺 ∈ Grp)
42 simp2l 1194 . . . . 5 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → 𝑦𝐵)
43 simp3l 1196 . . . . 5 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → 𝑧𝐵)
44 eqid 2819 . . . . . 6 (+g𝐺) = (+g𝐺)
455, 44grpcl 18103 . . . . 5 ((𝐺 ∈ Grp ∧ 𝑦𝐵𝑧𝐵) → (𝑦(+g𝐺)𝑧) ∈ 𝐵)
4641, 42, 43, 45syl3anc 1366 . . . 4 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → (𝑦(+g𝐺)𝑧) ∈ 𝐵)
4711, 5, 44symgov 18504 . . . . . . . 8 ((𝑦𝐵𝑧𝐵) → (𝑦(+g𝐺)𝑧) = (𝑦𝑧))
4842, 43, 47syl2anc 586 . . . . . . 7 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → (𝑦(+g𝐺)𝑧) = (𝑦𝑧))
4948difeq1d 4096 . . . . . 6 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → ((𝑦(+g𝐺)𝑧) ∖ I ) = ((𝑦𝑧) ∖ I ))
5049dmeqd 5767 . . . . 5 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → dom ((𝑦(+g𝐺)𝑧) ∖ I ) = dom ((𝑦𝑧) ∖ I ))
51 mvdco 18565 . . . . . 6 dom ((𝑦𝑧) ∖ I ) ⊆ (dom (𝑦 ∖ I ) ∪ dom (𝑧 ∖ I ))
52 simp2r 1195 . . . . . . 7 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → dom (𝑦 ∖ I ) ⊆ 𝑋)
53 simp3r 1197 . . . . . . 7 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → dom (𝑧 ∖ I ) ⊆ 𝑋)
5452, 53unssd 4160 . . . . . 6 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → (dom (𝑦 ∖ I ) ∪ dom (𝑧 ∖ I )) ⊆ 𝑋)
5551, 54sstrid 3976 . . . . 5 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → dom ((𝑦𝑧) ∖ I ) ⊆ 𝑋)
5650, 55eqsstrd 4003 . . . 4 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → dom ((𝑦(+g𝐺)𝑧) ∖ I ) ⊆ 𝑋)
5740, 46, 56elrabd 3680 . . 3 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋) ∧ (𝑧𝐵 ∧ dom (𝑧 ∖ I ) ⊆ 𝑋)) → (𝑦(+g𝐺)𝑧) ∈ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋})
5829, 33, 37, 57syl3anb 1156 . 2 ((𝐷𝑉𝑦 ∈ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋} ∧ 𝑧 ∈ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋}) → (𝑦(+g𝐺)𝑧) ∈ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋})
59 difeq1 4090 . . . . . 6 (𝑥 = ((invg𝐺)‘𝑦) → (𝑥 ∖ I ) = (((invg𝐺)‘𝑦) ∖ I ))
6059dmeqd 5767 . . . . 5 (𝑥 = ((invg𝐺)‘𝑦) → dom (𝑥 ∖ I ) = dom (((invg𝐺)‘𝑦) ∖ I ))
6160sseq1d 3996 . . . 4 (𝑥 = ((invg𝐺)‘𝑦) → (dom (𝑥 ∖ I ) ⊆ 𝑋 ↔ dom (((invg𝐺)‘𝑦) ∖ I ) ⊆ 𝑋))
62 simprl 769 . . . . 5 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → 𝑦𝐵)
63 eqid 2819 . . . . . 6 (invg𝐺) = (invg𝐺)
645, 63grpinvcl 18143 . . . . 5 ((𝐺 ∈ Grp ∧ 𝑦𝐵) → ((invg𝐺)‘𝑦) ∈ 𝐵)
6512, 62, 64syl2an2r 683 . . . 4 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → ((invg𝐺)‘𝑦) ∈ 𝐵)
6611, 5, 63symginv 18522 . . . . . . . . 9 (𝑦𝐵 → ((invg𝐺)‘𝑦) = 𝑦)
6766ad2antrl 726 . . . . . . . 8 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → ((invg𝐺)‘𝑦) = 𝑦)
6867difeq1d 4096 . . . . . . 7 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → (((invg𝐺)‘𝑦) ∖ I ) = (𝑦 ∖ I ))
6968dmeqd 5767 . . . . . 6 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → dom (((invg𝐺)‘𝑦) ∖ I ) = dom (𝑦 ∖ I ))
7011, 5symgbasf1o 18495 . . . . . . . 8 (𝑦𝐵𝑦:𝐷1-1-onto𝐷)
7170ad2antrl 726 . . . . . . 7 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → 𝑦:𝐷1-1-onto𝐷)
72 f1omvdcnv 18564 . . . . . . 7 (𝑦:𝐷1-1-onto𝐷 → dom (𝑦 ∖ I ) = dom (𝑦 ∖ I ))
7371, 72syl 17 . . . . . 6 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → dom (𝑦 ∖ I ) = dom (𝑦 ∖ I ))
7469, 73eqtrd 2854 . . . . 5 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → dom (((invg𝐺)‘𝑦) ∖ I ) = dom (𝑦 ∖ I ))
75 simprr 771 . . . . 5 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → dom (𝑦 ∖ I ) ⊆ 𝑋)
7674, 75eqsstrd 4003 . . . 4 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → dom (((invg𝐺)‘𝑦) ∖ I ) ⊆ 𝑋)
7761, 65, 76elrabd 3680 . . 3 ((𝐷𝑉 ∧ (𝑦𝐵 ∧ dom (𝑦 ∖ I ) ⊆ 𝑋)) → ((invg𝐺)‘𝑦) ∈ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋})
7833, 77sylan2b 595 . 2 ((𝐷𝑉𝑦 ∈ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋}) → ((invg𝐺)‘𝑦) ∈ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋})
791, 2, 3, 7, 28, 58, 78, 12issubgrpd2 18287 1 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ⊆ 𝑋} ∈ (SubGrp‘𝐺))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 398  w3a 1082   = wceq 1531  wcel 2108  {crab 3140  cdif 3931  cun 3932  wss 3934  c0 4289   I cid 5452  ccnv 5547  dom cdm 5548  cres 5550  ccom 5552  1-1-ontowf1o 6347  cfv 6348  (class class class)co 7148  Basecbs 16475  s cress 16476  +gcplusg 16557  0gc0g 16705  Grpcgrp 18095  invgcminusg 18096  SubGrpcsubg 18265  SymGrpcsymg 18487
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1905  ax-6 1964  ax-7 2009  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2154  ax-12 2170  ax-ext 2791  ax-rep 5181  ax-sep 5194  ax-nul 5201  ax-pow 5257  ax-pr 5320  ax-un 7453  ax-cnex 10585  ax-resscn 10586  ax-1cn 10587  ax-icn 10588  ax-addcl 10589  ax-addrcl 10590  ax-mulcl 10591  ax-mulrcl 10592  ax-mulcom 10593  ax-addass 10594  ax-mulass 10595  ax-distr 10596  ax-i2m1 10597  ax-1ne0 10598  ax-1rid 10599  ax-rnegex 10600  ax-rrecex 10601  ax-cnre 10602  ax-pre-lttri 10603  ax-pre-lttrn 10604  ax-pre-ltadd 10605  ax-pre-mulgt0 10606
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1083  df-3an 1084  df-tru 1534  df-ex 1775  df-nf 1779  df-sb 2064  df-mo 2616  df-eu 2648  df-clab 2798  df-cleq 2812  df-clel 2891  df-nfc 2961  df-ne 3015  df-nel 3122  df-ral 3141  df-rex 3142  df-reu 3143  df-rmo 3144  df-rab 3145  df-v 3495  df-sbc 3771  df-csb 3882  df-dif 3937  df-un 3939  df-in 3941  df-ss 3950  df-pss 3952  df-nul 4290  df-if 4466  df-pw 4539  df-sn 4560  df-pr 4562  df-tp 4564  df-op 4566  df-uni 4831  df-int 4868  df-iun 4912  df-br 5058  df-opab 5120  df-mpt 5138  df-tr 5164  df-id 5453  df-eprel 5458  df-po 5467  df-so 5468  df-fr 5507  df-we 5509  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-pred 6141  df-ord 6187  df-on 6188  df-lim 6189  df-suc 6190  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356  df-riota 7106  df-ov 7151  df-oprab 7152  df-mpo 7153  df-om 7573  df-1st 7681  df-2nd 7682  df-wrecs 7939  df-recs 8000  df-rdg 8038  df-1o 8094  df-oadd 8098  df-er 8281  df-map 8400  df-en 8502  df-dom 8503  df-sdom 8504  df-fin 8505  df-pnf 10669  df-mnf 10670  df-xr 10671  df-ltxr 10672  df-le 10673  df-sub 10864  df-neg 10865  df-nn 11631  df-2 11692  df-3 11693  df-4 11694  df-5 11695  df-6 11696  df-7 11697  df-8 11698  df-9 11699  df-n0 11890  df-z 11974  df-uz 12236  df-fz 12885  df-struct 16477  df-ndx 16478  df-slot 16479  df-base 16481  df-sets 16482  df-ress 16483  df-plusg 16570  df-tset 16576  df-0g 16707  df-mgm 17844  df-sgrp 17893  df-mnd 17904  df-submnd 17949  df-efmnd 18026  df-grp 18098  df-minusg 18099  df-subg 18268  df-symg 18488
This theorem is referenced by:  psgnunilem5  18614
  Copyright terms: Public domain W3C validator