Play with this polytope as a twisty puzzle
This page is part of the Atlas of Small Regular Polytopess0 := ( 4, 7)( 5, 8)( 6, 9)(10,19)(11,20)(12,21)(13,25)(14,26)(15,27)(16,22)(17,23)(18,24)(28,58)(29,59)(30,60)(31,55)(32,56)(33,57)(34,61)(35,62)(36,63)(37,76)(38,77)(39,78)(40,73)(41,74)(42,75)(43,79)(44,80)(45,81)(46,67)(47,68)(48,69)(49,64)(50,65)(51,66)(52,70)(53,71)(54,72);; s1 := ( 1,39)( 2,37)( 3,38)( 4,45)( 5,43)( 6,44)( 7,42)( 8,40)( 9,41)(10,29)(11,30)(12,28)(13,35)(14,36)(15,34)(16,32)(17,33)(18,31)(19,46)(20,47)(21,48)(22,52)(23,53)(24,54)(25,49)(26,50)(27,51)(55,69)(56,67)(57,68)(58,66)(59,64)(60,65)(61,72)(62,70)(63,71)(73,76)(74,77)(75,78);; s2 := ( 2, 3)( 5, 6)( 8, 9)(10,19)(11,21)(12,20)(13,22)(14,24)(15,23)(16,25)(17,27)(18,26)(29,30)(32,33)(35,36)(37,46)(38,48)(39,47)(40,49)(41,51)(42,50)(43,52)(44,54)(45,53)(56,57)(59,60)(62,63)(64,73)(65,75)(66,74)(67,76)(68,78)(69,77)(70,79)(71,81)(72,80);; 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*s0*s1*s2*s1*s0*s1*s0*s1*s2*s1,
s1*s2*s1*s2*s1*s2*s1*s2*s1*s2*s1*s2,
s1*s2*s1*s0*s1*s2*s1*s2*s1*s0*s1*s2*s1*s0*s2*s1*s2*s0,
s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1 ];;
poly := F / rels;;
Permutation Representation (Magma) : s0 := Sym(81)!( 4, 7)( 5, 8)( 6, 9)(10,19)(11,20)(12,21)(13,25)(14,26)(15,27)(16,22)(17,23)(18,24)(28,58)(29,59)(30,60)(31,55)(32,56)(33,57)(34,61)(35,62)(36,63)(37,76)(38,77)(39,78)(40,73)(41,74)(42,75)(43,79)(44,80)(45,81)(46,67)(47,68)(48,69)(49,64)(50,65)(51,66)(52,70)(53,71)(54,72); s1 := Sym(81)!( 1,39)( 2,37)( 3,38)( 4,45)( 5,43)( 6,44)( 7,42)( 8,40)( 9,41)(10,29)(11,30)(12,28)(13,35)(14,36)(15,34)(16,32)(17,33)(18,31)(19,46)(20,47)(21,48)(22,52)(23,53)(24,54)(25,49)(26,50)(27,51)(55,69)(56,67)(57,68)(58,66)(59,64)(60,65)(61,72)(62,70)(63,71)(73,76)(74,77)(75,78); s2 := Sym(81)!( 2, 3)( 5, 6)( 8, 9)(10,19)(11,21)(12,20)(13,22)(14,24)(15,23)(16,25)(17,27)(18,26)(29,30)(32,33)(35,36)(37,46)(38,48)(39,47)(40,49)(41,51)(42,50)(43,52)(44,54)(45,53)(56,57)(59,60)(62,63)(64,73)(65,75)(66,74)(67,76)(68,78)(69,77)(70,79)(71,81)(72,80); poly := sub<Sym(81)|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*s0*s1*s2*s1*s0*s1*s0*s1*s2*s1, s1*s2*s1*s2*s1*s2*s1*s2*s1*s2*s1*s2, s1*s2*s1*s0*s1*s2*s1*s2*s1*s0*s1*s2*s1*s0*s2*s1*s2*s0, s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1 >;References : None.