freemonoid_product_base.hh

// freemonoid_product_base.hh: this file is part of the Vaucanson project.
//
// Vaucanson, a generic library for finite state machines.
//
// Copyright (C) 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_CONCEPT_FREEMONOID_PRODUCT_BASE_HH
# define VCSN_ALGEBRA_CONCEPT_FREEMONOID_PRODUCT_BASE_HH

# include <vaucanson/algebra/concept/alphabets_base.hh>
# include <vaucanson/algebra/concept/monoid_base.hh>
# include <string>
# include <list>

namespace vcsn {

  namespace algebra {

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

    template<class Self>
    struct FreeMonoidProductBase
      : MonoidBase<Self>
    {
      typedef typename virtual_types<Self>::first_monoid_t first_monoid_t;

      typedef typename virtual_types<Self>::second_monoid_t second_monoid_t;

      // FIXME
      typedef undefined_type alphabet_t;
      typedef undefined_type letter_t;

      first_monoid_t&   first_monoid();

      const first_monoid_t& first_monoid() const;

      second_monoid_t& second_monoid();

      const second_monoid_t& second_monoid() const;

    protected:
      FreeMonoidProductBase();

      FreeMonoidProductBase(const FreeMonoidProductBase& m);
    };

  } // algebra

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

  template<class Self>
  struct dynamic_traits<algebra::FreeMonoidProductBase<Self> >
    : dynamic_traits<algebra::MonoidBase<Self> >
  { };

  /*------------------------------------------.
  | virtual_types<FreeMonoidProductBase<Self> |
  `------------------------------------------*/

  template<typename S>
  struct virtual_types<algebra::FreeMonoidProductBase<S> >
    : virtual_types<algebra::MonoidBase<S> >
  {
    typedef undefined_type first_monoid_t;
    typedef undefined_type second_monoid_t;
  };


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

  template<class Self, typename T>
  struct MetaElement<algebra::FreeMonoidProductBase<Self>, T>
    : MetaElement<algebra::MonoidBase<Self>, T>
  {
    typedef typename virtual_types<Self>::first_monoid_t first_monoid_t;
    typedef typename virtual_types<Self>::second_monoid_t second_monoid_t;

    typedef typename T::first_type              first_monoid_elt_value_t;
    typedef typename T::second_type             second_monoid_elt_value_t;

    typedef Element<first_monoid_t, first_monoid_elt_value_t>
                                                first_monoid_elt_t;
    typedef Element<second_monoid_t, second_monoid_elt_value_t>
                                                second_monoid_elt_t;

    first_monoid_elt_t& first();

    const first_monoid_elt_t& first() const;

    second_monoid_elt_t& second();

    const second_monoid_elt_t& second() const;

    void mirror();

    template <class Ftor>
    typename Ftor::result_type  length(Ftor f);

  protected:
    MetaElement();

    MetaElement(const MetaElement& other);
  };

  // FIXME: it should more closely follow freemonoid_base.
  namespace algebra
  {
    template<typename Self, typename St, typename T>
    St&
    op_rout(const FreeMonoidProductBase<Self>& s, St& st, const T& v);

  } // ! algebra

} // ! vcsn

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

#endif // ! VCSN_ALGEBRA_CONCEPT_FREEMONOID_PRODUCT_BASE_HH