Polytope of Type {104,4,2}

This page is part of the Atlas of Small Regular Polytopes
Atlas Canonical Name : {104,4,2}*1664a
if this polytope has a name.
Group : SmallGroup(1664,13688)
Rank : 4
Schlafli Type : {104,4,2}
Number of vertices, edges, etc : 104, 208, 4, 2
Order of s0s1s2s3 : 104
Order of s0s1s2s3s2s1 : 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 : {52,4,2}*832, {104,2,2}*832
   4-fold quotients : {52,2,2}*416, {26,4,2}*416
   8-fold quotients : {26,2,2}*208
   13-fold quotients : {8,4,2}*128a
   16-fold quotients : {13,2,2}*104
   26-fold quotients : {4,4,2}*64, {8,2,2}*64
   52-fold quotients : {2,4,2}*32, {4,2,2}*32
   104-fold quotients : {2,2,2}*16
Covers (Minimal Covers in Boldface) :
   None in this atlas.
Permutation Representation (GAP) :
s0 := (  2, 13)(  3, 12)(  4, 11)(  5, 10)(  6,  9)(  7,  8)( 15, 26)( 16, 25)
( 17, 24)( 18, 23)( 19, 22)( 20, 21)( 28, 39)( 29, 38)( 30, 37)( 31, 36)
( 32, 35)( 33, 34)( 41, 52)( 42, 51)( 43, 50)( 44, 49)( 45, 48)( 46, 47)
( 53, 66)( 54, 78)( 55, 77)( 56, 76)( 57, 75)( 58, 74)( 59, 73)( 60, 72)
( 61, 71)( 62, 70)( 63, 69)( 64, 68)( 65, 67)( 79, 92)( 80,104)( 81,103)
( 82,102)( 83,101)( 84,100)( 85, 99)( 86, 98)( 87, 97)( 88, 96)( 89, 95)
( 90, 94)( 91, 93)(105,157)(106,169)(107,168)(108,167)(109,166)(110,165)
(111,164)(112,163)(113,162)(114,161)(115,160)(116,159)(117,158)(118,170)
(119,182)(120,181)(121,180)(122,179)(123,178)(124,177)(125,176)(126,175)
(127,174)(128,173)(129,172)(130,171)(131,183)(132,195)(133,194)(134,193)
(135,192)(136,191)(137,190)(138,189)(139,188)(140,187)(141,186)(142,185)
(143,184)(144,196)(145,208)(146,207)(147,206)(148,205)(149,204)(150,203)
(151,202)(152,201)(153,200)(154,199)(155,198)(156,197);;
s1 := (  1,106)(  2,105)(  3,117)(  4,116)(  5,115)(  6,114)(  7,113)(  8,112)
(  9,111)( 10,110)( 11,109)( 12,108)( 13,107)( 14,119)( 15,118)( 16,130)
( 17,129)( 18,128)( 19,127)( 20,126)( 21,125)( 22,124)( 23,123)( 24,122)
( 25,121)( 26,120)( 27,132)( 28,131)( 29,143)( 30,142)( 31,141)( 32,140)
( 33,139)( 34,138)( 35,137)( 36,136)( 37,135)( 38,134)( 39,133)( 40,145)
( 41,144)( 42,156)( 43,155)( 44,154)( 45,153)( 46,152)( 47,151)( 48,150)
( 49,149)( 50,148)( 51,147)( 52,146)( 53,171)( 54,170)( 55,182)( 56,181)
( 57,180)( 58,179)( 59,178)( 60,177)( 61,176)( 62,175)( 63,174)( 64,173)
( 65,172)( 66,158)( 67,157)( 68,169)( 69,168)( 70,167)( 71,166)( 72,165)
( 73,164)( 74,163)( 75,162)( 76,161)( 77,160)( 78,159)( 79,197)( 80,196)
( 81,208)( 82,207)( 83,206)( 84,205)( 85,204)( 86,203)( 87,202)( 88,201)
( 89,200)( 90,199)( 91,198)( 92,184)( 93,183)( 94,195)( 95,194)( 96,193)
( 97,192)( 98,191)( 99,190)(100,189)(101,188)(102,187)(103,186)(104,185);;
s2 := (105,131)(106,132)(107,133)(108,134)(109,135)(110,136)(111,137)(112,138)
(113,139)(114,140)(115,141)(116,142)(117,143)(118,144)(119,145)(120,146)
(121,147)(122,148)(123,149)(124,150)(125,151)(126,152)(127,153)(128,154)
(129,155)(130,156)(157,183)(158,184)(159,185)(160,186)(161,187)(162,188)
(163,189)(164,190)(165,191)(166,192)(167,193)(168,194)(169,195)(170,196)
(171,197)(172,198)(173,199)(174,200)(175,201)(176,202)(177,203)(178,204)
(179,205)(180,206)(181,207)(182,208);;
s3 := (209,210);;
poly := Group([s0,s1,s2,s3]);;
 
Finitely Presented Group Representation (GAP) :
F := FreeGroup("s0","s1","s2","s3");;
s0 := F.1;;  s1 := F.2;;  s2 := F.3;;  s3 := F.4;;  
rels := [ s0*s0, s1*s1, s2*s2, s3*s3, s0*s2*s0*s2, 
s0*s3*s0*s3, s1*s3*s1*s3, s2*s3*s2*s3, 
s0*s1*s2*s1*s0*s1*s2*s1, s1*s2*s1*s2*s1*s2*s1*s2, 
s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1 ];;
poly := F / rels;;
 
Permutation Representation (Magma) :
s0 := Sym(210)!(  2, 13)(  3, 12)(  4, 11)(  5, 10)(  6,  9)(  7,  8)( 15, 26)
( 16, 25)( 17, 24)( 18, 23)( 19, 22)( 20, 21)( 28, 39)( 29, 38)( 30, 37)
( 31, 36)( 32, 35)( 33, 34)( 41, 52)( 42, 51)( 43, 50)( 44, 49)( 45, 48)
( 46, 47)( 53, 66)( 54, 78)( 55, 77)( 56, 76)( 57, 75)( 58, 74)( 59, 73)
( 60, 72)( 61, 71)( 62, 70)( 63, 69)( 64, 68)( 65, 67)( 79, 92)( 80,104)
( 81,103)( 82,102)( 83,101)( 84,100)( 85, 99)( 86, 98)( 87, 97)( 88, 96)
( 89, 95)( 90, 94)( 91, 93)(105,157)(106,169)(107,168)(108,167)(109,166)
(110,165)(111,164)(112,163)(113,162)(114,161)(115,160)(116,159)(117,158)
(118,170)(119,182)(120,181)(121,180)(122,179)(123,178)(124,177)(125,176)
(126,175)(127,174)(128,173)(129,172)(130,171)(131,183)(132,195)(133,194)
(134,193)(135,192)(136,191)(137,190)(138,189)(139,188)(140,187)(141,186)
(142,185)(143,184)(144,196)(145,208)(146,207)(147,206)(148,205)(149,204)
(150,203)(151,202)(152,201)(153,200)(154,199)(155,198)(156,197);
s1 := Sym(210)!(  1,106)(  2,105)(  3,117)(  4,116)(  5,115)(  6,114)(  7,113)
(  8,112)(  9,111)( 10,110)( 11,109)( 12,108)( 13,107)( 14,119)( 15,118)
( 16,130)( 17,129)( 18,128)( 19,127)( 20,126)( 21,125)( 22,124)( 23,123)
( 24,122)( 25,121)( 26,120)( 27,132)( 28,131)( 29,143)( 30,142)( 31,141)
( 32,140)( 33,139)( 34,138)( 35,137)( 36,136)( 37,135)( 38,134)( 39,133)
( 40,145)( 41,144)( 42,156)( 43,155)( 44,154)( 45,153)( 46,152)( 47,151)
( 48,150)( 49,149)( 50,148)( 51,147)( 52,146)( 53,171)( 54,170)( 55,182)
( 56,181)( 57,180)( 58,179)( 59,178)( 60,177)( 61,176)( 62,175)( 63,174)
( 64,173)( 65,172)( 66,158)( 67,157)( 68,169)( 69,168)( 70,167)( 71,166)
( 72,165)( 73,164)( 74,163)( 75,162)( 76,161)( 77,160)( 78,159)( 79,197)
( 80,196)( 81,208)( 82,207)( 83,206)( 84,205)( 85,204)( 86,203)( 87,202)
( 88,201)( 89,200)( 90,199)( 91,198)( 92,184)( 93,183)( 94,195)( 95,194)
( 96,193)( 97,192)( 98,191)( 99,190)(100,189)(101,188)(102,187)(103,186)
(104,185);
s2 := Sym(210)!(105,131)(106,132)(107,133)(108,134)(109,135)(110,136)(111,137)
(112,138)(113,139)(114,140)(115,141)(116,142)(117,143)(118,144)(119,145)
(120,146)(121,147)(122,148)(123,149)(124,150)(125,151)(126,152)(127,153)
(128,154)(129,155)(130,156)(157,183)(158,184)(159,185)(160,186)(161,187)
(162,188)(163,189)(164,190)(165,191)(166,192)(167,193)(168,194)(169,195)
(170,196)(171,197)(172,198)(173,199)(174,200)(175,201)(176,202)(177,203)
(178,204)(179,205)(180,206)(181,207)(182,208);
s3 := Sym(210)!(209,210);
poly := sub<Sym(210)|s0,s1,s2,s3>;
 
Finitely Presented Group Representation (Magma) :
poly<s0,s1,s2,s3> := Group< s0,s1,s2,s3 | s0*s0, s1*s1, s2*s2, 
s3*s3, s0*s2*s0*s2, s0*s3*s0*s3, s1*s3*s1*s3, 
s2*s3*s2*s3, s0*s1*s2*s1*s0*s1*s2*s1, 
s1*s2*s1*s2*s1*s2*s1*s2, s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s0*s1 >; 
 

to this polytope