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