SCM

SCM Repository

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

Diff of /pkg/Matrix/src/dtCMatrix.c

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

revision 1968, Sat Jul 7 22:49:12 2007 UTC revision 2208, Sun Jul 13 15:51:45 2008 UTC
# Line 25  Line 25 
25          if(uploT) {          if(uploT) {
26              for (k = 0; k < nnz; k++)              for (k = 0; k < nnz; k++)
27                  if(xi[k] > xj[k]) {                  if(xi[k] > xj[k]) {
28                      RETURN(mkString(_("uplo='U' must not have sparse entries in lower diagonal")));                      RETURN(mkString(_("uplo='U' must not have sparse entries below the diagonal")));
29                  }                  }
30          }          }
31          else {          else {
32              for (k = 0; k < nnz; k++)              for (k = 0; k < nnz; k++)
33                  if(xi[k] < xj[k]) {                  if(xi[k] < xj[k]) {
34                      RETURN(mkString(_("uplo='L' must not have sparse entries in upper diagonal")));                      RETURN(mkString(_("uplo='L' must not have sparse entries above the diagonal")));
35                  }                  }
36          }          }
37    
# Line 60  Line 60 
60          if(uploT) {          if(uploT) {
61              for (k = 0; k < nnz; k++)              for (k = 0; k < nnz; k++)
62                  if(xi[k] > xj[k]) {                  if(xi[k] > xj[k]) {
63                      RETURN(mkString(_("uplo='U' must not have sparse entries in lower diagonal")));                      RETURN(mkString(_("uplo='U' must not have sparse entries below the diagonal")));
64                  }                  }
65          }          }
66          else {          else {
67              for (k = 0; k < nnz; k++)              for (k = 0; k < nnz; k++)
68                  if(xi[k] < xj[k]) {                  if(xi[k] < xj[k]) {
69                      RETURN(mkString(_("uplo='L' must not have sparse entries in upper diagonal")));                      RETURN(mkString(_("uplo='L' must not have sparse entries above the diagonal")));
70                  }                  }
71          }          }
72    

Legend:
Removed from v.1968  
changed lines
  Added in v.2208

R-Forge@R-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business University of Wisconsin - Madison Powered By FusionForge