binomial_ring() [2/2]

binomial_ring::binomial_ring	(	const PolynomialRing *	RR,
		int *	wts,
		bool	revlex0 )

Definition at line 17 of file gb-toric.cpp.

    : R(RR),
      F(RR->make_FreeModule(1)),
      nvars(RR->n_vars()),
      have_weights(wts != nullptr),
      weights(nullptr),
      revlex(revlex0)
{
  int i;
 
  nslots = nvars + 1;
  degrees = newarray_atomic(int, nvars);
  for (i = 0; i < nvars; i++)
    degrees[i] = -R->getMonoid()->primary_degree_of_var(i);
 
  if (have_weights)
    {
      nslots++;
      weights = newarray_atomic(int, nvars);
      for (i = 0; i < nvars; i++) weights[i] = -wts[i];
    }
 
  monstash = new stash("monomials", sizeof(int) * nslots);
}

References degrees, F, have_weights, monstash, newarray_atomic, nslots, nvars, R, revlex, and weights.