Changeset 80371e in git

Timestamp:

Sep 27, 2013, 5:35:06 PM (10 years ago)

Author:

Janko Boehm <boehm@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')

Children:

f528807747245a1ce0bc838c39c1266bb18b11c9

Parents:

1ba7d59dde84d122942e10a85da471cf9da64a00

git-author:

Janko Boehm <boehm@mathematik.uni-kl.de>2013-09-27 17:35:06+02:00

git-committer:

Janko Boehm <boehm@mathematik.uni-kl.de>2013-10-25 18:08:32+02:00

Message:

Fix by Gerhard for bug in zeroRad

File:

• Singular/LIB/primdec.lib (modified) (3 diffs)

Singular/LIB/primdec.lib

@@ -3769 +3769 @@
     I=interred(I+F);option(set,save);return(I);
    }
-   I=simplify(I,1);
+   //I=simplify(I,1);
 
    for(i=1;i<=n;i++)             //consider all polynomials over
@@ -3780 +3780 @@
    ideal F=imap(R,F);
 
-   string nR="ring @S="+string(p)+",(y(1..m),"+varstr(R)+","+parstr(R)+"),dp;";
+   string nR="ring @S="+string(p)+",(@y(1..m),"+varstr(R)+","+parstr(R)+"),dp;";
    execute(nR);
 
@@ -3792 +3792 @@
    {
       J=J,var(i)^k-var(m+n+i);
-      el=el*y(i);
+      el=el*@y(i);
    }