Changeset 22b066 in git for kernel/kutil.cc

Timestamp:

Sep 9, 2008, 5:46:14 PM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'd0474371d8c5d8068ab70bfb42719c97936b18a6')

Children:

9db056766710393a837733e7b1f765e86500c2ff

Parents:

6e0c3942bc16fb74916f2a0298c99fd48a0477bc

Message:

*hannes: better size estimate for initS


git-svn-id: file:///usr/local/Singular/svn/trunk@11038 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.106 2008-07-28 18:14:24 Singular Exp $ */
+/* $Id: kutil.cc,v 1.107 2008-09-09 15:46:14 Singular Exp $ */
 /*
 * ABSTRACT: kernel: utils for kStd
@@ -4729 +4729 @@
 *construct the set s from F
 */
-void initS (ideal F, ideal Q,kStrategy strat)
+void initS (ideal F, ideal Q, kStrategy strat)
 {
   int   i,pos;
 
-  if (Q!=NULL) i=((IDELEMS(Q)+(setmaxTinc-1))/setmaxTinc)*setmaxTinc;
-  else i=setmaxT;
+  if (Q!=NULL) i=((IDELEMS(F)+IDELEMS(Q)+(setmaxTinc-1))/setmaxTinc)*setmaxTinc;
+  else         i=((IDELEMS(F)+(setmaxTinc-1))/setmaxTinc)*setmaxTinc;
   strat->ecartS=initec(i);
   strat->sevS=initsevS(i);