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

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