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

◆ monomial_divisor()

void PolyRing::monomial_divisor ( const ring_elem a,
exponents_t exp ) const
virtual

Reimplemented from Ring.

Definition at line 2137 of file poly.cpp.

2140{
2141 exponents_t exp1 = newarray_atomic(int, n_vars());
2142 for (Nterm& t : a)
2143 {
2144 M_->to_expvector(t.monom, exp1);
2145 exponents::gcd(n_vars(), exp1, exp, exp);
2146 }
2147}
exponents::Exponents exponents_t
static void gcd(int nvars, ConstExponents a, ConstExponents b, Exponents result)
const Monoid * M_
Definition polyring.hpp:124
int n_vars() const
Definition polyring.hpp:196
#define newarray_atomic(T, len)
Definition newdelete.hpp:91

References ExponentVector< int, true >::gcd(), PolynomialRing::M_, PolynomialRing::n_vars(), and newarray_atomic.