SCM

SCM Repository

[matrix] Diff of /pkg/src/dgeMatrix.c
ViewVC logotype

Diff of /pkg/src/dgeMatrix.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 692, Mon Apr 18 14:34:33 2005 UTC revision 694, Mon Apr 18 17:11:32 2005 UTC
# Line 183  Line 183 
183                       dims,                       dims,
184                       INTEGER(ALLOC_SLOT(val, Matrix_permSym, INTSXP, npiv)),                       INTEGER(ALLOC_SLOT(val, Matrix_permSym, INTSXP, npiv)),
185                       &info);                       &info);
186      if (info)      if (info < 0)
187          error(_("Lapack routine %s returned error code %d"), "dgetrf", info);          error(_("Lapack routine %s returned error code %d"), "dgetrf", info);
188        else if (info > 0)
189            warning(_("Exact singularity detected during LU decomposition."));
190      UNPROTECT(1);      UNPROTECT(1);
191      return set_factors(x, val, "LU");      return set_factors(x, val, "LU");
192  }  }

Legend:
Removed from v.692  
changed lines
  Added in v.694

root@r-forge.r-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business Powered By FusionForge