SCM

SCM Repository

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

Diff of /pkg/src/lgCMatrix.c

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

revision 895, Sat Sep 3 21:56:35 2005 UTC revision 951, Wed Sep 28 12:42:51 2005 UTC
# Line 337  Line 337 
337      if (adims[0] != n || adims[1] != n)      if (adims[0] != n || adims[1] != n)
338          error(_("Dimensions of x and y are not compatible for crossprod"));          error(_("Dimensions of x and y are not compatible for crossprod"));
339      SET_SLOT(C, Matrix_iSym,      SET_SLOT(C, Matrix_iSym,
340               Matrix_lgCsyrk(CHAR(asChar(GET_SLOT(C, Matrix_uploSym)))[0] == 'U',               Matrix_lgCsyrk(uplo_P(C)[0] == 'U',
341                              tra, n, k,                              tra, n, k,
342                              INTEGER(GET_SLOT(x, Matrix_iSym)),                              INTEGER(GET_SLOT(x, Matrix_iSym)),
343                              INTEGER(GET_SLOT(x, Matrix_pSym)),                              INTEGER(GET_SLOT(x, Matrix_pSym)),

Legend:
Removed from v.895  
changed lines
  Added in v.951

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