Changeset 2e48e4 in git for libpolys

Timestamp:

Aug 11, 2022, 2:15:03 PM (21 months ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

959b2d791fb6ac7b1528755b4d5a2c9290261b38

Parents:

c93e63b277430f6fe6f6a302af80b2b3f76909a6

Message:

fix: CoeffTerm

Location:

libpolys/polys

Files:

• pCoeff.cc (modified) (3 diffs)
• pCoeff.h (modified) (2 diffs)

libpolys/polys/pCoeff.cc

@@ -18 +18 @@
 #include "simpleideals.h"
 
-/// find coeff of (polynomial/vector) m in polynomial/vector p
+/// find coeff of (polynomial) m in polynomial p
+/// find coeff of (vector) m in vector p
 number p_CoeffTerm(poly p, poly m, const ring r)
 {
@@ -53 +54 @@
 
 /// find coeffs of (polynomial) m in all polynomials from I
+/// find coeffs of (vector) m in all vectors from I
 ideal id_CoeffTerm(ideal I, poly m, const ring r)
 {
-  ideal res=idInit(IDELEMS(I),1);
+  ideal res=idInit(IDELEMS(I),I->rank);
   for(int i=IDELEMS(I)-1;i>=0;i--)
   {
@@ -67 +69 @@
 ideal id_CoeffTermV(ideal M, poly m, const ring r)
 {
-  ideal res=idInit(IDELEMS(M),1);
+  ideal res=idInit(IDELEMS(M),M->rank);
   for(int i=IDELEMS(M)-1;i>=0;i--)
   {

libpolys/polys/pCoeff.h

@@ -17 +17 @@
 #include "simpleideals.h"
 
-/// find coeff of (polynomial/vector) m in polynomial/vector p
+/// find coeff of (polynomial) m in polynomial p
+/// find coeff of (vector) m in vector p
 number p_CoeffTerm(poly p, poly m, const ring r);
 
@@ -24 +25 @@
 
 /// find coeffs of (polynomial) m in all polynomials from I
+/// find coeffs of (vector) m in all vectors from I
 ideal id_CoeffTerm(ideal I, poly m, const ring r);