toon-members
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Toon-members] TooN LU.h


From: Edward Rosten
Subject: [Toon-members] TooN LU.h
Date: Wed, 08 Apr 2009 17:40:49 +0000

CVSROOT:        /cvsroot/toon
Module name:    TooN
Changes by:     Edward Rosten <edrosten>        09/04/08 17:40:49

Modified files:
        .              : LU.h 

Log message:
        Fix non-compiling LU.backsub(Vector)

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/TooN/LU.h?cvsroot=toon&r1=1.14&r2=1.15

Patches:
Index: LU.h
===================================================================
RCS file: /cvsroot/toon/TooN/LU.h,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -b -r1.14 -r1.15
--- LU.h        4 Mar 2009 12:55:29 -0000       1.14
+++ LU.h        8 Apr 2009 17:40:48 -0000       1.15
@@ -86,7 +86,7 @@
   template <int Rows, class Base>
   Vector<Size,Precision> backsub(const Vector<Rows,Precision,Base>& rhs){
     //Check the number of rows is OK.
-    SizeMismatch<Size, Rows>::test(my_lu.num_rows(), rhs.num_rows());
+    SizeMismatch<Size, Rows>::test(my_lu.num_rows(), rhs.size());
        
     Vector<Size, Precision> result(rhs);
 
@@ -95,8 +95,8 @@
     double alpha=1;
     int lda=my_lu.num_rows();
     int ldb=1;
-    trsm_("R","U","N","N",&M,&N,&alpha,&my_lu[0][0],&lda,&result[0][0],&ldb);
-    trsm_("R","L","N","U",&M,&N,&alpha,&my_lu[0][0],&lda,&result[0][0],&ldb);
+    trsm_("R","U","N","N",&M,&N,&alpha,&my_lu[0][0],&lda,&result[0],&ldb);
+    trsm_("R","L","N","U",&M,&N,&alpha,&my_lu[0][0],&lda,&result[0],&ldb);
 
     // now do the row swapping (lapack dlaswp.f only shuffles fortran rows = 
Rowmajor cols)
     for(int i=N-1; i>=0; i--){




reply via email to

[Prev in Thread] Current Thread [Next in Thread]