Changeset 660ed3 in git for kernel/kutil.cc

Timestamp:

May 19, 2006, 12:22:37 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

3738560c53e0c131ed96fee80506af636585777c

Parents:

0196493023ab83f32542ed429da0d4c721b4c5c8

Message:

*hannes: degBound


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

File:

• kernel/kutil.cc (modified) (2 diffs)

kernel/kutil.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kutil.cc,v 1.22 2006-05-08 12:55:11 Singular Exp $ */
+/* $Id: kutil.cc,v 1.23 2006-05-19 10:22:36 Singular Exp $ */
 /*
 * ABSTRACT: kernel: utils for kStd
@@ -900 +900 @@
 {
   assume(p_sev == pGetShortExpVector(p));
+  if (strat->noClearS) return;
   if (!pLmShortDivisibleBy(p,p_sev, strat->S[*at], ~ strat->sevS[*at])) return;
   deleteInS((*at),strat);