include("/home/bitnami/htdocs/websites/abstract-polytopes/www/subs.php"); ?>
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