Changeset 87fba93 in git


Ignore:
Timestamp:
Oct 26, 1998, 5:21:36 PM (24 years ago)
Author:
Olaf Bachmann <obachman@…>
Branches:
(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')
Children:
0df5e1fd877453d4e0065a365df9618fc3e11514
Parents:
33471f8f9b05fd0fd0e9cbd9eb74b0c79fd75bae
Message:
* merge from 1.2 branch


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

Legend:

Unmodified
Added
Removed

  • Singular/LIB/primdec.lib

    r33471f8 r87fba93  
    1 // $Id: primdec.lib,v 1.27 1998-09-24 12:09:26 Singular Exp $
     1// $Id: primdec.lib,v 1.28 1998-10-26 16:21:36 obachman Exp $
    22////////////////////////////////////////////////////////////////////////////////
    33// primdec.lib                                                                //
    … …  
    1111////////////////////////////////////////////////////////////////////////////////
    1212
    13 version="$Id: primdec.lib,v 1.27 1998-09-24 12:09:26 Singular Exp $";
     13version="$Id: primdec.lib,v 1.28 1998-10-26 16:21:36 obachman Exp $";
    1414info="
    1515LIBRARY: primdec.lib: PROCEDURE FOR PRIMARY DECOMPOSITION
    … …  
    383383   if(size(k1)==size(k2))
    384384   {
    385       for(j=ncols(k1);j>0;j--)
     385      for(j=1;j<=size(k1);j++)
    386386      {
    387387         if(leadexp(k1[j])!=leadexp(k2[j]))
    … …  
    401401   if(size(k1)==size(k2))
    402402   {
    403       for(j=ncols(k1);j>0;j--)
     403      for(j=1;j<=size(k1);j++)
    404404      {
    405405         if(leadexp(k1[j])!=leadexp(k2[j]))
    … …  
    431431
    432432  ideal i=maxideal(1);
    433   int k=ncols(i);
     433  int k=size(i);
    434434  i[k]=0;
    435   i=randomid(i,ncols(i),b);
     435  i=randomid(i,size(i),b);
    436436  ideal ires=maxideal(1);
    437437  ires[k]=i[1]+var(k);
Note: See TracChangeset for help on using the changeset viewer.