Changeset baa72c5 in git


Ignore:
Timestamp:
Jul 22, 2008, 5:15:21 PM (16 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
Children:
a7fbddcbff3bcbdd93360df7d7c3a3d47bd04e1c
Parents:
c691df8cf70a169267ef0c05ea9bd356948e6e8b
Message:
*hannes: NF-rank


git-svn-id: file:///usr/local/Singular/svn/trunk@10898 2c84dea3-7e68-4137-9b89-c4e89433aadc
Location:
kernel
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • kernel/kstd1.cc

    rc691df rbaa72c5  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: kstd1.cc,v 1.36 2008-07-08 13:02:21 Singular Exp $ */
     4/* $Id: kstd1.cc,v 1.37 2008-07-22 15:15:21 Singular Exp $ */
    55/*
    66* ABSTRACT:
     
    14831483  BITSET save_test=test;
    14841484
    1485   if (idIs0(q)) return idInit(IDELEMS(q),q->rank);
     1485  if (idIs0(q)) return idInit(IDELEMS(q),si_max(q->rank,F->rank));
    14861486  if ((idIs0(F))&&(Q==NULL))
    14871487    return idCopy(q); /*F=0*/
     
    15371537  }
    15381538  /*- compute------------------------------------------- -*/
    1539   res=idInit(IDELEMS(q),q->rank);
     1539  res=idInit(IDELEMS(q),strat->ak);
    15401540  for (i=0; i<IDELEMS(q); i++)
    15411541  {
  • kernel/kstd2.cc

    rc691df rbaa72c5  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: kstd2.cc,v 1.69 2008-07-09 08:26:29 wienand Exp $ */
     4/* $Id: kstd2.cc,v 1.70 2008-07-22 15:15:04 Singular Exp $ */
    55/*
    66*  ABSTRACT -  Kernel: alg. of Buchberger
     
    13351335
    13361336  if (idIs0(q))
    1337     return idInit(IDELEMS(q),q->rank);
     1337    return idInit(IDELEMS(q),si_max(q->rank,F->rank));
    13381338  if ((idIs0(F))&&(Q==NULL))
    13391339    return idCopy(q); /*F=0*/
     
    13531353  /*Shdl=*/initS(F,Q,strat);
    13541354  /*- compute------------------------------------------------------- -*/
    1355   res=idInit(IDELEMS(q),q->rank);
     1355  res=idInit(IDELEMS(q),si_max(q->rank,F->rank));
    13561356  for (i=IDELEMS(q)-1; i>=0; i--)
    13571357  {
Note: See TracChangeset for help on using the changeset viewer.