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