--- blas.h.orig	2009-03-03 12:47:04.000000000 +0000
+++ blas.h	2009-03-03 12:51:47.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_BLAS_H
 #define BOOST_NUMERIC_BINDINGS_BLAS_BLAS_H
@@ -81,6 +81,10 @@
   void   BLAS_CTRSV( const char* uplo, const char* transa, const char* diag, const int* n, fcomplex_t const* a, int const* lda, const fcomplex_t *x, const int *incx);
   void   BLAS_ZTRSV( const char* uplo, const char* transa, const char* diag, const int* n, dcomplex_t const* a, int const* lda, const dcomplex_t *x, const int *incx);
 
+  void   BLAS_STPSV(const char *uplo, const char *trans, const char *diag, const int *n, const float      *ap, const float      *x, const int *incx);
+  void   BLAS_DTPSV(const char *uplo, const char *trans, const char *diag, const int *n, const double     *ap, const double     *x, const int *incx);
+  void   BLAS_CTPSV(const char *uplo, const char *trans, const char *diag, const int *n, const fcomplex_t *ap, const fcomplex_t *x, const int *incx);
+  void   BLAS_ZTPSV(const char *uplo, const char *trans, const char *diag, const int *n, const dcomplex_t *ap, const dcomplex_t *x, const int *incx);
 
   //
   // Level 3