Play with this polytope as a twisty puzzle
This page is part of the Atlas of Small Regular Polytopess0 := ( 16, 31)( 17, 32)( 18, 33)( 19, 34)( 20, 35)( 21, 36)( 22, 37)( 23, 38)( 24, 39)( 25, 40)( 26, 41)( 27, 42)( 28, 43)( 29, 44)( 30, 45)( 46, 91)( 47, 92)( 48, 93)( 49, 94)( 50, 95)( 51, 96)( 52, 97)( 53, 98)( 54, 99)( 55,100)( 56,101)( 57,102)( 58,103)( 59,104)( 60,105)( 61,121)( 62,122)( 63,123)( 64,124)( 65,125)( 66,126)( 67,127)( 68,128)( 69,129)( 70,130)( 71,131)( 72,132)( 73,133)( 74,134)( 75,135)( 76,106)( 77,107)( 78,108)( 79,109)( 80,110)( 81,111)( 82,112)( 83,113)( 84,114)( 85,115)( 86,116)( 87,117)( 88,118)( 89,119)( 90,120);; s1 := ( 1, 46)( 2, 48)( 3, 47)( 4, 58)( 5, 60)( 6, 59)( 7, 55)( 8, 57)( 9, 56)( 10, 52)( 11, 54)( 12, 53)( 13, 49)( 14, 51)( 15, 50)( 16, 62)( 17, 61)( 18, 63)( 19, 74)( 20, 73)( 21, 75)( 22, 71)( 23, 70)( 24, 72)( 25, 68)( 26, 67)( 27, 69)( 28, 65)( 29, 64)( 30, 66)( 31, 78)( 32, 77)( 33, 76)( 34, 90)( 35, 89)( 36, 88)( 37, 87)( 38, 86)( 39, 85)( 40, 84)( 41, 83)( 42, 82)( 43, 81)( 44, 80)( 45, 79)( 92, 93)( 94,103)( 95,105)( 96,104)( 97,100)( 98,102)( 99,101)(106,107)(109,119)(110,118)(111,120)(112,116)(113,115)(114,117)(121,123)(124,135)(125,134)(126,133)(127,132)(128,131)(129,130);; s2 := ( 1, 5)( 2, 4)( 3, 6)( 7, 14)( 8, 13)( 9, 15)( 10, 11)( 16, 95)( 17, 94)( 18, 96)( 19, 92)( 20, 91)( 21, 93)( 22,104)( 23,103)( 24,105)( 25,101)( 26,100)( 27,102)( 28, 98)( 29, 97)( 30, 99)( 31, 50)( 32, 49)( 33, 51)( 34, 47)( 35, 46)( 36, 48)( 37, 59)( 38, 58)( 39, 60)( 40, 56)( 41, 55)( 42, 57)( 43, 53)( 44, 52)( 45, 54)( 61,126)( 62,125)( 63,124)( 64,123)( 65,122)( 66,121)( 67,135)( 68,134)( 69,133)( 70,132)( 71,131)( 72,130)( 73,129)( 74,128)( 75,127)( 76, 79)( 77, 81)( 78, 80)( 82, 88)( 83, 90)( 84, 89)( 86, 87)(106,109)(107,111)(108,110)(112,118)(113,120)(114,119)(116,117);; 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*s0*s1,
s0*s1*s2*s1*s2*s1*s2*s1*s0*s1*s2*s1*s2*s1*s2*s1,
s0*s1*s0*s1*s2*s1*s0*s1*s2*s1*s0*s1*s0*s1*s2*s1*s0*s1*s2*s1,
s0*s1*s2*s0*s1*s2*s0*s1*s2*s1*s2*s1*s2*s0*s1*s2*s1*s2*s0*s1*s2*s1*s2*s1*s2 ];;
poly := F / rels;;
Permutation Representation (Magma) : s0 := Sym(135)!( 16, 31)( 17, 32)( 18, 33)( 19, 34)( 20, 35)( 21, 36)( 22, 37)( 23, 38)( 24, 39)( 25, 40)( 26, 41)( 27, 42)( 28, 43)( 29, 44)( 30, 45)( 46, 91)( 47, 92)( 48, 93)( 49, 94)( 50, 95)( 51, 96)( 52, 97)( 53, 98)( 54, 99)( 55,100)( 56,101)( 57,102)( 58,103)( 59,104)( 60,105)( 61,121)( 62,122)( 63,123)( 64,124)( 65,125)( 66,126)( 67,127)( 68,128)( 69,129)( 70,130)( 71,131)( 72,132)( 73,133)( 74,134)( 75,135)( 76,106)( 77,107)( 78,108)( 79,109)( 80,110)( 81,111)( 82,112)( 83,113)( 84,114)( 85,115)( 86,116)( 87,117)( 88,118)( 89,119)( 90,120); s1 := Sym(135)!( 1, 46)( 2, 48)( 3, 47)( 4, 58)( 5, 60)( 6, 59)( 7, 55)( 8, 57)( 9, 56)( 10, 52)( 11, 54)( 12, 53)( 13, 49)( 14, 51)( 15, 50)( 16, 62)( 17, 61)( 18, 63)( 19, 74)( 20, 73)( 21, 75)( 22, 71)( 23, 70)( 24, 72)( 25, 68)( 26, 67)( 27, 69)( 28, 65)( 29, 64)( 30, 66)( 31, 78)( 32, 77)( 33, 76)( 34, 90)( 35, 89)( 36, 88)( 37, 87)( 38, 86)( 39, 85)( 40, 84)( 41, 83)( 42, 82)( 43, 81)( 44, 80)( 45, 79)( 92, 93)( 94,103)( 95,105)( 96,104)( 97,100)( 98,102)( 99,101)(106,107)(109,119)(110,118)(111,120)(112,116)(113,115)(114,117)(121,123)(124,135)(125,134)(126,133)(127,132)(128,131)(129,130); s2 := Sym(135)!( 1, 5)( 2, 4)( 3, 6)( 7, 14)( 8, 13)( 9, 15)( 10, 11)( 16, 95)( 17, 94)( 18, 96)( 19, 92)( 20, 91)( 21, 93)( 22,104)( 23,103)( 24,105)( 25,101)( 26,100)( 27,102)( 28, 98)( 29, 97)( 30, 99)( 31, 50)( 32, 49)( 33, 51)( 34, 47)( 35, 46)( 36, 48)( 37, 59)( 38, 58)( 39, 60)( 40, 56)( 41, 55)( 42, 57)( 43, 53)( 44, 52)( 45, 54)( 61,126)( 62,125)( 63,124)( 64,123)( 65,122)( 66,121)( 67,135)( 68,134)( 69,133)( 70,132)( 71,131)( 72,130)( 73,129)( 74,128)( 75,127)( 76, 79)( 77, 81)( 78, 80)( 82, 88)( 83, 90)( 84, 89)( 86, 87)(106,109)(107,111)(108,110)(112,118)(113,120)(114,119)(116,117); poly := sub<Sym(135)|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*s0*s1, s0*s1*s2*s1*s2*s1*s2*s1*s0*s1*s2*s1*s2*s1*s2*s1, s0*s1*s0*s1*s2*s1*s0*s1*s2*s1*s0*s1*s0*s1*s2*s1*s0*s1*s2*s1, s0*s1*s2*s0*s1*s2*s0*s1*s2*s1*s2*s1*s2*s0*s1*s2*s1*s2*s0*s1*s2*s1*s2*s1*s2 >;References : None.