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