freemonoid_product.hh

// freemonoid_product.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_HH
# define VCSN_ALGEBRA_CONCEPT_FREEMONOID_PRODUCT_HH

# include <vaucanson/algebra/concept/freemonoid_product_base.hh>
# include <vaucanson/algebra/implementation/monoid/monoid_rep.hh>
# include <vaucanson/algebra/implementation/series/series_rep.hh>
# include <vaucanson/misc/unique.hh>

namespace vcsn {

  namespace algebra {
  
    /*---------------.
    | Predeclaration |
    `---------------*/

    template <class F, class S>
    struct FreeMonoidProduct;

    /*------------------------------------------------------------.
    | Specialization of the MonoidRep structure for this concept. |
    `------------------------------------------------------------*/

    template <typename F, typename S>
    struct MonoidRep<FreeMonoidProduct<F, S> > :
           MonoidRepBase<MonoidRep, FreeMonoidProduct<F, S> >
    {
      std::string open_par;

      std::string sep;

      std::string close_par;

      MonoidRep();
    };

    /*------------------------------------------------------------.
    | Specialization of the SeriesRep structure for this concept. |
    `------------------------------------------------------------*/

    template <typename Semiring, typename F, typename S>
    struct SeriesRep<Semiring, FreeMonoidProduct<F, S> > :
           SeriesRepBase<SeriesRep, Semiring, FreeMonoidProduct<F, S> >
    {
      // The type of the semiring.
      typedef Semiring                          semiring_t;

      // The type of the monoid.
      typedef FreeMonoidProduct<F, S>           monoid_t;

      // The most derived type in the hierarchy.
      typedef SeriesRep<semiring_t, monoid_t>   self_t;

      // Pointer types.
      typedef boost::shared_ptr<self_t>         pointer_t;

      // Type helpers.
      typedef SeriesRep<Semiring, F> first_rep_t;
      typedef SeriesRep<Semiring, S> second_rep_t;

      first_rep_t& first_representation();
      second_rep_t& second_representation();
      const first_rep_t& first_representation() const;
      const second_rep_t& second_representation() const;

      void disambiguate(const monoid_t&, pointer_t&);

    private:

      first_rep_t first_representation_;

      second_rep_t second_representation_;
    };

    template <typename F, typename S>
    bool operator==(boost::shared_ptr<MonoidRep<FreeMonoidProduct<F, S> > >,
                    boost::shared_ptr<MonoidRep<FreeMonoidProduct<F, S> > >);

    template <typename Semiring, typename F, typename S>
    bool operator==(boost::shared_ptr<SeriesRep<Semiring,
                                                FreeMonoidProduct<F, S> > >,
                    boost::shared_ptr<SeriesRep<Semiring,
                                                FreeMonoidProduct<F, S> > >);

    /*------------------------.
    | FreeMonoidProduct<F, S> |
    `------------------------*/

    template<class F, class S>
    struct FreeMonoidProduct
      : FreeMonoidProductBase< FreeMonoidProduct<F, S> >
    {
      // Type helpers.
      typedef F first_monoid_t;
      typedef S second_monoid_t;
      typedef MonoidRep<FreeMonoidProduct<F, S> > monoid_rep_t;
      typedef boost::shared_ptr<monoid_rep_t> shared_monoid_rep_t;

      FreeMonoidProduct(const F& a, const S& b);

      FreeMonoidProduct(const F& a, const S& b, monoid_rep_t mr);

      FreeMonoidProduct(const FreeMonoidProduct& w);

      first_monoid_t&           first_monoid();

      const first_monoid_t&     first_monoid() const;

      second_monoid_t&          second_monoid();

      const second_monoid_t&    second_monoid() const;

      const shared_monoid_rep_t representation() const;

    public:
      void set_representation(monoid_rep_t mr);

    protected:
      first_monoid_t            first_monoid_;
      second_monoid_t           second_monoid_;
      shared_monoid_rep_t       rep_;
    };

    template<class F, class S>
    bool operator==(const FreeMonoidProduct<F, S>& m1,
                    const FreeMonoidProduct<F, S>& m2);

  } // ! algebra
  
  /*-----------------------------------------.
  | dynamic_traits<FreeMonoidProduct<F, S> > |
  `-----------------------------------------*/
  template<class F, class S>
  struct dynamic_traits<algebra::FreeMonoidProduct<F, S> >
    : dynamic_traits<algebra::FreeMonoidProductBase<algebra::FreeMonoidProduct<F, S> > >
  {
    static const bool
    ret = dynamic_traits<F>::ret or dynamic_traits<S>::ret;
  };

  /*----------------------------------------.
  | MetaElement<FreeMonoidProduct<F, S>, T> |
  `----------------------------------------*/
  template<class F, class S, typename T>
  struct MetaElement<algebra::FreeMonoidProduct<F, S>, T>
    : MetaElement<algebra::FreeMonoidProductBase<algebra::FreeMonoidProduct<F, S> >, T>
  {
    typedef F   first_monoid_t;
    typedef S   second_monoid_t;
  };

  template <class F, class S>
  struct virtual_types<algebra::FreeMonoidProduct<F, S> >
    : virtual_types<algebra::FreeMonoidProductBase<algebra::FreeMonoidProduct<F, S> > >
  {
    typedef F           first_monoid_t;
    typedef S           second_monoid_t;
  };

} // vcsn

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


#endif // ! VCSN_ALGEBRA_CONCEPT_FREEMONOID_PRODUCT_HH