SCM

SCM Repository

[matrix] Diff of /pkg/R/dtCMatrix.R
ViewVC logotype

Diff of /pkg/R/dtCMatrix.R

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

revision 1330, Fri Jul 21 08:28:18 2006 UTC revision 1331, Sat Jul 22 17:59:53 2006 UTC
# Line 63  Line 63 
63            function(a, b, ...) {            function(a, b, ...) {
64                if (a@diag == "U") {                if (a@diag == "U") {
65                    if (a@uplo == "U")                    if (a@uplo == "U")
66                        return(.Call(dtCMatrix_upper_solve, a,                        return(.Call(dtCMatrix_upper_solve, a))
                                    PACKAGE = "Matrix"))  
67                    else                    else
68                        return(t(.Call(dtCMatrix_upper_solve, t(a),                        return(t(.Call(dtCMatrix_upper_solve, t(a))))
                                      PACKAGE = "Matrix")))  
69                }                }
70                .Call(dtCMatrix_solve, a)                .Call(dtCMatrix_solve, a)
71            }, valueClass = "dtCMatrix")            }, valueClass = "dtCMatrix")

Legend:
Removed from v.1330  
changed lines
  Added in v.1331

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