/* www-ATLAS of Group Representations. S5 represented as permutations on 10 points. */ G:=PermutationGroup<10|\[ 2,1,3,6,5,4,8,7,9,10] ,\[ 3,4,5,7,8,9,10,1,6,2] >; print "Group G is S5 < Sym(10)";