LogTo("d:/gap/games/rubik/rubik7.log");

U:=( 1, 3, 8, 6)( 2, 5, 7, 4)( 9,33,25,17)(10,34,26,18)(11,35,27,19);
L:=( 9,11,16,14)(10,13,15,12)( 1,17,41,40)( 4,20,44,37)( 6,22,46,35);
F:= (17,19,24,22)(18,21,23,20)( 6,25,43,16)( 7,28,42,13)( 8,30,41,11);
R:=(25,27,32,30)(26,29,31,28)( 3,38,43,19)( 5,36,45,21)( 8,33,48,24);
B:=(33,35,40,38)(34,37,39,36)( 3, 9,46,32)( 2,12,47,29)( 1,14,48,27);
D:=(41,43,48,46)(42,45,47,44)(14,22,30,38)(15,23,31,39)(16,24,32,40);

square_group := Group(U^2,L^2,F^2,R^2,B^2,D^2);;

g1:=(2,42)(34,23);

ans:=g1 in square_group;

Read("d:/gap/gap3r4p3/lib/abstab.g");

g2:=FactorPermGroupElement(square_group,g1);

uu:=(1,3)(2,4);ff:=(1,8)(4,5);dd:=(5,7)(6,8);
bb:=(3,6)(2,7);rr:=(2,5)(1,6);ll:=(4,7)(3,8);
H:=Group(uu,ff,rr,dd,bb,ll);