SCM

SCM Repository

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

Diff of /pkg/src/dsCMatrix.c

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

revision 296, Mon Oct 4 17:13:29 2004 UTC revision 308, Wed Oct 27 21:39:44 2004 UTC
# Line 111  Line 111 
111      Lp = INTEGER(GET_SLOT(Chol, Matrix_pSym));      Lp = INTEGER(GET_SLOT(Chol, Matrix_pSym));
112      Lx = REAL(GET_SLOT(Chol, Matrix_xSym));      Lx = REAL(GET_SLOT(Chol, Matrix_xSym));
113      D = REAL(GET_SLOT(Chol, Matrix_DSym));      D = REAL(GET_SLOT(Chol, Matrix_DSym));
114      for (j = 0; j < bdims[1]; j++, in += n, out += n) {      for (j = 0; j < ncol; j++, in += n, out += n) {
115          if (piv) ldl_perm(n, out, in, INTEGER(perm));          if (piv) ldl_perm(n, out, in, INTEGER(perm));
116          else Memcpy(out, in, n);          else Memcpy(out, in, n);
117          ldl_lsolve(n, out, Lp, Li, Lx);          ldl_lsolve(n, out, Lp, Li, Lx);

Legend:
Removed from v.296  
changed lines
  Added in v.308

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