gap> Read("/home/math6/wdj/gap/games/rubik4/group4.g");

gap> rubik4_group;
Group( ( 1,53, 9, 5)( 2,54,10, 6)( 3,55,11, 7)( 4,56,12, 8)(49,52,88,85)
(50,64,87,73)(51,76,86,61)(62,63,75,74), (13,65,21,17)(14,66,22,18)
(15,67,23,19)(16,68,24,20), (37,41,45,89)(38,42,46,90)(39,43,47,91)
(40,44,48,92)(57,60,96,93)(58,72,95,81)(59,84,94,69)(70,71,83,82), 
(25,29,33,77)(26,30,34,78)(27,31,35,79)(28,32,36,80), ( 4,52,49,93)
( 5, 8,44,41)( 6,20,43,29)( 7,32,42,17)( 9,57,40,88)(16,64,33,81)(18,19,31,30)
(21,69,28,76), ( 3,51,46,94)(10,58,39,87)(15,63,34,82)(22,70,27,75), 
( 1,96,48,49)(12,85,37,60)(13,84,36,61)(24,73,25,72)(53,56,92,89)(54,68,91,77)
(55,80,90,65)(66,67,79,78), ( 2,95,47,50)(11,86,38,59)(14,83,35,62)
(23,74,26,71), ( 1, 4,40,37)( 2,16,39,25)( 3,28,38,13)( 5,93,92,89)
(14,15,27,26)(17,81,80,77)(29,69,68,65)(41,57,86,53), ( 6,81,91,73)
(18,82,79,74)(30,83,67,75)(42,84,55,76), ( 8,57,49,89)( 9,12,48,45)
(10,24,47,33)(11,36,46,21)(20,58,50,77)(22,23,35,34)(32,59,51,65)
(44,60,52,53), ( 7,61,90,69)(19,62,78,70)(31,63,66,71)(43,64,54,72) )
gap> Size(rubik4_group);
189964109154697739410804639032416479861290173918511483336830179163936637827682\
52072943746913498871794289868800000000000000000000
gap> N:=Size(rubik4_group);
189964109154697739410804639032416479861290173918511483336830179163936637827682\
52072943746913498871794289868800000000000000000000
gap> N/24;
791517121477907247545019329301735332755375724660464513903459079849735990948677\
169705989454729119658095411200000000000000000000
gap> quit;