Exemplo n.º 1
0
int spadd(int *zir, double *zpr, const int *xir, const double *xpr,
          const int xnnz, const int *yir, const double *ypr, const int ynnz,
          const int iwsize, char *cfound, int *iwork)
{
  if(xnnz < ynnz)
    return spadd2(zir,zpr, yir,ypr,ynnz, xir,xpr,xnnz, iwsize, cfound, iwork);
  else
    return spadd2(zir,zpr, xir,xpr,xnnz, yir,ypr,ynnz, iwsize, cfound, iwork);
}
Exemplo n.º 2
0
mwIndex spadd(mwIndex *zir, double *zpr, const mwIndex *xir, const double *xpr,
          const mwIndex xnnz, const mwIndex *yir, const double *ypr, const mwIndex ynnz,
          const mwIndex iwsize, bool *cfound, mwIndex *iwork)
{
  if(xnnz < ynnz)
    return spadd2(zir,zpr, yir,ypr,ynnz, xir,xpr,xnnz, iwsize, cfound, iwork);
  else
    return spadd2(zir,zpr, xir,xpr,xnnz, yir,ypr,ynnz, iwsize, cfound, iwork);
}