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

◆ to_varpower_monomial()

void ResMonoidSparse::to_varpower_monomial ( res_const_packed_monomial m,
res_varpower_monomial result ) const
inline

Definition at line 250 of file res-moninfo-sparse.hpp.

252 {
253 // 'result' must have enough space allocated
255 int len = 0;
256 res_varpower_word* r = result + 1;
257
258 if (mFirstVar != *m) // ie, m != 1.
259 {
260 int currentvar = m[mFirstVar];
261 int deg = 1;
262 const int* mend = m + *m;
263 for (auto p = m + mFirstVar + 1; p != mend; ++p)
264 {
265 if (*p == currentvar)
266 deg++;
267 else
268 {
269 *r++ = currentvar;
270 *r++ = deg;
271 len++;
272 currentvar = *p;
273 deg = 1;
274 }
275 }
276 }
277 result[0] = len;
278 }
unsigned long ncalls_to_varpower
int p
VALGRIND_MAKE_MEM_DEFINED & result(result)
res_varpower_monomials::Exponent res_varpower_word

References mFirstVar, ncalls_to_varpower, p, and result().