mirror of
https://github.com/paboyle/Grid.git
synced 2024-11-14 01:35:36 +00:00
141 lines
4.9 KiB
C++
141 lines
4.9 KiB
C++
/*************************************************************************************
|
|
|
|
Grid physics library, www.github.com/paboyle/Grid
|
|
|
|
Source file: Hadrons/Modules/MAction/WilsonClover.hpp
|
|
|
|
Copyright (C) 2015-2018
|
|
|
|
Author: Antonin Portelli <antonin.portelli@me.com>
|
|
Author: Guido Cossu <guido.cossu@ed.ac.uk>
|
|
Author: pretidav <david.preti@csic.es>
|
|
|
|
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.
|
|
|
|
This program 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 this program; if not, write to the Free Software Foundation, Inc.,
|
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
|
|
See the full license in the file "LICENSE" in the top level distribution directory
|
|
*************************************************************************************/
|
|
/* END LEGAL */
|
|
|
|
#ifndef Hadrons_MAction_WilsonClover_hpp_
|
|
#define Hadrons_MAction_WilsonClover_hpp_
|
|
|
|
#include <Hadrons/Global.hpp>
|
|
#include <Hadrons/Module.hpp>
|
|
#include <Hadrons/ModuleFactory.hpp>
|
|
|
|
BEGIN_HADRONS_NAMESPACE
|
|
|
|
/******************************************************************************
|
|
* Wilson clover quark action *
|
|
******************************************************************************/
|
|
BEGIN_MODULE_NAMESPACE(MAction)
|
|
|
|
class WilsonCloverPar: Serializable
|
|
{
|
|
public:
|
|
GRID_SERIALIZABLE_CLASS_MEMBERS(WilsonCloverPar,
|
|
std::string, gauge,
|
|
double , mass,
|
|
double , csw_r,
|
|
double , csw_t,
|
|
WilsonAnisotropyCoefficients ,clover_anisotropy,
|
|
std::string, boundary,
|
|
std::string, twist
|
|
);
|
|
};
|
|
|
|
template <typename FImpl>
|
|
class TWilsonClover: public Module<WilsonCloverPar>
|
|
{
|
|
public:
|
|
FERM_TYPE_ALIASES(FImpl,);
|
|
public:
|
|
// constructor
|
|
TWilsonClover(const std::string name);
|
|
// destructor
|
|
virtual ~TWilsonClover(void) {};
|
|
// dependencies/products
|
|
virtual std::vector<std::string> getInput(void);
|
|
virtual std::vector<std::string> getOutput(void);
|
|
// setup
|
|
virtual void setup(void);
|
|
// execution
|
|
virtual void execute(void);
|
|
};
|
|
|
|
MODULE_REGISTER_TMP(WilsonClover, TWilsonClover<FIMPL>, MAction);
|
|
#ifdef GRID_DEFAULT_PRECISION_DOUBLE
|
|
MODULE_REGISTER_TMP(WilsonCloverF, TWilsonClover<FIMPLF>, MAction);
|
|
#endif
|
|
|
|
/******************************************************************************
|
|
* TWilsonClover template implementation *
|
|
******************************************************************************/
|
|
// constructor /////////////////////////////////////////////////////////////////
|
|
template <typename FImpl>
|
|
TWilsonClover<FImpl>::TWilsonClover(const std::string name)
|
|
: Module<WilsonCloverPar>(name)
|
|
{}
|
|
|
|
// dependencies/products ///////////////////////////////////////////////////////
|
|
template <typename FImpl>
|
|
std::vector<std::string> TWilsonClover<FImpl>::getInput(void)
|
|
{
|
|
std::vector<std::string> in = {par().gauge};
|
|
|
|
return in;
|
|
}
|
|
|
|
template <typename FImpl>
|
|
std::vector<std::string> TWilsonClover<FImpl>::getOutput(void)
|
|
{
|
|
std::vector<std::string> out = {getName()};
|
|
|
|
return out;
|
|
}
|
|
|
|
// setup ///////////////////////////////////////////////////////////////////////
|
|
template <typename FImpl>
|
|
void TWilsonClover<FImpl>::setup(void)
|
|
{
|
|
LOG(Message) << "Setting up Wilson clover fermion matrix with m= " << par().mass
|
|
<< " using gauge field '" << par().gauge << "'" << std::endl;
|
|
LOG(Message) << "Fermion boundary conditions: " << par().boundary
|
|
<< std::endl;
|
|
LOG(Message) << "Clover term csw_r: " << par().csw_r
|
|
<< " csw_t: " << par().csw_t
|
|
<< std::endl;
|
|
auto &U = envGet(GaugeField, par().gauge);
|
|
auto &grid = *envGetGrid(FermionField);
|
|
auto &gridRb = *envGetRbGrid(FermionField);
|
|
typename WilsonCloverFermion<FImpl>::ImplParams implParams;
|
|
implParams.boundary_phases = strToVec<Complex>(par().boundary);
|
|
implParams.twist_n_2pi_L = strToVec<Real>(par().twist);
|
|
envCreateDerived(FMat, WilsonCloverFermion<FImpl>, getName(), 1, U, grid,
|
|
gridRb, par().mass, par().csw_r, par().csw_t,
|
|
par().clover_anisotropy, implParams);
|
|
}
|
|
|
|
// execution ///////////////////////////////////////////////////////////////////
|
|
template <typename FImpl>
|
|
void TWilsonClover<FImpl>::execute()
|
|
{}
|
|
|
|
END_MODULE_NAMESPACE
|
|
|
|
END_HADRONS_NAMESPACE
|
|
|
|
#endif // Hadrons_WilsonClover_hpp_
|