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

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