Changeset 64968f in git for libpolys

Timestamp:

Mar 3, 2022, 10:18:31 AM (2 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

63ad20b824d8e8065f545d4b6fe5e0b55e703aee

Parents:

9b8070091a4e1d875250d32943f6fc38457cb7c4

Message:

opt: InpAdd, InpMult for ntupel.cc

File:

• libpolys/coeffs/ntupel.cc (modified) (3 diffs)

libpolys/coeffs/ntupel.cc

@@ -70 +70 @@
     i++;
     if (d[i]==NULL) return (number)C;
+  }
+}
+
+static void nnInpMult (number &a,number b, const coeffs r)
+{
+  number_array A=(number_array)a;
+  number_array B=(number_array)b;
+  coeffs_array d=(coeffs_array)r->data;
+  int i=0;
+  loop
+  {
+    d[i]->cfInpMult(A[i],B[i],d[i]);
+    i++;
+    if (d[i]==NULL) return;
   }
 }
@@ -167 +181 @@
     i++;
     if (d[i]==NULL) return (number)C;
+  }
+}
+
+static void nnInpAdd (number &a, number b, const coeffs r)
+{
+  number_array A=(number_array)a;
+  number_array B=(number_array)b;
+  coeffs_array d=(coeffs_array)r->data;
+  int i=0;
+  loop
+  {
+    d[i]->cfInpAdd(A[i],B[i],d[i]);
+    i++;
+    if (d[i]==NULL) return;
   }
 }
@@ -601 +629 @@
   n->cfInt  = nnInt;
   n->cfAdd  = nnAdd;
+  n->cfInpAdd  = nnInpAdd;
   n->cfSub  = nnSub;
   n->cfMult = nnMult;
+  n->cfInpMult = nnInpMult;
   n->cfDiv  = nnDiv;
   n->cfExactDiv= nnDiv;