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

◆ new_gen()

hm_elem * HermiteComputation::new_gen ( int i)
private

Definition at line 21 of file hermite.cpp.

22{
23 hm_elem *result = new hm_elem;
25 mpz_init(result->lead);
26 if ((*gens)[i] == nullptr)
27 {
28 result->f = nullptr;
29 }
30 else
31 {
32 mpz_abs(result->lead, (*gens)[i]->coeff.get_mpz());
33 result->f = globalZZ->copy_vec(gens->elem(i));
34 }
35 if (i < n_comps_per_syz)
36 result->fsyz = globalZZ->e_sub_i(i);
37 else
38 result->fsyz = nullptr;
39 result->next = nullptr;
40 return result;
41}
const Matrix * gens
Definition hermite.hpp:61
vec copy_vec(const vecterm *v) const
Definition ring-vecs.cpp:91
vec e_sub_i(int r) const
Definition ring-vecs.cpp:85
RingZZ * globalZZ
Definition relem.cpp:13
static long nallocs_hm_elem
Definition hermite.cpp:10
VALGRIND_MAKE_MEM_DEFINED & result(result)

References gens, globalZZ, n_comps_per_syz, nallocs_hm_elem, and result().

Referenced by HermiteComputation().