Macaulay2 Engine
Loading...
Searching...
No Matches

◆ to_vector()

vec res_poly::to_vector ( const resterm * f,
const FreeModule * F,
int to_minimal = 0 ) const

Definition at line 257 of file res-a1-poly.cpp.

260{
261 vecHeap H(F);
262 monomial mon = M->make_one();
263 for (const resterm *tm = f; tm != nullptr; tm = tm->next)
264 {
265 // int x = (to_minimal ? tm->comp->minimal_me : tm->comp->me);
266 int x =
267 tm->comp
268 ->minimal_me; // MES: Currently used for non-minimal as well...
269 M->divide(tm->monom, tm->comp->base_monom, mon);
270
271 ring_elem a = R->make_flat_term(tm->coeff, mon);
272 vec tmp = R->make_vec(x, a);
273 H.add(tmp);
274 }
275 M->remove(mon);
276 return H.value();
277}
const PolynomialRing * R
const Monoid * M
#define monomial
Definition gb-toric.cpp:11
volatile int x

References vecHeap::add(), M, monomial, resterm::next, R, vecHeap::value(), and x.