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