wrapperFrobbyAlexanderDual()

MonomialIdeal * wrapperFrobbyAlexanderDual ( const MonomialIdeal * I, const M2_arrayint top )

static

Definition at line 362 of file monomial-ideal.cpp.

{
  // Create a Frobby Ideal containing I.
  int nv = I->topvar() + 1;
  if (nv == 0)
    {
      INTERNAL_ERROR("attempting to use frobby with zero variables");
      return nullptr;
    }
 
  mpz_t *topvec = nullptr;
  if (top->len > 0)
    {
      topvec = newarray(mpz_t, top->len);
      for (int i = 0; i < top->len; i++)
        mpz_init_set_si(topvec[i], top->array[i]);
    }
 
  MonomialIdeal *result = FrobbyAlexanderDual(I, topvec);
 
  // Clean up
  if (topvec != nullptr)
    {
      for (int i = 0; i < top->len; i++) mpz_clear(topvec[i]);
      freemem(topvec);
    }
 
  return result;
}

References freemem(), FrobbyAlexanderDual(), INTERNAL_ERROR(), newarray, result(), and MonomialIdeal::topvar().

Referenced by alexDual().