/* Defining polynomial */ x^2 - x + 8 /* Minimal vectors */ [ <1, -1>, , , <-w + 3, -4>, <4, -w - 2>, , <3, -w - 2>, <3, -w - 1>, <0, 1>, , <1, 0>, <-w + 2, -3> ] /* Voronoi top cells */ [ { 1, 2, 3, 4, 5, 6 }, { 1, 3, 4, 6, 7 }, { 1, 3, 7, 8, 9, 10 }, { 1, 3, 8, 9, 11, 12 } ] /* Faces of top cells */ [ [ { 1, 3, 4, 6 }, { 1, 2, 3, 5 }, { 2, 4, 5, 6 }, { 3, 4, 5 }, { 1, 2, 6 } ], [ { 3, 4, 7 }, { 1, 3, 7 }, { 1, 3, 4, 6 }, { 1, 6, 7 }, { 4, 6, 7 } ], [ { 3, 7, 8, 10 }, { 1, 3, 8, 9 }, { 1, 3, 7 }, { 1, 7, 9, 10 }, { 8, 9, 10 } ], [ { 1, 3, 8, 9 }, { 1, 3, 11, 12 }, { 3, 8, 12 }, { 8, 9, 11, 12 }, { 1, 9, 11 } ] ] /* Order of PGL_2(O) stabilizers of Voronoi top cells */ [ 2, 1, 2, 6 ] /* GAP id of GL_2(O) stabilizers of Voronoi top cells */ [ <4, 1>, <2, 1>, <4, 1>, <12, 1> ]