portelli/Grid
1
0
Fork 0
mirror of https://github.com/paboyle/Grid.git synced 2024-11-10 07:55:35 +00:00
Code Releases Activity

L1p controls

Browse Source
This commit is contained in:
Peter Boyle 2016-12-22 17:52:55 +00:00
parent 9ae81c06d2
commit caba0d42a5
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lib/qcd/action/fermion/WilsonKernels.h
View File

@ -34,6 +34,8 @@ directory
namespace Grid {
namespace QCD {
void bgq_l1p_optimisation(int mode);
////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Helper routines that implement Wilson stencil for a single site.
// Common to both the WilsonFermion and WilsonFermion5D
@ -58,8 +60,9 @@ public:
DiracOptDhopSite(StencilImpl &st, LebesgueOrder &lo, DoubledGaugeField &U, SiteHalfSpinor * buf,
int sF, int sU, int Ls, int Ns, const FermionField &in, FermionField &out)
{
bgq_l1p_optimisation(1);
switch(Opt) {
#ifdef AVX512
#if defined(AVX512) || defined (QPX)
case OptInlineAsm:
WilsonKernels<Impl>::DiracOptAsmDhopSite(st,lo,U,buf,sF,sU,Ls,Ns,in,out);
break;
@ -85,6 +88,7 @@ public:
default:
assert(0);
}
bgq_l1p_optimisation(0);
}
template <bool EnableBool = true>
@ -106,8 +110,9 @@ public:
DiracOptDhopSiteDag(StencilImpl &st, LebesgueOrder &lo, DoubledGaugeField &U, SiteHalfSpinor * buf,
int sF, int sU, int Ls, int Ns, const FermionField &in, FermionField &out) {
bgq_l1p_optimisation(1);
switch(Opt) {
#ifdef AVX512
#if defined(AVX512) || defined (QPX)
case OptInlineAsm:
WilsonKernels<Impl>::DiracOptAsmDhopSiteDag(st,lo,U,buf,sF,sU,Ls,Ns,in,out);
break;
@ -133,6 +138,7 @@ public:
default:
assert(0);
}
bgq_l1p_optimisation(0);
}
template <bool EnableBool = true>