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

G<x,y>:=PermutationGroup<90|\[
2,1,11,10,13,8,14,6,18,4,3,23,5,7,28,27,29,9,33,35,36,39,12,42,43,
44,16,15,17,47,48,50,19,52,20,21,58,57,22,60,61,24,25,26,64,67,30,31,71,32,
73,34,75,76,78,80,38,37,84,40,41,77,70,45,86,79,46,72,81,63,49,68,51,83,53,
54,62,55,66,56,69,87,74,59,89,65,82,90,85,88]
,\[
3,7,6,5,1,12,14,16,2,15,21,4,24,26,28,27,8,31,10,9,37,11,38,32,13,
20,46,45,41,17,25,18,49,19,53,55,29,51,44,23,22,62,64,66,34,30,65,69,40,72,
33,59,60,35,75,36,79,83,39,67,70,84,42,78,43,74,77,47,71,48,80,50,76,52,87,
73,54,68,86,61,57,56,58,89,63,90,82,81,85,88]
>;
print "Group G is 3.S7 < Sym(90)";