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