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