words.hh

// words.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, 2008 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_IMPLEMENTATION_FREE_MONOID_WORDS_HH
# define VCSN_ALGEBRA_IMPLEMENTATION_FREE_MONOID_WORDS_HH

# include <string>
# include <vaucanson/algebra/concept/freemonoid_base.hh>
# include <vaucanson/misc/unique.hh>
# include <vaucanson/misc/usual_macros.hh>

namespace vcsn
{
  namespace algebra
  {  
    /*--------------.
    | FreeMonoid<A> |
    `--------------*/

    template<typename A>
    struct FreeMonoid
      : FreeMonoidBase<FreeMonoid<A> >
    {
      typedef A alphabets_elt_t;

      FreeMonoid(const A& a);

      FreeMonoid(const FreeMonoid& w);

      A&        alphabet();

      const A&  alphabet() const;

    protected:
      A alph_;
    };

    template<typename A>
    bool operator==(const FreeMonoid<A>& a,
                    const FreeMonoid<A>& b);

    /*---------------------------------------------------------------------.
    | word_traits<FreeMonoid<A>, std::basic_string<typename A::letter_t> > |
    `---------------------------------------------------------------------*/

    template <typename A>
    struct word_traits<FreeMonoid<A>,
                       std::basic_string<typename A::letter_t> >
    {
      typedef A alphabet_t;

      typedef Element<FreeMonoid<A>,
              std::basic_string<typename alphabet_t::letter_t> > word_t;

      typedef typename word_t::value_t word_value_t;

      typedef typename alphabet_traits<typename alphabet_t::set_t,
                                       typename alphabet_t::value_t>::
	first_projection_t first_projection_alphabet_t;

      typedef typename alphabet_traits<typename alphabet_t::set_t,
                                       typename alphabet_t::value_t>::
	second_projection_t second_projection_alphabet_t;

      typedef FreeMonoid<first_projection_alphabet_t> first_monoid_t;

      typedef FreeMonoid<second_projection_alphabet_t> second_monoid_t;

      typedef Element<first_monoid_t,
              std::basic_string<typename first_projection_alphabet_t::
                                letter_t> > first_projection_t;

      typedef typename first_projection_t::value_t first_projection_value_t;

      typedef Element<second_monoid_t,
              std::basic_string<typename second_projection_alphabet_t::
                                letter_t> > second_projection_t;

      typedef typename second_projection_t::value_t second_projection_value_t;

      static first_projection_t first_projection(const first_monoid_t&,
                                                 const word_t&);
      static first_projection_value_t first_projection(const word_value_t&);

      static second_projection_t second_projection(const second_monoid_t&,
                                                   const word_t&);
      static second_projection_value_t second_projection(const word_value_t&);
    };

  } // ! algebra
  
  /*-------------------------------.
  | dynamic_traits<FreeMonoid<A> > |
  `-------------------------------*/
  template<typename A>
  struct dynamic_traits<algebra::FreeMonoid<A> >
    : dynamic_traits<algebra::FreeMonoidBase<algebra::FreeMonoid<A> > >
  {
    static const bool           ret = A::dynamic;
  };

  /*------------------------------.
  | MetaElement<FreeMonoid<A>, T> |
  `------------------------------*/
  template<typename A, typename T>
  struct MetaElement<algebra::FreeMonoid<A>, T>
    : MetaElement<algebra::FreeMonoidBase<algebra::FreeMonoid<A> >, T>
  {};

  template <class A>
  struct virtual_types<algebra::FreeMonoid<A> >
    : virtual_types<algebra::FreeMonoidBase<algebra::FreeMonoid<A> > >
  {
    typedef algebra::mul_kind semigroup_kind;

    typedef A           alphabet_t;
  };

  enum op_choose_max_word_length_t { op_choose_max_word_length = 32 };

} // ! vcsn

# if !defined VCSN_USE_INTERFACE_ONLY || defined VCSN_USE_LIB
#  include <vaucanson/algebra/implementation/free_monoid/words.hxx>
# endif // VCSN_USE_INTERFACE_ONLY

#endif // ! VCSN_ALGEBRA_IMPLEMENTATION_FREE_MONOID_WORDS_HH

---