/*
www-ATLAS of Group Representations.
3.A7 represented as permutations on 45 points.
*/

G<x,y>:=PermutationGroup<45|\[
2,4,8,1,6,13,16,10,20,3,23,25,5,19,29,17,7,22,28,21,9,33,24,11,26,
12,32,14,30,15,41,39,18,38,31,42,40,43,27,45,35,44,34,36,37]
,\[
3,6,9,11,1,15,2,19,14,8,13,4,27,5,18,29,32,7,28,25,34,10,36,31,30,
39,12,22,38,17,16,20,40,43,21,44,23,24,42,26,35,33,41,45,37]
>;
print "Group G is 3.A7 < Sym(45)";