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