/*
www-ATLAS of Group Representations.
S7 represented as permutations on 30 points.
*/

G<x,y>:=PermutationGroup<30|\[
2,1,6,7,8,3,4,5,15,16,17,18,19,20,9,10,11,12,13,14,28,27,25,26,23,
24,22,21,30,29]
,\[
3,4,1,7,2,10,12,13,5,14,6,9,11,8,21,23,18,25,26,27,17,15,28,16,22,
19,20,30,24,29]
>;
print "Group G is S7 < Sym(30)";