Changeset ebc333 in git for Singular/LIB/normal.lib

Timestamp:

May 10, 2019, 4:13:19 PM (5 years ago)

Author:

Sachin <sachinkm308@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'd08f5f0bb3329b8ca19f23b74cb1473686415c3a')

Children:

d0ca0b8ae05c9cfcf2578b78e43825144b88299c

Parents:

b2fc349e4c2e86a7c7f9cbefef96756f70e8b57f

Message:

Removed commented execute functions for these files

File:

• Singular/LIB/normal.lib (modified) (5 diffs)

Singular/LIB/normal.lib

@@ -2986 +2986 @@
       }
       ker=simplify(interred(ker),15);
-      //execute ("ring R0="+charstr(R)+",("+varstr(R)+"),("+ordstr(R)+");");
       // Rlist may be not defined in this new ring, so we define it again.
       list Rlist2 = ringlist(R);
@@ -3302 +3301 @@
              setring S(k);
 
-             //execute ("ring S(k) = "+charstr(R(k))+",("+varstr(R(k))+",
-             //          Z(1.."+string(ncols(phi))+")),(dp("+string(nvars(R(k)))
-             //          +"),dp("+string(ncols(phi))+"));");
-
               ideal phi = imap(R(k),phi);
               ideal J = imap (R(k),ker);
@@ -3337 +3332 @@
               //  mapstr=mapstr+"0,";
               //}
-              //execute (mapstr+"maxideal(1);");
               poly p;
           }
@@ -3490 +3484 @@
          setring S(k);
 
-        // execute ("ring S(k) = "+charstr(R(k))+",("+varstr(R(k))+",
-        //           Z(1.."+string(ncols(phi))+")),(dp("+string(nvars(R(k)))
-        //           +"),dp("+string(ncols(phi))+"));");
-
           ideal phi = imap(R(k),phi);
           ideal J = imap (R(k),ker);
@@ -3523 +3513 @@
            //  mapstr=mapstr+"0,";
            //}
-           //execute (mapstr+"maxideal(1);");
 
            poly p;