Metamath Proof Explorer


Theorem cyc3genpm

Description: The alternating group A is generated by 3-cycles. Property (a) of Lang p. 32 . (Contributed by Thierry Arnoux, 27-Sep-2023)

Ref Expression
Hypotheses cyc3genpm.t C = M . -1 3
cyc3genpm.a A = pmEven D
cyc3genpm.s S = SymGrp D
cyc3genpm.n N = D
cyc3genpm.m M = toCyc D
Assertion cyc3genpm D Fin Q A w Word C Q = S w

Proof

Step Hyp Ref Expression
1 cyc3genpm.t C = M . -1 3
2 cyc3genpm.a A = pmEven D
3 cyc3genpm.s S = SymGrp D
4 cyc3genpm.n N = D
5 cyc3genpm.m M = toCyc D
6 simplr D Fin Q A v Word ran pmTrsp D Q = S v v Word ran pmTrsp D
7 lencl v Word ran pmTrsp D v 0
8 7 ad2antlr D Fin Q A v Word ran pmTrsp D Q = S v v 0
9 8 nn0zd D Fin Q A v Word ran pmTrsp D Q = S v v
10 simpr D Fin Q A v Word ran pmTrsp D Q = S v Q = S v
11 10 fveq2d D Fin Q A v Word ran pmTrsp D Q = S v pmSgn D Q = pmSgn D S v
12 simplll D Fin Q A v Word ran pmTrsp D Q = S v D Fin
13 simpllr D Fin Q A v Word ran pmTrsp D Q = S v Q A
14 13 2 eleqtrdi D Fin Q A v Word ran pmTrsp D Q = S v Q pmEven D
15 eqid Base S = Base S
16 eqid pmSgn D = pmSgn D
17 3 15 16 psgnevpm D Fin Q pmEven D pmSgn D Q = 1
18 12 14 17 syl2anc D Fin Q A v Word ran pmTrsp D Q = S v pmSgn D Q = 1
19 eqid ran pmTrsp D = ran pmTrsp D
20 3 19 16 psgnvalii D Fin v Word ran pmTrsp D pmSgn D S v = 1 v
21 12 6 20 syl2anc D Fin Q A v Word ran pmTrsp D Q = S v pmSgn D S v = 1 v
22 11 18 21 3eqtr3rd D Fin Q A v Word ran pmTrsp D Q = S v 1 v = 1
23 m1exp1 v 1 v = 1 2 v
24 23 biimpa v 1 v = 1 2 v
25 9 22 24 syl2anc D Fin Q A v Word ran pmTrsp D Q = S v 2 v
26 oveq2 x = S x = S
27 26 eqeq1d x = S x = S w S = S w
28 27 rexbidv x = w Word C S x = S w w Word C S = S w
29 28 imbi2d x = D Fin w Word C S x = S w D Fin w Word C S = S w
30 oveq2 x = u S x = S u
31 30 eqeq1d x = u S x = S w S u = S w
32 31 rexbidv x = u w Word C S x = S w w Word C S u = S w
33 32 imbi2d x = u D Fin w Word C S x = S w D Fin w Word C S u = S w
34 oveq2 x = u ++ ⟨“ ij ”⟩ S x = S u ++ ⟨“ ij ”⟩
35 34 eqeq1d x = u ++ ⟨“ ij ”⟩ S x = S w S u ++ ⟨“ ij ”⟩ = S w
36 35 rexbidv x = u ++ ⟨“ ij ”⟩ w Word C S x = S w w Word C S u ++ ⟨“ ij ”⟩ = S w
37 36 imbi2d x = u ++ ⟨“ ij ”⟩ D Fin w Word C S x = S w D Fin w Word C S u ++ ⟨“ ij ”⟩ = S w
38 oveq2 x = v S x = S v
39 38 eqeq1d x = v S x = S w S v = S w
40 39 rexbidv x = v w Word C S x = S w w Word C S v = S w
41 40 imbi2d x = v D Fin w Word C S x = S w D Fin w Word C S v = S w
42 wrd0 Word C
43 42 a1i D Fin Word C
44 simpr D Fin w = w =
45 44 oveq2d D Fin w = S w = S
46 45 eqeq2d D Fin w = S = S w S = S
47 eqidd D Fin S = S
48 43 46 47 rspcedvd D Fin w Word C S = S w
49 ccatcl v Word C c Word C v ++ c Word C
50 49 ad5ant24 u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c v ++ c Word C
51 oveq2 w = v ++ c S w = S v ++ c
52 51 eqeq2d w = v ++ c S u ++ ⟨“ ij ”⟩ = S w S u ++ ⟨“ ij ”⟩ = S v ++ c
53 52 adantl u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c w = v ++ c S u ++ ⟨“ ij ”⟩ = S w S u ++ ⟨“ ij ”⟩ = S v ++ c
54 simpllr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c S u = S v
55 simpllr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v D Fin
56 55 ad2antrr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c D Fin
57 3 symggrp D Fin S Grp
58 grpmnd S Grp S Mnd
59 56 57 58 3syl u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c S Mnd
60 19 3 15 symgtrf ran pmTrsp D Base S
61 60 a1i u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c ran pmTrsp D Base S
62 simp-5r u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v i ran pmTrsp D
63 62 ad2antrr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c i ran pmTrsp D
64 61 63 sseldd u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c i Base S
65 simp-6r u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c j ran pmTrsp D
66 61 65 sseldd u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c j Base S
67 eqid + S = + S
68 15 67 gsumws2 S Mnd i Base S j Base S S ⟨“ ij ”⟩ = i + S j
69 59 64 66 68 syl3anc u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c S ⟨“ ij ”⟩ = i + S j
70 simpr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c i + S j = S c
71 69 70 eqtrd u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c S ⟨“ ij ”⟩ = S c
72 54 71 oveq12d u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c S u + S S ⟨“ ij ”⟩ = S v + S S c
73 sswrd ran pmTrsp D Base S Word ran pmTrsp D Word Base S
74 61 73 syl u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c Word ran pmTrsp D Word Base S
75 simp-7l u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c u Word ran pmTrsp D
76 74 75 sseldd u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c u Word Base S
77 64 66 s2cld u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c ⟨“ ij ”⟩ Word Base S
78 15 67 gsumccat S Mnd u Word Base S ⟨“ ij ”⟩ Word Base S S u ++ ⟨“ ij ”⟩ = S u + S S ⟨“ ij ”⟩
79 59 76 77 78 syl3anc u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c S u ++ ⟨“ ij ”⟩ = S u + S S ⟨“ ij ”⟩
80 5 imaeq1i M . -1 3 = toCyc D . -1 3
81 1 80 eqtri C = toCyc D . -1 3
82 81 2 cyc3evpm D Fin C A
83 3 15 evpmss pmEven D Base S
84 2 83 eqsstri A Base S
85 82 84 sstrdi D Fin C Base S
86 sswrd C Base S Word C Word Base S
87 56 85 86 3syl u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c Word C Word Base S
88 simp-4r u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c v Word C
89 87 88 sseldd u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c v Word Base S
90 simplr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c c Word C
91 87 90 sseldd u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c c Word Base S
92 15 67 gsumccat S Mnd v Word Base S c Word Base S S v ++ c = S v + S S c
93 59 89 91 92 syl3anc u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c S v ++ c = S v + S S c
94 72 79 93 3eqtr4d u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c S u ++ ⟨“ ij ”⟩ = S v ++ c
95 50 53 94 rspcedvd u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c w Word C S u ++ ⟨“ ij ”⟩ = S w
96 simp-6r u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ e D
97 simp-5r u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ f D
98 simpllr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ g D
99 simplr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ h D
100 simp-4r u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ e f i = M ⟨“ ef ”⟩
101 100 simprd u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ i = M ⟨“ ef ”⟩
102 simprr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ j = M ⟨“ gh ”⟩
103 55 ad6antr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ D Fin
104 100 simpld u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ e f
105 simprl u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ g h
106 1 2 3 4 5 67 96 97 98 99 101 102 103 104 105 cyc3genpmlem u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩ c Word C i + S j = S c
107 simp-6r u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ D Fin
108 simp-7r u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ j ran pmTrsp D
109 19 5 trsp2cyc D Fin j ran pmTrsp D g D h D g h j = M ⟨“ gh ”⟩
110 107 108 109 syl2anc u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ g D h D g h j = M ⟨“ gh ”⟩
111 106 110 r19.29vva u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩ c Word C i + S j = S c
112 19 5 trsp2cyc D Fin i ran pmTrsp D e D f D e f i = M ⟨“ ef ”⟩
113 55 62 112 syl2anc u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v e D f D e f i = M ⟨“ ef ”⟩
114 111 113 r19.29vva u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v c Word C i + S j = S c
115 95 114 r19.29a u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin v Word C S u = S v w Word C S u ++ ⟨“ ij ”⟩ = S w
116 115 adantl3r u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin w Word C S u = S w D Fin v Word C S u = S v w Word C S u ++ ⟨“ ij ”⟩ = S w
117 simpr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin w Word C S u = S w D Fin D Fin
118 simplr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin w Word C S u = S w D Fin D Fin w Word C S u = S w
119 117 118 mpd u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin w Word C S u = S w D Fin w Word C S u = S w
120 oveq2 v = w S v = S w
121 120 eqeq2d v = w S u = S v S u = S w
122 121 cbvrexvw v Word C S u = S v w Word C S u = S w
123 119 122 sylibr u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin w Word C S u = S w D Fin v Word C S u = S v
124 116 123 r19.29a u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin w Word C S u = S w D Fin w Word C S u ++ ⟨“ ij ”⟩ = S w
125 124 ex u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin w Word C S u = S w D Fin w Word C S u ++ ⟨“ ij ”⟩ = S w
126 125 ex3 u Word ran pmTrsp D i ran pmTrsp D j ran pmTrsp D D Fin w Word C S u = S w D Fin w Word C S u ++ ⟨“ ij ”⟩ = S w
127 29 33 37 41 48 126 wrdt2ind v Word ran pmTrsp D 2 v D Fin w Word C S v = S w
128 127 imp v Word ran pmTrsp D 2 v D Fin w Word C S v = S w
129 6 25 12 128 syl21anc D Fin Q A v Word ran pmTrsp D Q = S v w Word C S v = S w
130 10 eqeq1d D Fin Q A v Word ran pmTrsp D Q = S v Q = S w S v = S w
131 130 rexbidv D Fin Q A v Word ran pmTrsp D Q = S v w Word C Q = S w w Word C S v = S w
132 129 131 mpbird D Fin Q A v Word ran pmTrsp D Q = S v w Word C Q = S w
133 84 sseli Q A Q Base S
134 3 15 19 psgnfitr D Fin Q Base S v Word ran pmTrsp D Q = S v
135 134 biimpa D Fin Q Base S v Word ran pmTrsp D Q = S v
136 133 135 sylan2 D Fin Q A v Word ran pmTrsp D Q = S v
137 132 136 r19.29a D Fin Q A w Word C Q = S w
138 simpr D Fin w Word C Q = S w Q = S w
139 3 altgnsg D Fin pmEven D NrmSGrp S
140 2 139 eqeltrid D Fin A NrmSGrp S
141 nsgsubg A NrmSGrp S A SubGrp S
142 subgsubm A SubGrp S A SubMnd S
143 140 141 142 3syl D Fin A SubMnd S
144 143 adantr D Fin w Word C A SubMnd S
145 sswrd C A Word C Word A
146 82 145 syl D Fin Word C Word A
147 146 sselda D Fin w Word C w Word A
148 gsumwsubmcl A SubMnd S w Word A S w A
149 144 147 148 syl2anc D Fin w Word C S w A
150 149 adantr D Fin w Word C Q = S w S w A
151 138 150 eqeltrd D Fin w Word C Q = S w Q A
152 151 r19.29an D Fin w Word C Q = S w Q A
153 137 152 impbida D Fin Q A w Word C Q = S w