--- workspace.hpp.orig	2009-03-03 15:38:57.000000000 +0000
+++ workspace.hpp	2009-03-03 15:36:14.000000000 +0000
@@ -10,6 +10,7 @@
  * University of Zagreb, Croatia.
  *
  */
+/* Added irwork_traits by K.M.A. Chai (3 March 2009 )*/
 
 #ifndef BOOST_NUMERIC_BINDINGS_LAPACK_WORKSPACE_HPP
 #define BOOST_NUMERIC_BINDINGS_LAPACK_WORKSPACE_HPP
@@ -102,6 +103,27 @@
         static const int value = 2 ;
      };
 
+
+    // Added by KMA Chai (3 March 2009)
+    // select the type for the iwork/rwork space used in ppcon and  trcon
+    template <typename T> struct ir_workspace_traits;
+    
+    template<> struct ir_workspace_traits<float> {
+      typedef int type;
+    };
+    
+    template<> struct ir_workspace_traits<double> {
+      typedef int type;
+    };
+    
+    template<> struct ir_workspace_traits<traits::complex_f> {
+      typedef float type;
+    };
+    
+    template<> struct ir_workspace_traits<traits::complex_d> {
+      typedef double type;
+    };
+    
   }
 
 }}}