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

◆ debug_out() [1/2]

void GBinhom_comp::debug_out ( buffer & o,
s_pair * q ) const

Definition at line 948 of file gb-sugarless.cpp.

949{
950 if (q == nullptr) return;
951 monomial m = M->make_one();
952 o << "(";
953 if (q->first != nullptr)
954 o << q->first->me;
955 else
956 o << ".";
957 o << " ";
958 if (q->second != nullptr)
959 o << q->second->me;
960 else
961 o << ".";
962 o << " ";
963 if (q->first != nullptr)
964 {
965 M->divide(q->lcm, q->first->f->monom, m);
966 M->elem_text_out(o, m);
967 o << ' ';
968 }
969 if (q->second != nullptr)
970 {
971 M->divide(q->lcm, q->second->f->monom, m);
972 M->elem_text_out(o, m);
973 o << ' ';
974 }
975 M->elem_text_out(o, q->lcm);
976 M->remove(m);
977 if (q->compare_num < 0) o << " marked";
978 o << ") ";
979}
const Monoid * M
#define monomial
Definition gb-toric.cpp:11
gbvector * f
Definition spair.hpp:58
int me
Definition spair.hpp:62
int monom[1]
Definition gbring.hpp:83
int * lcm
Definition spair.hpp:95
gb_elem * second
Definition spair.hpp:97
gb_elem * first
Definition spair.hpp:96
int compare_num
Definition spair.hpp:93

References s_pair::compare_num, gb_elem::f, s_pair::first, s_pair::lcm, M, gb_elem::me, gbvector::monom, monomial, and s_pair::second.