Play with this polytope as a twisty puzzle
This page is part of the Atlas of Small Regular Polytopess0 := ( 2,38)( 3,32)( 4,46)( 5,29)( 6,21)( 7,36)( 8,28)( 9,16)(10,30)(11,24)(12,41)(15,20)(17,34)(22,42)(25,26)(27,39)(31,48)(35,40)(37,43)(44,45);; s1 := ( 1, 4)( 2,40)( 3,46)( 5,36)( 6,42)( 7,31)( 8,30)( 9,41)(10,37)(11,29)(12,32)(13,24)(14,20)(15,19)(16,26)(17,28)(18,34)(21,25)(22,38)(23,27)(33,39)(35,47)(43,45)(44,48)(51,52);; s2 := ( 1,23)( 2,41)( 3,42)( 4,37)( 5,30)( 6,34)( 7,28)( 8,36)( 9,24)(10,29)(11,16)(12,38)(13,14)(15,44)(17,21)(18,19)(20,45)(22,32)(25,27)(26,39)(31,35)(33,47)(40,48)(43,46)(49,52)(50,51);; poly := Group([s0,s1,s2]);;Finitely Presented Group Representation (GAP) :
F := FreeGroup("s0","s1","s2");;
s0 := F.1;; s1 := F.2;; s2 := F.3;;
rels := [ s0*s0, s1*s1, s2*s2, s0*s2*s0*s2, s0*s1*s2*s0*s1*s2*s0*s1*s0*s1*s2*s0*s1*s2*s0*s1,
s0*s1*s2*s1*s2*s1*s2*s1*s2*s1*s0*s1*s2*s1*s2*s1*s2*s1*s2*s1,
s0*s1*s2*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s2*s1*s2*s1*s0*s1*s0*s1*s0*s1*s0*s1*s2 ];;
poly := F / rels;;
Permutation Representation (Magma) : s0 := Sym(52)!( 2,38)( 3,32)( 4,46)( 5,29)( 6,21)( 7,36)( 8,28)( 9,16)(10,30)(11,24)(12,41)(15,20)(17,34)(22,42)(25,26)(27,39)(31,48)(35,40)(37,43)(44,45); s1 := Sym(52)!( 1, 4)( 2,40)( 3,46)( 5,36)( 6,42)( 7,31)( 8,30)( 9,41)(10,37)(11,29)(12,32)(13,24)(14,20)(15,19)(16,26)(17,28)(18,34)(21,25)(22,38)(23,27)(33,39)(35,47)(43,45)(44,48)(51,52); s2 := Sym(52)!( 1,23)( 2,41)( 3,42)( 4,37)( 5,30)( 6,34)( 7,28)( 8,36)( 9,24)(10,29)(11,16)(12,38)(13,14)(15,44)(17,21)(18,19)(20,45)(22,32)(25,27)(26,39)(31,35)(33,47)(40,48)(43,46)(49,52)(50,51); poly := sub<Sym(52)|s0,s1,s2>;Finitely Presented Group Representation (Magma) :
poly<s0,s1,s2> := Group< s0,s1,s2 | s0*s0, s1*s1, s2*s2, s0*s2*s0*s2, s0*s1*s2*s0*s1*s2*s0*s1*s0*s1*s2*s0*s1*s2*s0*s1, s0*s1*s2*s1*s2*s1*s2*s1*s2*s1*s0*s1*s2*s1*s2*s1*s2*s1*s2*s1, s0*s1*s2*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s2*s1*s2*s1*s0*s1*s0*s1*s0*s1*s0*s1*s2 >;References : None.