Index: functional.hpp
===================================================================
RCS file: /cvsroot/boost/boost/boost/numeric/ublas/functional.hpp,v
retrieving revision 1.39
diff -u -p -r1.39 functional.hpp
--- functional.hpp	27 Jul 2006 10:27:37 -0000	1.39
+++ functional.hpp	15 Dec 2006 13:30:57 -0000
@@ -1774,6 +1786,7 @@ namespace boost { namespace numeric { na
     template <class Z>
     struct basic_lower {
         typedef Z size_type;
+        typedef lower_tag triangular_type;
 
         template<class L>
         static
@@ -1828,6 +1841,7 @@ namespace boost { namespace numeric { na
     template <class Z>
     struct basic_upper {
         typedef Z size_type;
+        typedef upper_tag triangular_type;
 
         template<class L>
         static
@@ -1882,6 +1896,7 @@ namespace boost { namespace numeric { na
     template <class Z>
     struct basic_unit_lower : public basic_lower<Z> {
         typedef Z size_type;
+        typedef unit_lower_tag triangular_type;
 
         template<class L>
         static
@@ -1925,6 +1940,7 @@ namespace boost { namespace numeric { na
     template <class Z>
     struct basic_unit_upper : public basic_upper<Z> {
         typedef Z size_type;
+        typedef unit_upper_tag triangular_type;
 
         template<class L>
         static
@@ -1968,6 +1984,7 @@ namespace boost { namespace numeric { na
     template <class Z>
     struct basic_strict_lower : public basic_lower<Z> {
         typedef Z size_type;
+        typedef strict_lower_tag triangular_type;
 
         template<class L>
         static
@@ -2026,6 +2043,7 @@ namespace boost { namespace numeric { na
     template <class Z>
     struct basic_strict_upper : public basic_upper<Z> {
         typedef Z size_type;
+        typedef strict_upper_tag triangular_type;
 
         template<class L>
         static