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

◆ support()

M2_arrayint FractionField::support ( const ring_elem a) const
virtual

Reimplemented from Ring.

Definition at line 295 of file frac.cpp.

296{
297 const frac_elem *f = FRAC_VAL(a);
298 M2_arrayint result1 = R_->support(f->numer);
299 M2_arrayint result2 = R_->support(f->denom);
300 M2_arrayint result = M2_makearrayint(result1->len + result2->len);
301 for (int i = 0; i < result1->len; i++) result->array[i] = result1->array[i];
302 for (int i = 0; i < result2->len; i++)
303 result->array[result1->len + i] = result2->array[i];
304
305 return result;
306}
const PolyRingFlat * R_
Definition frac.hpp:63
#define FRAC_VAL(f)
Definition frac.cpp:14
VALGRIND_MAKE_MEM_DEFINED & result(result)
M2_arrayint M2_makearrayint(int n)
Definition m2-types.cpp:6
ring_elem numer
Definition frac.hpp:43
ring_elem denom
Definition frac.hpp:44

References frac_elem::denom, FRAC_VAL, M2_makearrayint(), frac_elem::numer, R_, and result().