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

◆ MO_pack4()

void MO_pack4 ( int nvars,
const int * expon,
int * slots )
static

Definition at line 345 of file imonorder.cpp.

346{
347 int32_t i;
348 if (nvars == 0) return;
349 while (1)
350 {
351 i = safe::fits_7(*expon++) << 24;
352 if (--nvars == 0) break;
353 i |= safe::fits_7(*expon++) << 16;
354 if (--nvars == 0) break;
355 i |= safe::fits_7(*expon++) << 8;
356 if (--nvars == 0) break;
357 i |= safe::fits_7(*expon++);
358 if (--nvars == 0) break;
359 *slots++ = i;
360 }
361 *slots++ = i;
362}
static int32_t fits_7(int32_t x, const char *msg)
Definition overflow.hpp:74

References safe::fits_7(), and mon_part::nvars.

Referenced by monomialOrderEncodeFromActualExponents().