/*
www-ATLAS of Group Representations.
3.S6 represented as permutations on 18 points.
*/

G<x,y>:=PermutationGroup<18|\[
1,6,5,10,3,2,7,14,13,4,17,12,9,8,16,15,11,18]
,\[
2,7,8,1,9,6,11,15,16,3,4,5,13,14,17,18,10,12]
>;
print "Group G is 3.S6 < Sym(18)";