--- lapack_names.h.orig	2008-06-09 12:55:57.670072000 +0100
+++ lapack_names.h	2008-06-09 12:58:18.441520000 +0100
@@ -13,6 +13,7 @@
  * University of Zagreb, Croatia.
  *
  */
+/* Modified to include xgeqp3 by Kian Ming A. Chai (14 May 2008) */
 
 #ifndef BOOST_NUMERIC_BINDINGS_LAPACK_LAPACK_NAMES_H
 #define BOOST_NUMERIC_BINDINGS_LAPACK_LAPACK_NAMES_H
@@ -196,6 +197,11 @@
 #define LAPACK_CGEQRF FORTRAN_ID( cgeqrf )
 #define LAPACK_ZGEQRF FORTRAN_ID( zgeqrf )
 
+#define LAPACK_SGEQP3 FORTRAN_ID( sgeqp3 )
+#define LAPACK_DGEQP3 FORTRAN_ID( dgeqp3 )
+#define LAPACK_CGEQP3 FORTRAN_ID( cgeqp3 )
+#define LAPACK_ZGEQP3 FORTRAN_ID( zgeqp3 )
+
 // Apply orthogonal transformation
 
 #define LAPACK_SORMQR FORTRAN_ID( sormqr )