Changeset 3b77465 in git for Singular/LIB/zeroset.lib

Timestamp:

May 10, 2005, 7:56:17 PM (19 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

399ac9a269b92b84e7f2b0b5342627ad8bf48f3a

Parents:

edb4ff379c3c86523e0becd8fc67a508a03be6c3

Message:

*hannes: fixed kill


git-svn-id: file:///usr/local/Singular/svn/trunk@8136 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/LIB/zeroset.lib (modified) (10 diffs)

Singular/LIB/zeroset.lib

@@ -1 +1 @@
 // Last change 12.02.2001 (Eric Westenberger)
 ///////////////////////////////////////////////////////////////////////////////
-version="$Id: zeroset.lib,v 1.13 2005-05-06 14:39:20 hannes Exp $";
+version="$Id: zeroset.lib,v 1.14 2005-05-10 17:56:17 Singular Exp $";
 category="Symbolic-numerical solving";
 info="
@@ -128 +128 @@
   poly newA = imap(ROR, newA);
   poly f = imap(ROR, fn);
-  kill(ROR);
+  kill ROR;
   export(roots);
   export(newA);
@@ -372 +372 @@
   poly newA = imap(ZSR, newA);
   ideal id = imap(ZSR, id);
-  kill(ZSR);
+  kill ZSR;
 
   export(id);
@@ -491 +491 @@
   setring(QUOB);
   list result = imap(QUOR, result);
-  kill(QUOR);
+  kill QUOR;
   return(result);
 }
@@ -549 +549 @@
   setring(REMB);
   poly r = imap(REMR, h);
-  kill(REMR);
+  kill REMR;
   return(r);
 }
@@ -602 +602 @@
   setring(GCDB);
   poly h = imap(GCDR, h);
-  kill(GCDR);
+  kill GCDR;
   return(h);
 }
@@ -669 +669 @@
   setring(@RGCDB);
   poly h = imap(@RGCD, @h);
-  kill(@RGCD);
+  kill @RGCD;
   return(h);
 }
@@ -784 +784 @@
   setring(FRB);
   list result = imap(FRR, result);
-  kill(FRR);
+  kill FRR;
   return(result);
 }
@@ -1173 +1173 @@
       setring(NLZR);
       partSol = imap(RIS1, roots);
-      kill(RIS1);
+      kill RIS1;
       if(mpoly[1] != partSol[3]) {      // change minpoly
         mpoly = std(partSol[3]);
@@ -1195 +1195 @@
   result[5] = std(generators);
 
-  kill(NLZR);
+  kill NLZR;
   return(result);
 }