EvalQuasiPoly(QP: LIST of RINGELEM, N: RINGELEM): RINGELEM

/**/ M := Mat(ZZ, [ [0,  2,  1], [0, -2,  3], [2, -2,  3] ]);
/**/ Cinput := record[integral_closure := M, grading := Mat([[1,1,1]]) ];
/**/ C := NmzComputation(Cinput, ["HilbertSeries"]);
/**/ CHQ := C.HilbertQuasiPolynomial;   indent(CHQ);
[
  (8/9)*t^2 +2*t +1,
  (8/9)*t^2 +(14/9)*t +5/9,
  (8/9)*t^2 +(16/9)*t +8/9
]
/**/ EvalQuasiPoly(CHQ,151);
20503