Changeset e070895 in git for kernel/ideals.cc

Timestamp:

Oct 6, 2009, 11:32:54 AM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

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

Children:

16a86e2831249582a4e9cc321c76313bad539fdd

Parents:

3e96c5dc8f5e261b746d32bb4d985ec8def80154

Message:

*hannes; idInsertPoly


git-svn-id: file:///usr/local/Singular/svn/trunk@12160 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.79 2009-09-29 10:36:23 Singular Exp $ */
+/* $Id: ideals.cc,v 1.80 2009-10-06 09:32:54 Singular Exp $ */
 /*
 * ABSTRACT - all basic methods to manipulate ideals
@@ -70 +70 @@
 }
 
-//#ifndef __OPTIMIZE__
-// this is mainly for outputting an ideal within the debugger & DetailedPrint
+#ifndef __OPTIMIZE__
+// this is only for outputting an ideal within the debugger
 void idShow(const ideal id, const ring lmRing, const ring tailRing, const int debugPrint)
 {
@@ -91 +91 @@
   }
 }
-//#endif
+#endif
 
 /*2
@@ -541 +541 @@
 
 /*2
+* concat h1 and h2
+*/
+void idInsertPoly (ideal h1,poly h2)
+{
+  if (h2==NULL) return;
+  int j = IDELEMS(h1)-1;
+  while ((j >= 0) && (h1->m[j] == NULL)) j--;
+  j++;
+  if (j==IDELEMS(h1))
+  {
+    pEnlargeSet(&(h1->m),IDELEMS(h1),16);
+    IDELEMS(h1)+=16;
+  }
+  h1->m[j]=h2;
+}
+
+/*2
 * h1 + h2
 */