Metamath Proof Explorer


Theorem symgfisg

Description: The symmetric group has a subgroup of permutations that move finitely many points. (Contributed by Stefan O'Rear, 24-Aug-2015)

Ref Expression
Hypotheses symgsssg.g ⊢ G = SymGrp ⁡ D
symgsssg.b ⊢ B = Base G
Assertion symgfisg ⊢ D ∈ V → x ∈ B | dom ⁡ x ∖ I ∈ Fin ∈ SubGrp ⁡ G

Proof

Step Hyp Ref Expression
1 symgsssg.g ⊢ G = SymGrp ⁡ D
2 symgsssg.b ⊢ B = Base G
3 eqidd ⊢ D ∈ V → G ↾ 𝑠 x ∈ B | dom ⁡ x ∖ I ∈ Fin = G ↾ 𝑠 x ∈ B | dom ⁡ x ∖ I ∈ Fin
4 eqidd ⊢ D ∈ V → 0 G = 0 G
5 eqidd ⊢ D ∈ V → + G = + G
6 ssrab2 ⊢ x ∈ B | dom ⁡ x ∖ I ∈ Fin ⊆ B
7 6 2 sseqtri ⊢ x ∈ B | dom ⁡ x ∖ I ∈ Fin ⊆ Base G
8 7 a1i ⊢ D ∈ V → x ∈ B | dom ⁡ x ∖ I ∈ Fin ⊆ Base G
9 difeq1 ⊢ x = 0 G → x ∖ I = 0 G ∖ I
10 9 dmeqd ⊢ x = 0 G → dom ⁡ x ∖ I = dom ⁡ 0 G ∖ I
11 10 eleq1d ⊢ x = 0 G → dom ⁡ x ∖ I ∈ Fin ↔ dom ⁡ 0 G ∖ I ∈ Fin
12 1 symggrp ⊢ D ∈ V → G ∈ Grp
13 eqid ⊢ 0 G = 0 G
14 2 13 grpidcl ⊢ G ∈ Grp → 0 G ∈ B
15 12 14 syl ⊢ D ∈ V → 0 G ∈ B
16 1 symgid ⊢ D ∈ V → I ↾ D = 0 G
17 16 difeq1d ⊢ D ∈ V → I ↾ D ∖ I = 0 G ∖ I
18 17 dmeqd ⊢ D ∈ V → dom ⁡ I ↾ D ∖ I = dom ⁡ 0 G ∖ I
19 resss ⊢ I ↾ D ⊆ I
20 ssdif0 ⊢ I ↾ D ⊆ I ↔ I ↾ D ∖ I = ∅
21 19 20 mpbi ⊢ I ↾ D ∖ I = ∅
22 21 dmeqi ⊢ dom ⁡ I ↾ D ∖ I = dom ⁡ ∅
23 dm0 ⊢ dom ⁡ ∅ = ∅
24 22 23 eqtri ⊢ dom ⁡ I ↾ D ∖ I = ∅
25 0fi ⊢ ∅ ∈ Fin
26 24 25 eqeltri ⊢ dom ⁡ I ↾ D ∖ I ∈ Fin
27 18 26 eqeltrrdi ⊢ D ∈ V → dom ⁡ 0 G ∖ I ∈ Fin
28 11 15 27 elrabd ⊢ D ∈ V → 0 G ∈ x ∈ B | dom ⁡ x ∖ I ∈ Fin
29 biid ⊢ D ∈ V ↔ D ∈ V
30 difeq1 ⊢ x = y → x ∖ I = y ∖ I
31 30 dmeqd ⊢ x = y → dom ⁡ x ∖ I = dom ⁡ y ∖ I
32 31 eleq1d ⊢ x = y → dom ⁡ x ∖ I ∈ Fin ↔ dom ⁡ y ∖ I ∈ Fin
33 32 elrab ⊢ y ∈ x ∈ B | dom ⁡ x ∖ I ∈ Fin ↔ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin
34 difeq1 ⊢ x = z → x ∖ I = z ∖ I
35 34 dmeqd ⊢ x = z → dom ⁡ x ∖ I = dom ⁡ z ∖ I
36 35 eleq1d ⊢ x = z → dom ⁡ x ∖ I ∈ Fin ↔ dom ⁡ z ∖ I ∈ Fin
37 36 elrab ⊢ z ∈ x ∈ B | dom ⁡ x ∖ I ∈ Fin ↔ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin
38 difeq1 ⊢ x = y + G z → x ∖ I = y + G z ∖ I
39 38 dmeqd ⊢ x = y + G z → dom ⁡ x ∖ I = dom ⁡ y + G z ∖ I
40 39 eleq1d ⊢ x = y + G z → dom ⁡ x ∖ I ∈ Fin ↔ dom ⁡ y + G z ∖ I ∈ Fin
41 12 3ad2ant1 ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → G ∈ Grp
42 simp2l ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → y ∈ B
43 simp3l ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → z ∈ B
44 eqid ⊢ + G = + G
45 2 44 grpcl ⊢ G ∈ Grp ∧ y ∈ B ∧ z ∈ B → y + G z ∈ B
46 41 42 43 45 syl3anc ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → y + G z ∈ B
47 1 2 44 symgov ⊢ y ∈ B ∧ z ∈ B → y + G z = y ∘ z
48 42 43 47 syl2anc ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → y + G z = y ∘ z
49 48 difeq1d ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → y + G z ∖ I = y ∘ z ∖ I
50 49 dmeqd ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → dom ⁡ y + G z ∖ I = dom ⁡ y ∘ z ∖ I
51 simp2r ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → dom ⁡ y ∖ I ∈ Fin
52 simp3r ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → dom ⁡ z ∖ I ∈ Fin
53 unfi ⊢ dom ⁡ y ∖ I ∈ Fin ∧ dom ⁡ z ∖ I ∈ Fin → dom ⁡ y ∖ I ∪ dom ⁡ z ∖ I ∈ Fin
54 51 52 53 syl2anc ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → dom ⁡ y ∖ I ∪ dom ⁡ z ∖ I ∈ Fin
55 mvdco ⊢ dom ⁡ y ∘ z ∖ I ⊆ dom ⁡ y ∖ I ∪ dom ⁡ z ∖ I
56 ssfi ⊢ dom ⁡ y ∖ I ∪ dom ⁡ z ∖ I ∈ Fin ∧ dom ⁡ y ∘ z ∖ I ⊆ dom ⁡ y ∖ I ∪ dom ⁡ z ∖ I → dom ⁡ y ∘ z ∖ I ∈ Fin
57 54 55 56 sylancl ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → dom ⁡ y ∘ z ∖ I ∈ Fin
58 50 57 eqeltrd ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → dom ⁡ y + G z ∖ I ∈ Fin
59 40 46 58 elrabd ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin ∧ z ∈ B ∧ dom ⁡ z ∖ I ∈ Fin → y + G z ∈ x ∈ B | dom ⁡ x ∖ I ∈ Fin
60 29 33 37 59 syl3anb ⊢ D ∈ V ∧ y ∈ x ∈ B | dom ⁡ x ∖ I ∈ Fin ∧ z ∈ x ∈ B | dom ⁡ x ∖ I ∈ Fin → y + G z ∈ x ∈ B | dom ⁡ x ∖ I ∈ Fin
61 difeq1 ⊢ x = inv g ⁡ G ⁡ y → x ∖ I = inv g ⁡ G ⁡ y ∖ I
62 61 dmeqd ⊢ x = inv g ⁡ G ⁡ y → dom ⁡ x ∖ I = dom ⁡ inv g ⁡ G ⁡ y ∖ I
63 62 eleq1d ⊢ x = inv g ⁡ G ⁡ y → dom ⁡ x ∖ I ∈ Fin ↔ dom ⁡ inv g ⁡ G ⁡ y ∖ I ∈ Fin
64 simprl ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → y ∈ B
65 eqid ⊢ inv g ⁡ G = inv g ⁡ G
66 2 65 grpinvcl ⊢ G ∈ Grp ∧ y ∈ B → inv g ⁡ G ⁡ y ∈ B
67 12 64 66 syl2an2r ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → inv g ⁡ G ⁡ y ∈ B
68 1 2 65 symginv ⊢ y ∈ B → inv g ⁡ G ⁡ y = y -1
69 68 ad2antrl ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → inv g ⁡ G ⁡ y = y -1
70 69 difeq1d ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → inv g ⁡ G ⁡ y ∖ I = y -1 ∖ I
71 70 dmeqd ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → dom ⁡ inv g ⁡ G ⁡ y ∖ I = dom ⁡ y -1 ∖ I
72 1 2 symgbasf1o ⊢ y ∈ B → y : D ⟶ 1-1 onto D
73 72 ad2antrl ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → y : D ⟶ 1-1 onto D
74 f1omvdcnv ⊢ y : D ⟶ 1-1 onto D → dom ⁡ y -1 ∖ I = dom ⁡ y ∖ I
75 73 74 syl ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → dom ⁡ y -1 ∖ I = dom ⁡ y ∖ I
76 71 75 eqtrd ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → dom ⁡ inv g ⁡ G ⁡ y ∖ I = dom ⁡ y ∖ I
77 simprr ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → dom ⁡ y ∖ I ∈ Fin
78 76 77 eqeltrd ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → dom ⁡ inv g ⁡ G ⁡ y ∖ I ∈ Fin
79 63 67 78 elrabd ⊢ D ∈ V ∧ y ∈ B ∧ dom ⁡ y ∖ I ∈ Fin → inv g ⁡ G ⁡ y ∈ x ∈ B | dom ⁡ x ∖ I ∈ Fin
80 33 79 sylan2b ⊢ D ∈ V ∧ y ∈ x ∈ B | dom ⁡ x ∖ I ∈ Fin → inv g ⁡ G ⁡ y ∈ x ∈ B | dom ⁡ x ∖ I ∈ Fin
81 3 4 5 8 28 60 80 12 issubgrpd2 ⊢ D ∈ V → x ∈ B | dom ⁡ x ∖ I ∈ Fin ∈ SubGrp ⁡ G