Changeset 8ba3a2 in git

Timestamp:

Jan 12, 2015, 1:26:47 PM (9 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

237b18fd2b55f9e94a90732997e9dfe365995f97

Parents:

b1cadb0c7a38ba8b4c37cbe4d23056f6832b21ae

Message:

chg: removed unsed ring @S! from Primdec::zeroRad

File:

• Singular/LIB/primdec.lib (modified) (1 diff)

Singular/LIB/primdec.lib

@@ -3935 +3935 @@
    ideal F=imap(R,F);
 
-   string nR1="ring @S1="+string(p)+",("+varstr(R)+","+parstr(R)+",@y(1..m)),dp;";
-   execute(nR1);
-   list lR=ringlist(@S1)[2];
-   lR=lR[(size(lR)-m+1)..(size(lR))];
-
-   string nR="ring @S="+string(p)+",("+string(lR)+","+varstr(R)+","+parstr(R)+"),dp;";
+   //string nR1="ring @S1="+string(p)+",("+varstr(R)+","+parstr(R)+",@y(1..m)),dp;";
+   //execute(nR1);
+   //list lR=ringlist(@S1)[2];
+   //lR=lR[(size(lR)-m+1)..(size(lR))];
+   //"TEST:",string(lR),"<<<",m;
+
+   string nR="ring @S="+string(p)+",(@y(1..m),"+varstr(R)+","+parstr(R)+"),dp;";
    execute(nR);