Changeset 8ba25b in git


Ignore:
Timestamp:
Mar 2, 2009, 6:04:52 PM (14 years ago)
Author:
Motsak Oleksandr <motsak@…>
Branches:
(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '0604212ebb110535022efecad887940825b97c3f')
Children:
c91241ed56b5d5415d9557a8844d82dc4c1bd14a
Parents:
90574dea52c09bb4dcd5979af7acceb6048a560a
Message:
*motsak: no skip zeroes for NF


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

Legend:

Unmodified
Added
Removed
  • kernel/kstd1.cc

    r90574d r8ba25b  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: kstd1.cc,v 1.45 2009-02-27 15:51:28 Singular Exp $ */
     4/* $Id: kstd1.cc,v 1.46 2009-03-02 17:04:52 motsak Exp $ */
    55/*
    66* ABSTRACT:
     
    20362036    const unsigned int m_iFirstAltVar = scaFirstAltVar(currRing);
    20372037    const unsigned int m_iLastAltVar  = scaLastAltVar(currRing);
    2038     pp = id_KillSquares(pp, m_iFirstAltVar, m_iLastAltVar, currRing);
     2038    pp = id_KillSquares(pp, m_iFirstAltVar, m_iLastAltVar, currRing, false);
    20392039
    20402040    if(Q == currQuotient)
  • kernel/sca.cc

    r90574d r8ba25b  
    77 *  Author:  motsak (Oleksandr Motsak)
    88 *  Created: 2006/12/18
    9  *  Version: $Id: sca.cc,v 1.32 2009-02-23 13:50:52 Singular Exp $
     9 *  Version: $Id: sca.cc,v 1.33 2009-03-02 17:04:52 motsak Exp $
    1010 *******************************************************************/
    1111
     
    27002700ideal id_KillSquares(const ideal id,
    27012701  const unsigned int iFirstAltVar, const unsigned int iLastAltVar,
    2702   const ring r)
     2702  const ring r, const bool bSkipZeroes)
    27032703{
    27042704  if (id == NULL) return id; // zero ideal
     
    27302730    temp->m[j] = p_KillSquares(id->m[j], iFirstAltVar, iLastAltVar, r);
    27312731
    2732   idSkipZeroes(temp);
     2732  if( bSkipZeroes )
     2733    idSkipZeroes(temp);
    27332734
    27342735#if 0
  • kernel/sca.h

    r90574d r8ba25b  
    55*  Computer Algebra System SINGULAR     *
    66****************************************/
    7 /* $Id: sca.h,v 1.14 2008-07-08 11:26:50 Singular Exp $ */
     7/* $Id: sca.h,v 1.15 2009-03-02 17:04:52 motsak Exp $ */
    88
    99#include <ring.h>
     
    165165ideal id_KillSquares(const ideal id,
    166166  const unsigned int iFirstAltVar, const unsigned int iLastAltVar,
    167   const ring r);
     167  const ring r, const bool bSkipZeroes = true);
    168168
    169169// for benchmarking
Note: See TracChangeset for help on using the changeset viewer.