/* www-ATLAS of Group Representations. S20 represented as permutations on 20 points. */ G:=PermutationGroup<20|\[ 2,1,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20] ,\[ 1,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,2] >; print "Group G is S20 < Sym(20)";