/*
www-ATLAS of Group Representations.
S10 represented as permutations on 10 points.
*/

G<x,y>:=PermutationGroup<10|\[
2,1,3,4,5,6,7,8,9,10]
,\[
1,3,4,5,6,7,8,9,10,2]
>;
print "Group G is S10 < Sym(10)";