Changeset 7f5789 in git for Singular/LIB/freegb.lib

Timestamp:

Jan 18, 2020, 10:59:58 PM (4 years ago)

Author:

Karim Abou Zeid <karim23697@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '38dfc5131670d387a89455159ed1e071997eec94')

Children:

c417af59af93bdad5278db69f84585a318ee2ba5

Parents:

da6d43a81ee1ba91b8ecae7bb3a89f608e66b354

git-author:

Karim Abou Zeid <karim23697@gmail.com>2020-01-18 22:59:58+01:00

git-committer:

Karim Abou Zeid <karim23697@gmail.com>2020-01-18 23:05:58+01:00

Message:

Fix fpaprops for ncgen and add tests

File:

• Singular/LIB/freegb.lib (modified) (2 diffs)

Singular/LIB/freegb.lib

@@ -26 +26 @@
 lpDegBound(R);                   returns the degree bound of a letterplace ring
 lpVarBlockSize(R);               returns the size of the letterplace blocks
+lpNcgenCount(R);                 returns the number of ncgen variables
 lpDivision(f,I);                 two-sided division with remainder
 lpGBPres2Poly(L,I);              reconstructs a polynomial from the output of lpDivision
@@ -1004 +1005 @@
   def R = freeAlgebra(r, 7);
   isFreeAlgebra(R);
+}
+
+proc lpNcgenCount(def R)
+"USAGE:  lpNcgenCount(R); R a letterplace ring
+RETURN:  int
+PURPOSE: returns the number of ncgen variables in the letterplace ring.
+EXAMPLE: example ncgenCount; shows examples
+"
+{
+  return(attrib(R, "ncgenCount"));
+}
+example
+{
+  "EXAMPLE:"; echo = 2;
+  ring r = 0,(x,y,z),dp;
+  def R = freeAlgebra(r, 7, 10);
+  lpNcgenCount(R); // should be 10
 }