--- blas2_overloads.hpp.orig	2009-03-03 12:47:04.000000000 +0000
+++ blas2_overloads.hpp	2009-03-03 12:50:16.000000000 +0000
@@ -5,7 +5,7 @@
 // (See accompanying file LICENSE_1_0.txt or copy at
 // http://www.boost.org/LICENSE_1_0.txt)
 //
-// Modified to include dtrsv by Kian Ming A. Chai (3 Mar 2009)
+// Modified to include xtrsv/xtpsv by Kian Ming A. Chai (3 Mar 2009)
 
 #ifndef BOOST_NUMERIC_BINDINGS_BLAS_BLAS2_OVERLOADS_HPP
 #define BOOST_NUMERIC_BINDINGS_BLAS_BLAS2_OVERLOADS_HPP
@@ -33,9 +33,30 @@
 
   // Added by Kian Ming A. Chai (3 Mar 2009)
   inline
+  void trsv( char UPLO, char TRANS, char DIAG, const int& n, const float *a_ptr, const int& lda, float *x_ptr, const int& incx) {
+    BLAS_STRSV( &UPLO, &TRANS, &DIAG, &n, a_ptr, &lda, x_ptr, &incx );
+  }
+  inline
   void trsv( char UPLO, char TRANS, char DIAG, const int& n, const double *a_ptr, const int& lda, double *x_ptr, const int& incx) {
     BLAS_DTRSV( &UPLO, &TRANS, &DIAG, &n, a_ptr, &lda, x_ptr, &incx );
   }
+  inline
+  void trsv( char UPLO, char TRANS, char DIAG, const int& n, const complex_f *a_ptr, const int& lda, complex_f *x_ptr, const int& incx) {
+    BLAS_CTRSV( &UPLO, &TRANS, &DIAG, &n, complex_ptr( a_ptr ), &lda, complex_ptr( x_ptr ), &incx );
+  }
+  inline
+  void trsv( char UPLO, char TRANS, char DIAG, const int& n, const complex_d *a_ptr, const int& lda, complex_d *x_ptr, const int& incx) {
+    BLAS_ZTRSV( &UPLO, &TRANS, &DIAG, &n, complex_ptr( a_ptr ), &lda, complex_ptr( x_ptr ), &incx );
+  }
+
+  inline
+  void tpsv( char UPLO, char TRANS, char DIAG, const int& n, const float    * ap_ptr, const float    * x_ptr, const int& incx) { BLAS_STPSV( &UPLO, &TRANS, &DIAG, &n,            ( ap_ptr ),            ( x_ptr ), &incx ) ; }
+  inline
+  void tpsv( char UPLO, char TRANS, char DIAG, const int& n, const double   * ap_ptr, const double   * x_ptr, const int& incx) { BLAS_DTPSV( &UPLO, &TRANS, &DIAG, &n,            ( ap_ptr ),            ( x_ptr ), &incx ) ; }
+  inline
+  void tpsv( char UPLO, char TRANS, char DIAG, const int& n, const complex_f* ap_ptr, const complex_f* x_ptr, const int& incx) { BLAS_CTPSV( &UPLO, &TRANS, &DIAG, &n, complex_ptr( ap_ptr ), complex_ptr( x_ptr ), &incx ) ; }
+  inline
+  void tpsv( char UPLO, char TRANS, char DIAG, const int& n, const complex_d* ap_ptr, const complex_d* x_ptr, const int& incx) { BLAS_ZTPSV( &UPLO, &TRANS, &DIAG, &n, complex_ptr( ap_ptr ), complex_ptr( x_ptr ), &incx ) ; }
 
 /*  
   inline