Transpositions_of_Adjacent_Elements_generate_Symmetric_Group
Provedgeneratorsgroup-theoryproofwikisymmetric-groupstranspositions
Let . Let denote the symmetric group on letters. Then the transpositions for are a set of generators for . They satisfy the relations {{eqn | l = a_k^2 | r = e | c = (for ) }} {{eqn | l = \paren {a_k a_{k + 1} }^3 | r = e | c = (for ) }} {{eqn | l = \paren {a_i a_j}^2 | r = e | c = (for ) }}
Preamble
import Mathlib.Analysis.Complex.Basic
Formal statement
theorem Transpositions_of_Adjacent_Elements_generate_Symmetric_Group (n : ℕ) (hn : 1 < n) : Subgroup.closure {σ : Equiv.Perm (Fin n) | ∃ (i : Fin n) (j : Fin n), σ = Equiv.swap i j ∧ j.val = i.val + 1} = ⊤ := by sorrySource