2016-12-29 21:44:58 +00:00
|
|
|
#ifndef Hadrons_ChargedProp_hpp_
|
|
|
|
#define Hadrons_ChargedProp_hpp_
|
|
|
|
|
|
|
|
#include <Grid/Hadrons/Global.hpp>
|
|
|
|
#include <Grid/Hadrons/Module.hpp>
|
|
|
|
#include <Grid/Hadrons/ModuleFactory.hpp>
|
|
|
|
|
|
|
|
BEGIN_HADRONS_NAMESPACE
|
|
|
|
|
|
|
|
/******************************************************************************
|
2017-01-12 18:17:44 +00:00
|
|
|
* Charged scalar propagator *
|
2016-12-29 21:44:58 +00:00
|
|
|
******************************************************************************/
|
|
|
|
BEGIN_MODULE_NAMESPACE(MScalar)
|
|
|
|
|
|
|
|
class ChargedPropPar: Serializable
|
|
|
|
{
|
|
|
|
public:
|
|
|
|
GRID_SERIALIZABLE_CLASS_MEMBERS(ChargedPropPar,
|
2017-01-11 18:40:43 +00:00
|
|
|
std::string, emField,
|
|
|
|
std::string, source,
|
|
|
|
double, mass,
|
2017-01-12 20:44:23 +00:00
|
|
|
double, charge,
|
2017-01-11 18:40:43 +00:00
|
|
|
std::string, output);
|
2016-12-29 21:44:58 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
class TChargedProp: public Module<ChargedPropPar>
|
|
|
|
{
|
2017-01-11 18:40:43 +00:00
|
|
|
public:
|
|
|
|
SCALAR_TYPE_ALIASES(SIMPL,);
|
2017-01-12 20:44:23 +00:00
|
|
|
typedef PhotonR::GaugeField EmField;
|
|
|
|
typedef PhotonR::GaugeLinkField EmComp;
|
2016-12-29 21:44:58 +00:00
|
|
|
public:
|
|
|
|
// constructor
|
|
|
|
TChargedProp(const std::string name);
|
|
|
|
// destructor
|
|
|
|
virtual ~TChargedProp(void) = default;
|
|
|
|
// dependency relation
|
|
|
|
virtual std::vector<std::string> getInput(void);
|
|
|
|
virtual std::vector<std::string> getOutput(void);
|
|
|
|
// setup
|
|
|
|
virtual void setup(void);
|
|
|
|
// execution
|
|
|
|
virtual void execute(void);
|
2017-01-11 18:40:43 +00:00
|
|
|
private:
|
2017-01-12 20:44:23 +00:00
|
|
|
void momD1(ScalarField &s, FFT &fft);
|
|
|
|
void momD2(ScalarField &s, FFT &fft);
|
|
|
|
private:
|
|
|
|
std::string freeMomPropName_, GFSrcName_;
|
|
|
|
std::vector<std::string> phaseName_;
|
|
|
|
ScalarField *freeMomProp_, *GFSrc_;
|
|
|
|
std::vector<ScalarField *> phase_;
|
|
|
|
EmField *A;
|
2016-12-29 21:44:58 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
MODULE_REGISTER_NS(ChargedProp, TChargedProp, MScalar);
|
|
|
|
|
|
|
|
END_MODULE_NAMESPACE
|
|
|
|
|
|
|
|
END_HADRONS_NAMESPACE
|
|
|
|
|
|
|
|
#endif // Hadrons_ChargedProp_hpp_
|