Changeset aa7c1c2 in git for Singular/LIB/freegb.lib

Timestamp:

Jun 14, 2018, 1:08:24 PM (6 years ago)

Author:

Karim Abou Zeid <karim23697@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

8c73fdea988c87d699605750b3180fa69edf5d10

Parents:

a718906498691a0860e186cfee5db4fc1142ccd6db48f3ea705fcb451c2ea640a2b72f643bae2f22

Message:

Merge branch 'spielwiese' into letterplace_kernel_multiplication

File:

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

Singular/LIB/freegb.lib

@@ -1 @@
-/////////////////////////////////////////////////////////////////////////////
 /////////////////////////////////////////////////////////////////////////////
 version="version freegb.lib 4.1.1.0 Dec_2017 "; // $Id$
@@ -92 +91 @@
     ERROR("uptodeg and lV do not agree on the basering!");
   }
-  // a kind of dirty hack
-  list L = ringlist(R);
-  attrib(L,"maxExp",1);
-  def @R = ring(L);
-    // Set letterplace-specific attributes for the output ring!
+
+  // Set letterplace-specific attributes for the output ring!
+  // a kind of dirty hack, getting the ringlist again
+  list RL = ringlist(R);
+  attrib(RL, "isLetterplaceRing", lV);
+  attrib(RL, "maxExp", 1);
+  def @R = ring(RL);
+
   attrib(@R, "uptodeg", uptodeg);
   attrib(@R, "isLetterplaceRing", lV);