51 for (
int i=0;
i<
l;
i++)
60 if ((
col == 1)&&(not_mat))
122 for (
int i=
row*
col-1;
i>=0;
i--) {
v[
i] *= intop; }
127 if (intop == 0)
return;
141 if ((
col!=1) ||(op->
cols()!=1))
163 for (; i<op->
rows(); i++)
183 for (i=0; i<mn; i++) (*iv)[
i] = (*a)[
i] + (*b)[
i];
188 for(i=mn; i<ma; i++) (*iv)[
i] = (*a)[
i];
192 for(i=mn; i<ma; i++) (*iv)[
i] = (*b)[
i];
197 if (mn != ma)
return NULL;
199 for (i=0; i<mn*a->
cols(); i++) { (*iv)[
i] += (*b)[
i]; }
213 for (i=0; i<mn; i++) (*iv)[
i] = (*a)[
i] - (*b)[
i];
218 for(i=mn; i<ma; i++) (*iv)[
i] = (*a)[
i];
222 for(i=mn; i<ma; i++) (*iv)[
i] = -(*b)[
i];
227 if (mn != ma)
return NULL;
229 for (i=0; i<mn*a->
cols(); i++) { (*iv)[
i] -= (*b)[
i]; }
const CanonicalForm int s
static int si_min(const int a, const int b)
int64vec * iv64Add(int64vec *a, int64vec *b)
void show(int mat=0, int spaces=0)
char * iv64String(int not_mat=1, int mat=0, int spaces=0, int dim=2)
void StringSetS(const char *st)
void StringAppendS(const char *st)
int64vec * iv64Sub(int64vec *a, int64vec *b)
static int si_max(const int a, const int b)
int compare(const int64vec *o) const
void PrintS(const char *s)
void operator/=(int64 intop)
void operator*=(int64 intop)
void PrintNSpaces(const int n)