mirror of
https://github.com/paboyle/Grid.git
synced 2025-04-25 05:05:56 +01:00
Hadrons: defaults Impls for different precisions
This commit is contained in:
parent
408130b808
commit
464c81706e
@ -62,10 +62,10 @@ Application::Application(void)
|
|||||||
LOG(Message) << std::endl;
|
LOG(Message) << std::endl;
|
||||||
LOG(Message) << "** Default parameters (and associated C macros)" << std::endl;
|
LOG(Message) << "** Default parameters (and associated C macros)" << std::endl;
|
||||||
LOG(Message) << "ASCII output precision : " << MACOUT(DEFAULT_ASCII_PREC) << std::endl;
|
LOG(Message) << "ASCII output precision : " << MACOUT(DEFAULT_ASCII_PREC) << std::endl;
|
||||||
LOG(Message) << "Fermion implementation : " << MACOUTS(FIMPL) << std::endl;
|
LOG(Message) << "Fermion implementation : " << MACOUTS(FIMPLBASE) << std::endl;
|
||||||
LOG(Message) << "z-Fermion implementation: " << MACOUTS(ZFIMPL) << std::endl;
|
LOG(Message) << "z-Fermion implementation: " << MACOUTS(ZFIMPLBASE) << std::endl;
|
||||||
LOG(Message) << "Scalar implementation : " << MACOUTS(SIMPL) << std::endl;
|
LOG(Message) << "Scalar implementation : " << MACOUTS(SIMPLBASE) << std::endl;
|
||||||
LOG(Message) << "Gauge implementation : " << MACOUTS(GIMPL) << std::endl;
|
LOG(Message) << "Gauge implementation : " << MACOUTS(GIMPLBASE) << std::endl;
|
||||||
LOG(Message) << "Eigenvector base size : "
|
LOG(Message) << "Eigenvector base size : "
|
||||||
<< MACOUT(HADRONS_DEFAULT_LANCZOS_NBASIS) << std::endl;
|
<< MACOUT(HADRONS_DEFAULT_LANCZOS_NBASIS) << std::endl;
|
||||||
LOG(Message) << "Schur decomposition : " << MACOUTS(HADRONS_DEFAULT_SCHUR) << std::endl;
|
LOG(Message) << "Schur decomposition : " << MACOUTS(HADRONS_DEFAULT_SCHUR) << std::endl;
|
||||||
|
@ -62,18 +62,36 @@ using Grid::operator>>;
|
|||||||
|
|
||||||
#define END_MODULE_NAMESPACE }
|
#define END_MODULE_NAMESPACE }
|
||||||
|
|
||||||
#ifndef FIMPL
|
#define _HADRONS_IMPL(impl, sub) impl##sub
|
||||||
#define FIMPL WilsonImplR
|
#define HADRONS_IMPL(impl, sub) _HADRONS_IMPL(impl, sub)
|
||||||
|
|
||||||
|
#ifndef FIMPLBASE
|
||||||
|
#define FIMPLBASE WilsonImpl
|
||||||
#endif
|
#endif
|
||||||
#ifndef ZFIMPL
|
#define FIMPL HADRONS_IMPL(FIMPLBASE, R)
|
||||||
#define ZFIMPL ZWilsonImplR
|
#define FIMPLF HADRONS_IMPL(FIMPLBASE, F)
|
||||||
|
#define FIMPLD HADRONS_IMPL(FIMPLBASE, D)
|
||||||
|
|
||||||
|
#ifndef ZFIMPLBASE
|
||||||
|
#define ZFIMPLBASE ZWilsonImpl
|
||||||
#endif
|
#endif
|
||||||
#ifndef SIMPL
|
#define ZFIMPL HADRONS_IMPL(ZFIMPLBASE, R)
|
||||||
#define SIMPL ScalarImplCR
|
#define ZFIMPLF HADRONS_IMPL(ZFIMPLBASE, F)
|
||||||
|
#define ZFIMPLD HADRONS_IMPL(ZFIMPLBASE, D)
|
||||||
|
|
||||||
|
#ifndef SIMPLBASE
|
||||||
|
#define SIMPLBASE ScalarImplC
|
||||||
#endif
|
#endif
|
||||||
#ifndef GIMPL
|
#define SIMPL HADRONS_IMPL(SIMPLBASE, R)
|
||||||
#define GIMPL PeriodicGimplR
|
#define SIMPLF HADRONS_IMPL(SIMPLBASE, F)
|
||||||
|
#define SIMPLD HADRONS_IMPL(SIMPLBASE, D)
|
||||||
|
|
||||||
|
#ifndef GIMPLBASE
|
||||||
|
#define GIMPLBASE PeriodicGimpl
|
||||||
#endif
|
#endif
|
||||||
|
#define GIMPL HADRONS_IMPL(GIMPLBASE, R)
|
||||||
|
#define GIMPLF HADRONS_IMPL(GIMPLBASE, F)
|
||||||
|
#define GIMPLD HADRONS_IMPL(GIMPLBASE, D)
|
||||||
|
|
||||||
BEGIN_HADRONS_NAMESPACE
|
BEGIN_HADRONS_NAMESPACE
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user