Changeset 535a5a7 in git

Timestamp:

Apr 14, 2009, 10:22:10 AM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')

Children:

20bc9aea52d22f8eba9cf7e95131fc34a54bbb4e

Parents:

2f9a8a20e5bd67b6cef6dd9078bd52f0f4886b22

Message:

*hannes: syntax fix


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

File:

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

Singular/LIB/rinvar.lib

@@ -1 +1 @@
 // Last change 10.12.2000 (TB)
 ///////////////////////////////////////////////////////////////////////////////
-version="$Id: rinvar.lib,v 1.17 2008-10-06 17:04:28 Singular Exp $";
+version="$Id: rinvar.lib,v 1.18 2009-04-14 08:22:10 Singular Exp $";
 category="Invariant theory";
 info="
@@ -700 +700 @@
   ideal invars = invarsGens;
   kill invarsGens;
-  if (defined(ROelements)) { kill ROelements,actionid,zeroset,id; }
+  if (defined(ROelements)) { kill ROelements,actionid,theZeroset,id; }
   export invars;
   dbprint(dbPrt+1, "
@@ -957 +957 @@
   for(i = ns + 1; i <= n; i++) { G1 = G1, var(i);}
 
-  def RORR = ZeroSet(G1, primaryDec);
+  def RORR = zeroSet(G1, primaryDec);
   setring ROBR;
   string parName, minPoly;
@@ -975 +975 @@
   map Phi = RA1, maxideal(1);
   Phi[nvars(RORR) + 1] = newA;
-  id = Phi(Grp); // id already defined by ZeroSet of level 0
+  id = Phi(Grp); // id already defined by zeroSet of level 0
   ideal actionid = Phi(Gaction);
   kill parName,minPoly,Phi,RA1;
@@ -984 +984 @@
   poly h1, h2;
 
-  for(i = 1; i <= size(zeroset); i++) {
-    groupElem = zeroset[i];    // element of G
+  for(i = 1; i <= size(theZeroset); i++) {
+    groupElem = theZeroset[i];    // element of G
     for(j = ns + 1; j<=n; j++) { groupElem[j] = var(j); } //do not change t's
     for(j = 1; j <= n - ns; j++) {