SCM

SCM Repository

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

Diff of /pkg/src/dtrMatrix.c

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

revision 1462, Tue Aug 29 16:34:49 2006 UTC revision 1463, Tue Aug 29 22:30:57 2006 UTC
# Line 81  Line 81 
81          error(_("Dimensions of system to be solved are inconsistent"));          error(_("Dimensions of system to be solved are inconsistent"));
82      F77_CALL(dtrsm)("L", uplo_P(a), "N", diag_P(a),      F77_CALL(dtrsm)("L", uplo_P(a), "N", diag_P(a),
83                      &n, &nrhs, &one, REAL(GET_SLOT(a, Matrix_xSym)), &n,                      &n, &nrhs, &one, REAL(GET_SLOT(a, Matrix_xSym)), &n,
84                      REAL(GET_SLOT(b, Matrix_xSym)), &n);                      REAL(GET_SLOT(ans, Matrix_xSym)), &n);
85      UNPROTECT(1);      UNPROTECT(1);
86      return ans;      return ans;
87  }  }

Legend:
Removed from v.1462  
changed lines
  Added in v.1463

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