Changeset 94eaef in git for kernel/ideals.cc

Timestamp:

May 15, 2007, 11:28:08 AM (16 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '91fdef05f09f54b8d58d92a472e9c4a43aa4656f')

Children:

c4628515d8baf5bdb1da71f2a9a89ae569679aae

Parents:

a0d723d42a120df2caba2c9a10f521d728abf46b

Message:

*hannes: idChineseRemainder for intvec


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

File:

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

kernel/ideals.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ideals.cc,v 1.42 2007-05-03 13:27:44 Singular Exp $ */
+/* $Id: ideals.cc,v 1.43 2007-05-15 09:28:08 Singular Exp $ */
 /*
 * ABSTRACT - all basic methods to manipulate ideals
@@ -3749 +3749 @@
   return result;
 }
+ideal idChineseRemainder(ideal *xx, intvec *iv)
+{
+  int rl=iv->length();
+  number *q=(number *)omAlloc(rl*sizeof(number));
+  int i;
+  for(i=0; i<rl; i++)
+  {
+    q[i]=nInit((*iv)[i]);
+  }
+  return idChineseRemainder(xx,q,rl);
+}