mirror of
https://github.com/triqs/dft_tools
synced 2024-11-01 11:43:47 +01:00
80 lines
2.8 KiB
C++
80 lines
2.8 KiB
C++
/*******************************************************************************
|
|
*
|
|
* TRIQS: a Toolbox for Research in Interacting Quantum Systems
|
|
*
|
|
* Copyright (C) 2012-2013 by 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/>.
|
|
*
|
|
******************************************************************************/
|
|
#pragma once
|
|
#include "./tools.hpp"
|
|
#include "./gf.hpp"
|
|
|
|
namespace triqs {
|
|
namespace gfs {
|
|
namespace gfs_implementation {
|
|
|
|
// simple evaluation : take the point on the grid...
|
|
struct evaluator_grid_simple {
|
|
long n;
|
|
evaluator_grid_simple() = default;
|
|
template <typename MeshType, typename PointType> evaluator_grid_simple(MeshType const &m, PointType const &p) { n = p; }
|
|
template <typename F> auto operator()(F const &f) const DECL_AND_RETURN(f(n));
|
|
};
|
|
|
|
// a linear interpolation
|
|
struct evaluator_grid_linear_interpolation {
|
|
double w1, w2;
|
|
size_t n1, n2;
|
|
|
|
evaluator_grid_linear_interpolation() = default;
|
|
|
|
template <typename MeshType, typename PointType>
|
|
evaluator_grid_linear_interpolation(MeshType const &m, PointType const &p, double prefactor = 1) {
|
|
bool in;
|
|
double w;
|
|
std::tie(in, n1, w) = windowing(m, p);
|
|
if (!in) TRIQS_RUNTIME_ERROR << " Evaluation out of bounds";
|
|
w1 = prefactor * (1 - w);
|
|
w2 = prefactor * w;
|
|
n2 = n1 + 1;
|
|
}
|
|
|
|
template <typename F> auto operator()(F const &f) const DECL_AND_RETURN(w1 *f(n1) + w2 *f(n2));
|
|
};
|
|
|
|
// the evaluator for various types.
|
|
template <typename MeshType> struct evaluator_fnt_on_mesh;
|
|
|
|
// cannot use inherited constructors, too recent...
|
|
#define TRIQS_INHERIT_AND_FORWARD_CONSTRUCTOR(NEWCLASS, CLASS) : CLASS { \
|
|
template <typename... T> NEWCLASS(T &&... t) : CLASS(std::forward<T>(t)...) {}; \
|
|
};
|
|
|
|
//
|
|
template <typename Variable> struct evaluator_one_var {
|
|
public:
|
|
static constexpr int arity = 1;
|
|
evaluator_one_var() = default;
|
|
template <typename G>
|
|
auto operator()(G const *g, double x) const DECL_AND_RETURN(evaluator_fnt_on_mesh<Variable>(g -> mesh(), x)(on_mesh(*g)));
|
|
template <typename G> typename G::singularity_t const &operator()(G const *g, freq_infty const &) const {
|
|
return g->singularity();
|
|
}
|
|
};
|
|
}
|
|
}
|
|
}
|