Changeset 308757 in git for kernel/ideals.cc

Timestamp:

Apr 2, 2008, 10:09:32 AM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a657104b677b4c461d018cbf3204d72d34ad66a9')

Children:

e2a25ef5bf4799a4cf39ed869c34d7dc56eb7ef7

Parents:

9676ea20c5b413901217dc054c67c5e9b03a512a

Message:

*hannes: OPT_RETURN_SB in idSect


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

File:

• kernel/ideals.cc (modified) (4 diffs)

kernel/ideals.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ideals.cc,v 1.51 2008-03-20 10:58:24 Singular Exp $ */
+/* $Id: ideals.cc,v 1.52 2008-04-02 08:09:32 Singular Exp $ */
 /*
 * ABSTRACT - all basic methods to manipulate ideals
@@ -1144 +1144 @@
 
   idSkipZeroes(result);
-  return result;
+  if (TEST_OPT_RETURN_SB)
+  {
+     temp1=kStd(result,currQuotient,testHomog,&w);
+     if (w!=NULL) delete w;
+     idDelete(&result);
+     return temp1;
+  }
+  else //temp1=kInterRed(result,currQuotient);
+    return result;
 }
 
@@ -1233 +1241 @@
 
   /* interprete result ----------------------------------------*/
-  result = idInit(8,maxrk);
+  result = idInit(IDELEMS(tempstd),maxrk);
   k = 0;
   for (j=0;j<IDELEMS(tempstd);j++)
@@ -1239 +1247 @@
     if ((tempstd->m[j]!=NULL) && (p_GetComp(tempstd->m[j],syz_ring)>syzComp))
     {
-      if (k>=IDELEMS(result))
-      {
-        pEnlargeSet(&(result->m),IDELEMS(result),8);
-        IDELEMS(result) += 8;
-      }
       if (syz_ring==orig_ring)
         p = pCopy(tempstd->m[j]);