semiring_base.hh

// semiring_base.hh: this file is part of the Vaucanson project.
//
// Vaucanson, a generic library for finite state machines.
//
// Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2011 The Vaucanson Group.
//
// This program is free software; you can redistribute it and/or
// modify it under the terms of the GNU General Public License
// as published by the Free Software Foundation; either version 2
// of the License, or (at your option) any later version.
//
// The complete GNU General Public Licence Notice can be found as the
// `COPYING' file in the root directory.
//
// The Vaucanson Group consists of people listed in the `AUTHORS' file.
//
#ifndef VCSN_ALGEBRA_CONCEPT_SEMIRING_BASE_HH
# define VCSN_ALGEBRA_CONCEPT_SEMIRING_BASE_HH

# include <vaucanson/algebra/concept/monoid_base.hh>
# include <vaucanson/misc/contract.hh>
# include <string>
# include <vaucanson/algebra/implementation/semiring/q_number.hh>

namespace vcsn {

  namespace algebra {

    /*-------------------.
    | SemiringBase<Self> |
    `-------------------*/

    template <class Self>
    struct SemiringBase : MonoidBase<Self>
    {
    public:
      template <class T>
      bool can_choose_non_starable(SELECTOR(T)) const;

      template <class T>
      Element<Self, T>  choose_starable(SELECTOR(T)) const;

      template <class T>
      Element<Self, T> choose_non_starable(SELECTOR(T)) const;
    protected:
      SemiringBase();

      SemiringBase(const SemiringBase& other);
    };

  } // algebra

  /*------------------------------------.
  | dynamic_traits<SemiringBase<Self> > |
  `------------------------------------*/

  template<typename Self>
  struct dynamic_traits<algebra::SemiringBase<Self> >
    : dynamic_traits<algebra::MonoidBase<Self> >
  { };

  template<typename S>
  struct virtual_types<algebra::SemiringBase<S> >
    : virtual_types<algebra::MonoidBase<S> >
  { };

  /*-----------------------------------.
  | MetaElement<SemiringBase<Self>, T> |
  `-----------------------------------*/

  template <typename Self, typename T>
  struct MetaElement<algebra::SemiringBase<Self>, T>
    : MetaElement<algebra::MonoidBase<Self>, T>
  {
    Element<Self, T>&   star();

    bool                starable() const;

  protected:
    MetaElement();

    MetaElement(const MetaElement& other);
  };

  template <typename S, typename T>
  struct op_star_traits
  {
    typedef Element<S, T> ret_t;
  };


  template <typename S, typename T>
  struct semiring_traits
  {
    enum { is_positive = 0 };
  };

  template <typename S, typename T>
  typename op_star_traits<S, T>::ret_t
  star(const Element<S, T>& w);

  template <typename S, typename T>
  bool
  parse_weight(Element<S, T>& w, const std::string&,
               typename std::string::const_iterator&);

  template <typename S, typename T>
  bool starable(const Element<S, T>& elt);

  namespace algebra {

    // default implementations:

    template <typename S, typename T>
    bool
    op_can_choose_non_starable(const algebra::SemiringBase<S>& set,
                               SELECTOR(T));

    template <typename S, typename T>
    Element<S, T>
    op_choose_starable(const algebra::SemiringBase<S>& set, SELECTOR(T));

    template <typename S, typename T>
    Element<S, T>
    op_choose_non_starable(const algebra::SemiringBase<S>& set, SELECTOR(T));


    template <typename S, typename T>
    bool
    op_parse(const algebra::SemiringBase<S>&, T& w,
          const std::string&,
          typename std::string::const_iterator&);

    template <typename Self, typename T>
    bool op_starable(const algebra::SemiringBase<Self>& s, const T& v);

    template <typename Self, typename T>
    void op_in_star(const algebra::SemiringBase<Self>& s, T& v);

    template <typename Self, typename T>
    T op_default(SELECTOR(algebra::SemiringBase<Self>), SELECTOR(T));

  } // algebra

} // vcsn

# if !defined VCSN_USE_INTERFACE_ONLY || defined VCSN_USE_LIB
#  include <vaucanson/algebra/concept/semiring_base.hxx>
# endif // VCSN_USE_INTERFACE_ONLY

#endif // ! VCSN_ALGEBRA_CONCEPT_SEMIRING_BASE_HH