mirror of
https://github.com/paboyle/Grid.git
synced 2025-04-09 21:50:45 +01:00
Namespace and format changes
This commit is contained in:
paboyle
parent
a84ebe5624
commit
9f6cebe5ff
@ -28,221 +28,220 @@ with this program; if not, write to the Free Software Foundation, Inc.,
|
|||||||
|
|
||||||
See the full license in the file "LICENSE" in the top level distribution directory
|
See the full license in the file "LICENSE" in the top level distribution directory
|
||||||
*************************************************************************************/
|
*************************************************************************************/
|
||||||
/* END LEGAL */
|
/* END LEGAL */
|
||||||
|
|
||||||
#include <Grid/qcd/action/fermion/FermionCore.h>
|
#include <Grid/qcd/action/fermion/FermionCore.h>
|
||||||
#include <Grid/qcd/action/fermion/DomainWallEOFAFermion.h>
|
#include <Grid/qcd/action/fermion/DomainWallEOFAFermion.h>
|
||||||
|
|
||||||
namespace Grid {
|
NAMESPACE_BEGIN(Grid);
|
||||||
namespace QCD {
|
|
||||||
|
|
||||||
// FIXME -- make a version of these routines with site loop outermost for cache reuse.
|
// FIXME -- make a version of these routines with site loop outermost for cache reuse.
|
||||||
|
|
||||||
// Pminus fowards
|
// Pminus fowards
|
||||||
// Pplus backwards..
|
// Pplus backwards..
|
||||||
template<class Impl>
|
template<class Impl>
|
||||||
void DomainWallEOFAFermion<Impl>::M5D(const FermionField& psi, const FermionField& phi,
|
void DomainWallEOFAFermion<Impl>::M5D(const FermionField& psi, const FermionField& phi,
|
||||||
FermionField& chi, std::vector<Coeff_t>& lower, std::vector<Coeff_t>& diag, std::vector<Coeff_t>& upper)
|
FermionField& chi, std::vector<Coeff_t>& lower, std::vector<Coeff_t>& diag, std::vector<Coeff_t>& upper)
|
||||||
{
|
{
|
||||||
int Ls = this->Ls;
|
int Ls = this->Ls;
|
||||||
GridBase* grid = psi._grid;
|
GridBase* grid = psi._grid;
|
||||||
|
|
||||||
assert(phi.checkerboard == psi.checkerboard);
|
assert(phi.checkerboard == psi.checkerboard);
|
||||||
chi.checkerboard = psi.checkerboard;
|
chi.checkerboard = psi.checkerboard;
|
||||||
// Flops = 6.0*(Nc*Ns) *Ls*vol
|
// Flops = 6.0*(Nc*Ns) *Ls*vol
|
||||||
this->M5Dcalls++;
|
this->M5Dcalls++;
|
||||||
this->M5Dtime -= usecond();
|
this->M5Dtime -= usecond();
|
||||||
|
|
||||||
parallel_for(int ss=0; ss<grid->oSites(); ss+=Ls){ // adds Ls
|
parallel_for(int ss=0; ss<grid->oSites(); ss+=Ls){ // adds Ls
|
||||||
for(int s=0; s<Ls; s++){
|
for(int s=0; s<Ls; s++){
|
||||||
auto tmp = psi._odata[0];
|
auto tmp = psi._odata[0];
|
||||||
if(s==0) {
|
if(s==0) {
|
||||||
spProj5m(tmp, psi._odata[ss+s+1]);
|
spProj5m(tmp, psi._odata[ss+s+1]);
|
||||||
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
||||||
spProj5p(tmp, psi._odata[ss+Ls-1]);
|
spProj5p(tmp, psi._odata[ss+Ls-1]);
|
||||||
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
||||||
} else if(s==(Ls-1)) {
|
} else if(s==(Ls-1)) {
|
||||||
spProj5m(tmp, psi._odata[ss+0]);
|
spProj5m(tmp, psi._odata[ss+0]);
|
||||||
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
||||||
spProj5p(tmp, psi._odata[ss+s-1]);
|
spProj5p(tmp, psi._odata[ss+s-1]);
|
||||||
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
||||||
} else {
|
} else {
|
||||||
spProj5m(tmp, psi._odata[ss+s+1]);
|
spProj5m(tmp, psi._odata[ss+s+1]);
|
||||||
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
||||||
spProj5p(tmp, psi._odata[ss+s-1]);
|
spProj5p(tmp, psi._odata[ss+s-1]);
|
||||||
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
this->M5Dtime += usecond();
|
this->M5Dtime += usecond();
|
||||||
|
}
|
||||||
|
|
||||||
|
template<class Impl>
|
||||||
|
void DomainWallEOFAFermion<Impl>::M5Ddag(const FermionField& psi, const FermionField& phi,
|
||||||
|
FermionField& chi, std::vector<Coeff_t>& lower, std::vector<Coeff_t>& diag, std::vector<Coeff_t>& upper)
|
||||||
|
{
|
||||||
|
int Ls = this->Ls;
|
||||||
|
GridBase* grid = psi._grid;
|
||||||
|
assert(phi.checkerboard == psi.checkerboard);
|
||||||
|
chi.checkerboard=psi.checkerboard;
|
||||||
|
|
||||||
|
// Flops = 6.0*(Nc*Ns) *Ls*vol
|
||||||
|
this->M5Dcalls++;
|
||||||
|
this->M5Dtime -= usecond();
|
||||||
|
|
||||||
|
parallel_for(int ss=0; ss<grid->oSites(); ss+=Ls){ // adds Ls
|
||||||
|
auto tmp = psi._odata[0];
|
||||||
|
for(int s=0; s<Ls; s++){
|
||||||
|
if(s==0) {
|
||||||
|
spProj5p(tmp, psi._odata[ss+s+1]);
|
||||||
|
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
||||||
|
spProj5m(tmp, psi._odata[ss+Ls-1]);
|
||||||
|
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
||||||
|
} else if(s==(Ls-1)) {
|
||||||
|
spProj5p(tmp, psi._odata[ss+0]);
|
||||||
|
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
||||||
|
spProj5m(tmp, psi._odata[ss+s-1]);
|
||||||
|
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
||||||
|
} else {
|
||||||
|
spProj5p(tmp, psi._odata[ss+s+1]);
|
||||||
|
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
||||||
|
spProj5m(tmp, psi._odata[ss+s-1]);
|
||||||
|
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
this->M5Dtime += usecond();
|
||||||
|
}
|
||||||
|
|
||||||
|
template<class Impl>
|
||||||
|
void DomainWallEOFAFermion<Impl>::MooeeInv(const FermionField& psi, FermionField& chi)
|
||||||
|
{
|
||||||
|
GridBase* grid = psi._grid;
|
||||||
|
int Ls = this->Ls;
|
||||||
|
|
||||||
|
chi.checkerboard = psi.checkerboard;
|
||||||
|
|
||||||
|
this->MooeeInvCalls++;
|
||||||
|
this->MooeeInvTime -= usecond();
|
||||||
|
|
||||||
|
parallel_for(int ss=0; ss<grid->oSites(); ss+=Ls){ // adds Ls
|
||||||
|
|
||||||
|
auto tmp1 = psi._odata[0];
|
||||||
|
auto tmp2 = psi._odata[0];
|
||||||
|
|
||||||
|
// flops = 12*2*Ls + 12*2*Ls + 3*12*Ls + 12*2*Ls = 12*Ls * (9) = 108*Ls flops
|
||||||
|
// Apply (L^{\prime})^{-1}
|
||||||
|
chi[ss] = psi[ss]; // chi[0]=psi[0]
|
||||||
|
for(int s=1; s<Ls; s++){
|
||||||
|
spProj5p(tmp1, chi[ss+s-1]);
|
||||||
|
chi[ss+s] = psi[ss+s] - this->lee[s-1]*tmp1;
|
||||||
}
|
}
|
||||||
|
|
||||||
template<class Impl>
|
// L_m^{-1}
|
||||||
void DomainWallEOFAFermion<Impl>::M5Ddag(const FermionField& psi, const FermionField& phi,
|
for(int s=0; s<Ls-1; s++){ // Chi[ee] = 1 - sum[s<Ls-1] -leem[s]P_- chi
|
||||||
FermionField& chi, std::vector<Coeff_t>& lower, std::vector<Coeff_t>& diag, std::vector<Coeff_t>& upper)
|
spProj5m(tmp1, chi[ss+s]);
|
||||||
{
|
chi[ss+Ls-1] = chi[ss+Ls-1] - this->leem[s]*tmp1;
|
||||||
int Ls = this->Ls;
|
|
||||||
GridBase* grid = psi._grid;
|
|
||||||
assert(phi.checkerboard == psi.checkerboard);
|
|
||||||
chi.checkerboard=psi.checkerboard;
|
|
||||||
|
|
||||||
// Flops = 6.0*(Nc*Ns) *Ls*vol
|
|
||||||
this->M5Dcalls++;
|
|
||||||
this->M5Dtime -= usecond();
|
|
||||||
|
|
||||||
parallel_for(int ss=0; ss<grid->oSites(); ss+=Ls){ // adds Ls
|
|
||||||
auto tmp = psi._odata[0];
|
|
||||||
for(int s=0; s<Ls; s++){
|
|
||||||
if(s==0) {
|
|
||||||
spProj5p(tmp, psi._odata[ss+s+1]);
|
|
||||||
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
|
||||||
spProj5m(tmp, psi._odata[ss+Ls-1]);
|
|
||||||
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
|
||||||
} else if(s==(Ls-1)) {
|
|
||||||
spProj5p(tmp, psi._odata[ss+0]);
|
|
||||||
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
|
||||||
spProj5m(tmp, psi._odata[ss+s-1]);
|
|
||||||
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
|
||||||
} else {
|
|
||||||
spProj5p(tmp, psi._odata[ss+s+1]);
|
|
||||||
chi[ss+s] = diag[s]*phi[ss+s] + upper[s]*tmp;
|
|
||||||
spProj5m(tmp, psi._odata[ss+s-1]);
|
|
||||||
chi[ss+s] = chi[ss+s] + lower[s]*tmp;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
this->M5Dtime += usecond();
|
|
||||||
}
|
}
|
||||||
|
|
||||||
template<class Impl>
|
// U_m^{-1} D^{-1}
|
||||||
void DomainWallEOFAFermion<Impl>::MooeeInv(const FermionField& psi, FermionField& chi)
|
for(int s=0; s<Ls-1; s++){ // Chi[s] + 1/d chi[s]
|
||||||
{
|
spProj5p(tmp1, chi[ss+Ls-1]);
|
||||||
GridBase* grid = psi._grid;
|
chi[ss+s] = (1.0/this->dee[s])*chi[ss+s] - (this->ueem[s]/this->dee[Ls])*tmp1;
|
||||||
int Ls = this->Ls;
|
}
|
||||||
|
spProj5m(tmp2, chi[ss+Ls-1]);
|
||||||
|
chi[ss+Ls-1] = (1.0/this->dee[Ls])*tmp1 + (1.0/this->dee[Ls-1])*tmp2;
|
||||||
|
|
||||||
chi.checkerboard = psi.checkerboard;
|
// Apply U^{-1}
|
||||||
|
for(int s=Ls-2; s>=0; s--){
|
||||||
|
spProj5m(tmp1, chi[ss+s+1]);
|
||||||
|
chi[ss+s] = chi[ss+s] - this->uee[s]*tmp1;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
this->MooeeInvCalls++;
|
this->MooeeInvTime += usecond();
|
||||||
this->MooeeInvTime -= usecond();
|
}
|
||||||
|
|
||||||
parallel_for(int ss=0; ss<grid->oSites(); ss+=Ls){ // adds Ls
|
template<class Impl>
|
||||||
|
void DomainWallEOFAFermion<Impl>::MooeeInvDag(const FermionField& psi, FermionField& chi)
|
||||||
|
{
|
||||||
|
GridBase* grid = psi._grid;
|
||||||
|
int Ls = this->Ls;
|
||||||
|
|
||||||
auto tmp1 = psi._odata[0];
|
assert(psi.checkerboard == psi.checkerboard);
|
||||||
auto tmp2 = psi._odata[0];
|
chi.checkerboard = psi.checkerboard;
|
||||||
|
|
||||||
// flops = 12*2*Ls + 12*2*Ls + 3*12*Ls + 12*2*Ls = 12*Ls * (9) = 108*Ls flops
|
std::vector<Coeff_t> ueec(Ls);
|
||||||
// Apply (L^{\prime})^{-1}
|
std::vector<Coeff_t> deec(Ls+1);
|
||||||
chi[ss] = psi[ss]; // chi[0]=psi[0]
|
std::vector<Coeff_t> leec(Ls);
|
||||||
for(int s=1; s<Ls; s++){
|
std::vector<Coeff_t> ueemc(Ls);
|
||||||
spProj5p(tmp1, chi[ss+s-1]);
|
std::vector<Coeff_t> leemc(Ls);
|
||||||
chi[ss+s] = psi[ss+s] - this->lee[s-1]*tmp1;
|
|
||||||
}
|
|
||||||
|
|
||||||
// L_m^{-1}
|
for(int s=0; s<ueec.size(); s++){
|
||||||
for(int s=0; s<Ls-1; s++){ // Chi[ee] = 1 - sum[s<Ls-1] -leem[s]P_- chi
|
ueec[s] = conjugate(this->uee[s]);
|
||||||
spProj5m(tmp1, chi[ss+s]);
|
deec[s] = conjugate(this->dee[s]);
|
||||||
chi[ss+Ls-1] = chi[ss+Ls-1] - this->leem[s]*tmp1;
|
leec[s] = conjugate(this->lee[s]);
|
||||||
}
|
ueemc[s] = conjugate(this->ueem[s]);
|
||||||
|
leemc[s] = conjugate(this->leem[s]);
|
||||||
|
}
|
||||||
|
deec[Ls] = conjugate(this->dee[Ls]);
|
||||||
|
|
||||||
// U_m^{-1} D^{-1}
|
this->MooeeInvCalls++;
|
||||||
for(int s=0; s<Ls-1; s++){ // Chi[s] + 1/d chi[s]
|
this->MooeeInvTime -= usecond();
|
||||||
spProj5p(tmp1, chi[ss+Ls-1]);
|
|
||||||
chi[ss+s] = (1.0/this->dee[s])*chi[ss+s] - (this->ueem[s]/this->dee[Ls])*tmp1;
|
|
||||||
}
|
|
||||||
spProj5m(tmp2, chi[ss+Ls-1]);
|
|
||||||
chi[ss+Ls-1] = (1.0/this->dee[Ls])*tmp1 + (1.0/this->dee[Ls-1])*tmp2;
|
|
||||||
|
|
||||||
// Apply U^{-1}
|
parallel_for(int ss=0; ss<grid->oSites(); ss+=Ls){ // adds Ls
|
||||||
for(int s=Ls-2; s>=0; s--){
|
|
||||||
spProj5m(tmp1, chi[ss+s+1]);
|
|
||||||
chi[ss+s] = chi[ss+s] - this->uee[s]*tmp1;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
this->MooeeInvTime += usecond();
|
auto tmp1 = psi._odata[0];
|
||||||
|
auto tmp2 = psi._odata[0];
|
||||||
|
|
||||||
|
// Apply (U^{\prime})^{-dagger}
|
||||||
|
chi[ss] = psi[ss];
|
||||||
|
for(int s=1; s<Ls; s++){
|
||||||
|
spProj5m(tmp1, chi[ss+s-1]);
|
||||||
|
chi[ss+s] = psi[ss+s] - ueec[s-1]*tmp1;
|
||||||
}
|
}
|
||||||
|
|
||||||
template<class Impl>
|
// U_m^{-\dagger}
|
||||||
void DomainWallEOFAFermion<Impl>::MooeeInvDag(const FermionField& psi, FermionField& chi)
|
for(int s=0; s<Ls-1; s++){
|
||||||
{
|
spProj5p(tmp1, chi[ss+s]);
|
||||||
GridBase* grid = psi._grid;
|
chi[ss+Ls-1] = chi[ss+Ls-1] - ueemc[s]*tmp1;
|
||||||
int Ls = this->Ls;
|
|
||||||
|
|
||||||
assert(psi.checkerboard == psi.checkerboard);
|
|
||||||
chi.checkerboard = psi.checkerboard;
|
|
||||||
|
|
||||||
std::vector<Coeff_t> ueec(Ls);
|
|
||||||
std::vector<Coeff_t> deec(Ls+1);
|
|
||||||
std::vector<Coeff_t> leec(Ls);
|
|
||||||
std::vector<Coeff_t> ueemc(Ls);
|
|
||||||
std::vector<Coeff_t> leemc(Ls);
|
|
||||||
|
|
||||||
for(int s=0; s<ueec.size(); s++){
|
|
||||||
ueec[s] = conjugate(this->uee[s]);
|
|
||||||
deec[s] = conjugate(this->dee[s]);
|
|
||||||
leec[s] = conjugate(this->lee[s]);
|
|
||||||
ueemc[s] = conjugate(this->ueem[s]);
|
|
||||||
leemc[s] = conjugate(this->leem[s]);
|
|
||||||
}
|
|
||||||
deec[Ls] = conjugate(this->dee[Ls]);
|
|
||||||
|
|
||||||
this->MooeeInvCalls++;
|
|
||||||
this->MooeeInvTime -= usecond();
|
|
||||||
|
|
||||||
parallel_for(int ss=0; ss<grid->oSites(); ss+=Ls){ // adds Ls
|
|
||||||
|
|
||||||
auto tmp1 = psi._odata[0];
|
|
||||||
auto tmp2 = psi._odata[0];
|
|
||||||
|
|
||||||
// Apply (U^{\prime})^{-dagger}
|
|
||||||
chi[ss] = psi[ss];
|
|
||||||
for(int s=1; s<Ls; s++){
|
|
||||||
spProj5m(tmp1, chi[ss+s-1]);
|
|
||||||
chi[ss+s] = psi[ss+s] - ueec[s-1]*tmp1;
|
|
||||||
}
|
|
||||||
|
|
||||||
// U_m^{-\dagger}
|
|
||||||
for(int s=0; s<Ls-1; s++){
|
|
||||||
spProj5p(tmp1, chi[ss+s]);
|
|
||||||
chi[ss+Ls-1] = chi[ss+Ls-1] - ueemc[s]*tmp1;
|
|
||||||
}
|
|
||||||
|
|
||||||
// L_m^{-\dagger} D^{-dagger}
|
|
||||||
for(int s=0; s<Ls-1; s++){
|
|
||||||
spProj5m(tmp1, chi[ss+Ls-1]);
|
|
||||||
chi[ss+s] = (1.0/deec[s])*chi[ss+s] - (leemc[s]/deec[Ls-1])*tmp1;
|
|
||||||
}
|
|
||||||
spProj5p(tmp2, chi[ss+Ls-1]);
|
|
||||||
chi[ss+Ls-1] = (1.0/deec[Ls-1])*tmp1 + (1.0/deec[Ls])*tmp2;
|
|
||||||
|
|
||||||
// Apply L^{-dagger}
|
|
||||||
for(int s=Ls-2; s>=0; s--){
|
|
||||||
spProj5p(tmp1, chi[ss+s+1]);
|
|
||||||
chi[ss+s] = chi[ss+s] - leec[s]*tmp1;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
this->MooeeInvTime += usecond();
|
|
||||||
}
|
}
|
||||||
|
|
||||||
#ifdef DOMAIN_WALL_EOFA_DPERP_CACHE
|
// L_m^{-\dagger} D^{-dagger}
|
||||||
|
for(int s=0; s<Ls-1; s++){
|
||||||
|
spProj5m(tmp1, chi[ss+Ls-1]);
|
||||||
|
chi[ss+s] = (1.0/deec[s])*chi[ss+s] - (leemc[s]/deec[Ls-1])*tmp1;
|
||||||
|
}
|
||||||
|
spProj5p(tmp2, chi[ss+Ls-1]);
|
||||||
|
chi[ss+Ls-1] = (1.0/deec[Ls-1])*tmp1 + (1.0/deec[Ls])*tmp2;
|
||||||
|
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(WilsonImplF);
|
// Apply L^{-dagger}
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(WilsonImplD);
|
for(int s=Ls-2; s>=0; s--){
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(GparityWilsonImplF);
|
spProj5p(tmp1, chi[ss+s+1]);
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(GparityWilsonImplD);
|
chi[ss+s] = chi[ss+s] - leec[s]*tmp1;
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(ZWilsonImplF);
|
}
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(ZWilsonImplD);
|
}
|
||||||
|
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(WilsonImplFH);
|
this->MooeeInvTime += usecond();
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(WilsonImplDF);
|
}
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(GparityWilsonImplFH);
|
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(GparityWilsonImplDF);
|
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(ZWilsonImplFH);
|
|
||||||
INSTANTIATE_DPERP_DWF_EOFA(ZWilsonImplDF);
|
|
||||||
|
|
||||||
#endif
|
#ifdef DOMAIN_WALL_EOFA_DPERP_CACHE
|
||||||
|
|
||||||
}}
|
INSTANTIATE_DPERP_DWF_EOFA(WilsonImplF);
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(WilsonImplD);
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(GparityWilsonImplF);
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(GparityWilsonImplD);
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(ZWilsonImplF);
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(ZWilsonImplD);
|
||||||
|
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(WilsonImplFH);
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(WilsonImplDF);
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(GparityWilsonImplFH);
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(GparityWilsonImplDF);
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(ZWilsonImplFH);
|
||||||
|
INSTANTIATE_DPERP_DWF_EOFA(ZWilsonImplDF);
|
||||||
|
|
||||||
|
#endif
|
||||||
|
|
||||||
|
NAMESPACE_END(Grid);
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user