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