Polytope of Type {2,4,52,2}

This page is part of the Atlas of Small Regular Polytopes
Atlas Canonical Name : {2,4,52,2}*1664
if this polytope has a name.
Group : SmallGroup(1664,17727)
Rank : 5
Schlafli Type : {2,4,52,2}
Number of vertices, edges, etc : 2, 4, 104, 52, 2
Order of s0s1s2s3s4 : 52
Order of s0s1s2s3s4s3s2s1 : 2
Special Properties :
   Degenerate
   Universal
   Orientable
   Flat
Related Polytopes :
   Facet
   Vertex Figure
   Dual
Facet Of :
   None in this Atlas
Vertex Figure Of :
   None in this Atlas
Quotients (Maximal Quotients in Boldface) :
   2-fold quotients : {2,2,52,2}*832, {2,4,26,2}*832
   4-fold quotients : {2,2,26,2}*416
   8-fold quotients : {2,2,13,2}*208
   13-fold quotients : {2,4,4,2}*128
   26-fold quotients : {2,2,4,2}*64, {2,4,2,2}*64
   52-fold quotients : {2,2,2,2}*32
Covers (Minimal Covers in Boldface) :
   None in this atlas.
Permutation Representation (GAP) :
s0 := (1,2);;
s1 := ( 55, 68)( 56, 69)( 57, 70)( 58, 71)( 59, 72)( 60, 73)( 61, 74)( 62, 75)
( 63, 76)( 64, 77)( 65, 78)( 66, 79)( 67, 80)( 81, 94)( 82, 95)( 83, 96)
( 84, 97)( 85, 98)( 86, 99)( 87,100)( 88,101)( 89,102)( 90,103)( 91,104)
( 92,105)( 93,106);;
s2 := (  3, 55)(  4, 67)(  5, 66)(  6, 65)(  7, 64)(  8, 63)(  9, 62)( 10, 61)
( 11, 60)( 12, 59)( 13, 58)( 14, 57)( 15, 56)( 16, 68)( 17, 80)( 18, 79)
( 19, 78)( 20, 77)( 21, 76)( 22, 75)( 23, 74)( 24, 73)( 25, 72)( 26, 71)
( 27, 70)( 28, 69)( 29, 81)( 30, 93)( 31, 92)( 32, 91)( 33, 90)( 34, 89)
( 35, 88)( 36, 87)( 37, 86)( 38, 85)( 39, 84)( 40, 83)( 41, 82)( 42, 94)
( 43,106)( 44,105)( 45,104)( 46,103)( 47,102)( 48,101)( 49,100)( 50, 99)
( 51, 98)( 52, 97)( 53, 96)( 54, 95);;
s3 := (  3,  4)(  5, 15)(  6, 14)(  7, 13)(  8, 12)(  9, 11)( 16, 17)( 18, 28)
( 19, 27)( 20, 26)( 21, 25)( 22, 24)( 29, 30)( 31, 41)( 32, 40)( 33, 39)
( 34, 38)( 35, 37)( 42, 43)( 44, 54)( 45, 53)( 46, 52)( 47, 51)( 48, 50)
( 55, 82)( 56, 81)( 57, 93)( 58, 92)( 59, 91)( 60, 90)( 61, 89)( 62, 88)
( 63, 87)( 64, 86)( 65, 85)( 66, 84)( 67, 83)( 68, 95)( 69, 94)( 70,106)
( 71,105)( 72,104)( 73,103)( 74,102)( 75,101)( 76,100)( 77, 99)( 78, 98)
( 79, 97)( 80, 96);;
s4 := (107,108);;
poly := Group([s0,s1,s2,s3,s4]);;
 
Finitely Presented Group Representation (GAP) :
F := FreeGroup("s0","s1","s2","s3","s4");;
s0 := F.1;;  s1 := F.2;;  s2 := F.3;;  s3 := F.4;;  s4 := F.5;;  
rels := [ s0*s0, s1*s1, s2*s2, s3*s3, s4*s4, s0*s1*s0*s1, 
s0*s2*s0*s2, s0*s3*s0*s3, s1*s3*s1*s3, 
s0*s4*s0*s4, s1*s4*s1*s4, s2*s4*s2*s4, 
s3*s4*s3*s4, s1*s2*s1*s2*s1*s2*s1*s2, 
s1*s2*s3*s2*s1*s2*s3*s2, s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3 ];;
poly := F / rels;;
 
Permutation Representation (Magma) :
s0 := Sym(108)!(1,2);
s1 := Sym(108)!( 55, 68)( 56, 69)( 57, 70)( 58, 71)( 59, 72)( 60, 73)( 61, 74)
( 62, 75)( 63, 76)( 64, 77)( 65, 78)( 66, 79)( 67, 80)( 81, 94)( 82, 95)
( 83, 96)( 84, 97)( 85, 98)( 86, 99)( 87,100)( 88,101)( 89,102)( 90,103)
( 91,104)( 92,105)( 93,106);
s2 := Sym(108)!(  3, 55)(  4, 67)(  5, 66)(  6, 65)(  7, 64)(  8, 63)(  9, 62)
( 10, 61)( 11, 60)( 12, 59)( 13, 58)( 14, 57)( 15, 56)( 16, 68)( 17, 80)
( 18, 79)( 19, 78)( 20, 77)( 21, 76)( 22, 75)( 23, 74)( 24, 73)( 25, 72)
( 26, 71)( 27, 70)( 28, 69)( 29, 81)( 30, 93)( 31, 92)( 32, 91)( 33, 90)
( 34, 89)( 35, 88)( 36, 87)( 37, 86)( 38, 85)( 39, 84)( 40, 83)( 41, 82)
( 42, 94)( 43,106)( 44,105)( 45,104)( 46,103)( 47,102)( 48,101)( 49,100)
( 50, 99)( 51, 98)( 52, 97)( 53, 96)( 54, 95);
s3 := Sym(108)!(  3,  4)(  5, 15)(  6, 14)(  7, 13)(  8, 12)(  9, 11)( 16, 17)
( 18, 28)( 19, 27)( 20, 26)( 21, 25)( 22, 24)( 29, 30)( 31, 41)( 32, 40)
( 33, 39)( 34, 38)( 35, 37)( 42, 43)( 44, 54)( 45, 53)( 46, 52)( 47, 51)
( 48, 50)( 55, 82)( 56, 81)( 57, 93)( 58, 92)( 59, 91)( 60, 90)( 61, 89)
( 62, 88)( 63, 87)( 64, 86)( 65, 85)( 66, 84)( 67, 83)( 68, 95)( 69, 94)
( 70,106)( 71,105)( 72,104)( 73,103)( 74,102)( 75,101)( 76,100)( 77, 99)
( 78, 98)( 79, 97)( 80, 96);
s4 := Sym(108)!(107,108);
poly := sub<Sym(108)|s0,s1,s2,s3,s4>;
 
Finitely Presented Group Representation (Magma) :
poly<s0,s1,s2,s3,s4> := Group< s0,s1,s2,s3,s4 | s0*s0, s1*s1, s2*s2, 
s3*s3, s4*s4, s0*s1*s0*s1, s0*s2*s0*s2, 
s0*s3*s0*s3, s1*s3*s1*s3, s0*s4*s0*s4, 
s1*s4*s1*s4, s2*s4*s2*s4, s3*s4*s3*s4, 
s1*s2*s1*s2*s1*s2*s1*s2, s1*s2*s3*s2*s1*s2*s3*s2, 
s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3*s2*s3 >; 
 

to this polytope