Update pfd.lib

singular-gpispace · Aug 5, 2024 · f4582c3 · f4582c3
1 parent 709fa44
commit f4582c3
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/singular/pfd.lib b/singular/pfd.lib
@@ -1186,7 +1186,10 @@ proc pfd_functional_unit(list terms, ideal q, intvec steps, list #)
 
   dec = terms;
 
-  if (size(dec) == 1) {if(dec[1][1]==0){dec = list();}}
+  if (size(dec) == 1) {
+    if(dec[1][1]==0){dec = list();}
+    if(typeof(dec[1][1])!="poly") {dec[1][1] = poly(dec[1][1]);}
+    }
   dec = list(q, dec);
 
   if (voice <= printlevel) {displaypfd(dec)}