Changeset ce5d1b in git for Singular/iparith.cc

Timestamp:

Mar 9, 2018, 2:04:12 PM (6 years ago)

Author:

Karim Abou Zeid <karim23697@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

d0e571d99494f542cf693a3408acb2ca2148ac5f

Parents:

e7d857c86f3cb449cc12afb10bd08b618619805845fa962b8938643ace5cdc03f189d4457e4c7408

Message:

Merge branch 'stable' into lpDivision

File:

• Singular/iparith.cc (modified) (1 diff)

Singular/iparith.cc

@@ -5634 +5634 @@
   mp_Monomials((matrix)res->data, rank, pVar((poly)v->Data()),(matrix)w->Data(),currRing);
   return FALSE;
+}
+static BOOLEAN jjELIMIN_ALG(leftv res, leftv u, leftv v, leftv w)
+{
+  ideal I=(ideal)u->Data();
+  GbVariant alg=syGetAlgorithm((char*)w->Data(),currRing,I);
+  res->data=(char *)idElimination(I,(poly)v->Data(),NULL,alg);
+  //setFlag(res,FLAG_STD);
+  return v->next!=NULL; //do not allow next like in eliminate(I,a(1..4))
 }
 static BOOLEAN jjELIMIN_HILB(leftv res, leftv u, leftv v, leftv w)