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

Merge pull request #222 from guelpers/feature/kl2QEDseq

EMLepton: Multiple source-sink separations at once
This commit is contained in:
Antonin Portelli 2019-07-05 16:22:34 +01:00 committed by GitHub
commit 0a71f8bb10
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -54,8 +54,9 @@ BEGIN_HADRONS_NAMESPACE
* - action: fermion action used for propagator (string) * - action: fermion action used for propagator (string)
* - emField: photon field A_mu (string) * - emField: photon field A_mu (string)
* - mass: input mass for the lepton propagator * - mass: input mass for the lepton propagator
* - boundary: boundary conditions for the lepton propagator, e.g. "1 1 1 -1"
* - twist: twisted boundary for lepton propagator, e.g. "0.0 0.0 0.0 0.5" * - twist: twisted boundary for lepton propagator, e.g. "0.0 0.0 0.0 0.5"
* - deltat: source-sink separation * - deltat: list of source-sink separations
* *
*******************************************************************************/ *******************************************************************************/
@ -74,7 +75,7 @@ public:
double, mass, double, mass,
std::string , boundary, std::string , boundary,
std::string, twist, std::string, twist,
unsigned int, deltat); std::vector<unsigned int>, deltat);
}; };
template <typename FImpl> template <typename FImpl>
@ -124,7 +125,12 @@ std::vector<std::string> TEMLepton<FImpl>::getInput(void)
template <typename FImpl> template <typename FImpl>
std::vector<std::string> TEMLepton<FImpl>::getOutput(void) std::vector<std::string> TEMLepton<FImpl>::getOutput(void)
{ {
std::vector<std::string> out = {getName(), getName() + "_free"}; std::vector<std::string> out = {};
for(int i=0; i<par().deltat.size(); i++)
{
out.push_back(std::to_string(par().deltat[i]) + "_" + getName() + "_free");
out.push_back(std::to_string(par().deltat[i]) + "_" + getName());
}
return out; return out;
} }
@ -134,8 +140,11 @@ template <typename FImpl>
void TEMLepton<FImpl>::setup(void) void TEMLepton<FImpl>::setup(void)
{ {
Ls_ = env().getObjectLs(par().action); Ls_ = env().getObjectLs(par().action);
envCreateLat(PropagatorField, getName()); for(int i=0; i<par().deltat.size(); i++)
envCreateLat(PropagatorField, getName() + "_free"); {
envCreateLat(PropagatorField, std::to_string(par().deltat[i]) + "_" + getName() + "_free");
envCreateLat(PropagatorField, std::to_string(par().deltat[i]) + "_" + getName());
}
envTmpLat(FermionField, "source", Ls_); envTmpLat(FermionField, "source", Ls_);
envTmpLat(FermionField, "sol", Ls_); envTmpLat(FermionField, "sol", Ls_);
envTmpLat(FermionField, "tmp"); envTmpLat(FermionField, "tmp");
@ -157,9 +166,6 @@ void TEMLepton<FImpl>::execute(void)
RealD mass = par().mass; RealD mass = par().mass;
Complex ci(0.0,1.0); Complex ci(0.0,1.0);
PropagatorField &Aslashlep = envGet(PropagatorField, getName());
PropagatorField &lep = envGet(PropagatorField, getName() + "_free");
envGetTmp(FermionField, source); envGetTmp(FermionField, source);
envGetTmp(FermionField, sol); envGetTmp(FermionField, sol);
envGetTmp(FermionField, tmp); envGetTmp(FermionField, tmp);
@ -227,6 +233,8 @@ void TEMLepton<FImpl>::execute(void)
} }
} }
for(unsigned int dt=0;dt<par().deltat.size();dt++){
PropagatorField &lep = envGet(PropagatorField, std::to_string(par().deltat[dt]) + "_" + getName() + "_free");
for(tl=0;tl<nt;tl++){ for(tl=0;tl<nt;tl++){
//shift free propagator to different source positions //shift free propagator to different source positions
@ -235,7 +243,18 @@ void TEMLepton<FImpl>::execute(void)
proptmp = where( tlat < tl, boundary[Tp]*proptmp, proptmp); proptmp = where( tlat < tl, boundary[Tp]*proptmp, proptmp);
// free propagator for fixed source-sink separation // free propagator for fixed source-sink separation
lep = where(tlat == (tl-par().deltat+nt)%nt, proptmp, lep); lep = where(tlat == (tl-par().deltat[dt]+nt)%nt, proptmp, lep);
}
//account for possible anti-periodic boundary in time
lep = where( tlat >= nt-par().deltat[dt], boundary[Tp]*lep, lep);
}
for(tl=0;tl<nt;tl++){
//shift free propagator to different source positions
//account for possible anti-periodic boundary in time
proptmp = Cshift(freetmp,Tp, -tl);
proptmp = where( tlat < tl, boundary[Tp]*proptmp, proptmp);
// i*A_mu*gamma_mu // i*A_mu*gamma_mu
sourcetmp = zero; sourcetmp = zero;
@ -276,13 +295,17 @@ void TEMLepton<FImpl>::execute(void)
} }
} }
// keep the result for the desired delta t // keep the result for the desired delta t
Aslashlep = where(tlat == (tl-par().deltat+nt)%nt, proptmp, Aslashlep); for(unsigned int dt=0;dt<par().deltat.size();dt++){
PropagatorField &Aslashlep = envGet(PropagatorField, std::to_string(par().deltat[dt]) + "_" + getName());
Aslashlep = where(tlat == (tl-par().deltat[dt]+nt)%nt, proptmp, Aslashlep);
}
} }
//account for possible anti-periodic boundary in time //account for possible anti-periodic boundary in time
Aslashlep = where( tlat >= nt-par().deltat, boundary[Tp]*Aslashlep, Aslashlep); for(unsigned int dt=0;dt<par().deltat.size();dt++){
lep = where( tlat >= nt-par().deltat, boundary[Tp]*lep, lep); PropagatorField &Aslashlep = envGet(PropagatorField, std::to_string(par().deltat[dt]) + "_" + getName());
Aslashlep = where( tlat >= nt-par().deltat[dt], boundary[Tp]*Aslashlep, Aslashlep);
}
} }
END_MODULE_NAMESPACE END_MODULE_NAMESPACE