Changeset 558209 in git


Ignore:
Timestamp:
Jan 8, 2007, 10:33:55 AM (17 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b52fc4b2495505785981d640dcf7eb3e456778ef')
Children:
f183dd53eec7359ae570b06c0f66b28fb8a64b3b
Parents:
e42f2e9ff3d178a0dfecf8191a5c1d867e925637
Message:
*hannes: sort: smal optimm.


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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/general.lib

    re42f2e r558209  
    33//eric, added absValue 11.04.2002
    44///////////////////////////////////////////////////////////////////////////////
    5 version="$Id: general.lib,v 1.53 2006-12-11 13:11:05 Singular Exp $";
     5version="$Id: general.lib,v 1.54 2007-01-08 09:33:55 Singular Exp $";
    66category="General purpose";
    77info="
     
    868868   {
    869869      id = simplify(id,2);
    870       for ( ii=1; ii<size(id); ii++ )
     870      for ( ii=1; ii<ncols(id); ii++ )
    871871      {
    872872         if ( id[ii]!=id[ii+1] ) { break;}
    873873      }
    874       if ( ii != size(id) ) { v = sortvec(id); }
    875       else  { v = size(id)..1; }
     874      if ( ii != ncols(id) ) { v = sortvec(id); }
     875      else  { v = ncols(id)..1; }
    876876   }
    877877   if ( size(#)>=1 and (typeof(id)=="ideal" or typeof(id)=="module"
     
    932932   if ( size(m) != 0 )
    933933   {
    934       for ( jj=1; jj<=s; jj=jj+1)
     934      for ( jj=1; jj<=s; jj++)
    935935      {
    936936         if ( v[jj]<=0 ) { v[jj]=jj; }
Note: See TracChangeset for help on using the changeset viewer.