Changeset 535a5a7 in git


Ignore:
Timestamp:
Apr 14, 2009, 10:22:10 AM (15 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b52fc4b2495505785981d640dcf7eb3e456778ef')
Children:
20bc9aea52d22f8eba9cf7e95131fc34a54bbb4e
Parents:
2f9a8a20e5bd67b6cef6dd9078bd52f0f4886b22
Message:
*hannes: syntax fix


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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/rinvar.lib

    r2f9a8a r535a5a7  
    11// Last change 10.12.2000 (TB)
    22///////////////////////////////////////////////////////////////////////////////
    3 version="$Id: rinvar.lib,v 1.17 2008-10-06 17:04:28 Singular Exp $";
     3version="$Id: rinvar.lib,v 1.18 2009-04-14 08:22:10 Singular Exp $";
    44category="Invariant theory";
    55info="
     
    700700  ideal invars = invarsGens;
    701701  kill invarsGens;
    702   if (defined(ROelements)) { kill ROelements,actionid,zeroset,id; }
     702  if (defined(ROelements)) { kill ROelements,actionid,theZeroset,id; }
    703703  export invars;
    704704  dbprint(dbPrt+1, "
     
    957957  for(i = ns + 1; i <= n; i++) { G1 = G1, var(i);}
    958958
    959   def RORR = ZeroSet(G1, primaryDec);
     959  def RORR = zeroSet(G1, primaryDec);
    960960  setring ROBR;
    961961  string parName, minPoly;
     
    975975  map Phi = RA1, maxideal(1);
    976976  Phi[nvars(RORR) + 1] = newA;
    977   id = Phi(Grp); // id already defined by ZeroSet of level 0
     977  id = Phi(Grp); // id already defined by zeroSet of level 0
    978978  ideal actionid = Phi(Gaction);
    979979  kill parName,minPoly,Phi,RA1;
     
    984984  poly h1, h2;
    985985
    986   for(i = 1; i <= size(zeroset); i++) {
    987     groupElem = zeroset[i];    // element of G
     986  for(i = 1; i <= size(theZeroset); i++) {
     987    groupElem = theZeroset[i];    // element of G
    988988    for(j = ns + 1; j<=n; j++) { groupElem[j] = var(j); } //do not change t's
    989989    for(j = 1; j <= n - ns; j++) {
Note: See TracChangeset for help on using the changeset viewer.