#ifndef glas_concept_is_scalar_expression_hpp
#define glas_concept_is_scalar_expression_hpp

#include <glas/concept/template_for_is.hpp>
#include <glas/concept/scalar_expression_concept.hpp>
#include <glas/concept/concept.hpp>
#include <boost/mpl/or.hpp>
#include <boost/mpl/if.hpp>
#include <boost/mpl/bool.hpp>
#include <boost/mpl/front.hpp>
#include <boost/mpl/pop_front.hpp>
#include <boost/mpl/empty.hpp>

namespace glas {

  namespace detail {

    template <class T>
    struct is_scalar_expression_aux
    : template_for_is< T, is_scalar_expression_aux >
    {} ;

    template <>
    struct is_scalar_expression_aux< scalar_expression_concept >
    : boost::mpl::true_
    {} ;

  } // namespace detail



  template <class Expression>
  struct is_scalar_expression
  : detail::is_scalar_expression_aux< typename glas::concept<Expression>::type >
  {} ;

}

#endif