Changeset 6d8067 in git for Singular/LIB/mprimdec.lib

Timestamp:

Sep 1, 2016, 12:49:01 PM (7 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

a807c5a8eb9a2ad1143f248981fa1bdcac697a5b

Parents:

d4e6a9eab50cd94d6a7a4660b9b587bfe8242de6

git-author:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2016-09-01 12:49:01+02:00

git-committer:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2016-09-01 12:50:11+02:00

Message:

fix (JP Flori): ring construction im mprimdec.lib

File:

• Singular/LIB/mprimdec.lib (modified) (4 diffs)

Singular/LIB/mprimdec.lib

@@ -1 +1 @@
 //////////////////////////////////////////////////////////////////////////////
 
-version="version mprimdec.lib 4.0.0.0 Jun_2013 "; // $Id$
+version="version mprimdec.lib 4.0.3.3 Sep_2016 "; // $Id$
 category="Commutative Algebra";
 
@@ -223 +223 @@
   {
     def BAS=basering;
-    execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,("+ordstr(basering)+");");
+    execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,(C,dp);");
     module @N=imap(BAS, @N);
     poly @q=prepareSat(@N);
@@ -633 +633 @@
   if(size(ann)==0)
   {
-    execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,("+ordstr(basering)+");");
+    execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,(C,dp);");
     module @N=imap(BAS, @N);
     poly @q=prepareSat(@N);
@@ -1423 +1423 @@
   if(size(ann)==0)      //check, whether ann=0
   {
-   execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,("+ordstr(basering)+");");
+   execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,(C,dp);");
    module @N=clrSBmod(imap(BAS, @N));
    module @M=freemodule(nrows(@N));