/*******************************************************************************
 *
 * TRIQS: a Toolbox for Research in Interacting Quantum Systems
 *
 * Copyright (C) 2012 by M. Ferrero, O. Parcollet
 *
 * TRIQS 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 3 of the License, or (at your option) any later
 * version.
 *
 * TRIQS is distributed in the hope that it will be useful, but WITHOUT ANY
 * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
 * details.
 *
 * You should have received a copy of the GNU General Public License along with
 * TRIQS. If not, see <http://www.gnu.org/licenses/>.
 *
 ******************************************************************************/
#ifndef TRIQS_GF_LEGENDRE_TIME_H
#define TRIQS_GF_LEGENDRE_TIME_H
#include "./tools.hpp"
#include "./gf.hpp"
#include "./local/tail.hpp"
#include "./domains/legendre.hpp"
#include "./meshes/discrete.hpp"

namespace triqs {
namespace gfs {

 struct legendre {};

 // mesh type and its factories
 template <typename Opt> struct gf_mesh<legendre, Opt> : discrete_mesh<legendre_domain> {
  typedef discrete_mesh<legendre_domain> B;
  gf_mesh() = default;
  gf_mesh(double beta, statistic_enum S, size_t n_leg) : B(typename B::domain_t(beta, S, n_leg)) {}
 };

 namespace gfs_implementation {

  // h5 name
  template <typename Opt> struct h5_name<legendre, matrix_valued, nothing, Opt> {
   static std::string invoke() { return "Legendre"; }
  };

  /// ---------------------------  evaluator ---------------------------------

  // Not finished, not tested
  template <typename Opt> struct evaluator<legendre, matrix_valued, nothing, Opt> {
   static constexpr int arity = 1;
   // ERROR : give a double and interpolate
   template <typename G> arrays::matrix_view<double> operator()(G const* g, long n) const {
    return g->data()(n, arrays::range(), arrays::range());
   }
  };

  /// ---------------------------  data access  ---------------------------------

  template <typename Opt> struct data_proxy<legendre, matrix_valued, Opt> : data_proxy_array<double, 3> {};
  template <typename Opt> struct data_proxy<legendre, scalar_valued, Opt> : data_proxy_array<double, 1> {};

 } // gfs_implementation
}
}
#endif