From df19746f28f730f1de91001ae0720e706cdf0dfa Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lars=20G=C3=B6ttgens?= Date: Tue, 6 Jan 2026 13:46:42 +0100 Subject: [PATCH] Update return type of Singular's `hilb`, based on singular version --- lib/HapPrime/gradedalgebra.gi | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/lib/HapPrime/gradedalgebra.gi b/lib/HapPrime/gradedalgebra.gi index 55783424..90d2a1e8 100644 --- a/lib/HapPrime/gradedalgebra.gi +++ b/lib/HapPrime/gradedalgebra.gi @@ -1367,8 +1367,12 @@ if IsPackageMarkedForLoading("singular","0") then # Singular is using Ig := Ideal(R, GroebnerBasis(Ideal(R,I))); # Now get the Hilbert Series - series := SingularInterface("hilb", [Ig, 1, degs], "intvec"); - + if SingularInterface("int", "system(\"version\")", "int") < 43211 then + series := SingularInterface("hilb", [Ig, 1, degs], "intvec"); + else + series := SingularInterface("hilb", [Ig, 1, degs], "bigintvec"); + fi; + # Remove the last one element of the list since that is not part of # the series (see the Singular help) Remove(series, Length(series));