mirror of
https://github.com/paboyle/Grid.git
synced 2025-04-27 22:25:56 +01:00
Namespace
This commit is contained in:
parent
7828887604
commit
c2b0e0269a
@ -23,17 +23,17 @@
|
|||||||
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
||||||
|
|
||||||
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 */
|
||||||
#ifndef QCD_PHOTON_ACTION_H
|
#ifndef QCD_PHOTON_ACTION_H
|
||||||
#define QCD_PHOTON_ACTION_H
|
#define QCD_PHOTON_ACTION_H
|
||||||
|
|
||||||
namespace Grid{
|
NAMESPACE_BEGIN(Grid);
|
||||||
namespace QCD{
|
|
||||||
template <class S>
|
template <class S>
|
||||||
class QedGimpl
|
class QedGimpl
|
||||||
{
|
{
|
||||||
public:
|
public:
|
||||||
typedef S Simd;
|
typedef S Simd;
|
||||||
|
|
||||||
template <typename vtype>
|
template <typename vtype>
|
||||||
@ -48,18 +48,18 @@ namespace QCD{
|
|||||||
typedef Lattice<SiteLink> LinkField;
|
typedef Lattice<SiteLink> LinkField;
|
||||||
typedef Lattice<SiteField> Field;
|
typedef Lattice<SiteField> Field;
|
||||||
typedef Field ComplexField;
|
typedef Field ComplexField;
|
||||||
};
|
};
|
||||||
|
|
||||||
typedef QedGimpl<vComplex> QedGimplR;
|
typedef QedGimpl<vComplex> QedGimplR;
|
||||||
|
|
||||||
template<class Gimpl>
|
template<class Gimpl>
|
||||||
class Photon
|
class Photon
|
||||||
{
|
{
|
||||||
public:
|
public:
|
||||||
INHERIT_GIMPL_TYPES(Gimpl);
|
INHERIT_GIMPL_TYPES(Gimpl);
|
||||||
GRID_SERIALIZABLE_ENUM(Gauge, undef, feynman, 1, coulomb, 2, landau, 3);
|
GRID_SERIALIZABLE_ENUM(Gauge, undef, feynman, 1, coulomb, 2, landau, 3);
|
||||||
GRID_SERIALIZABLE_ENUM(ZmScheme, undef, qedL, 1, qedTL, 2);
|
GRID_SERIALIZABLE_ENUM(ZmScheme, undef, qedL, 1, qedTL, 2);
|
||||||
public:
|
public:
|
||||||
Photon(Gauge gauge, ZmScheme zmScheme);
|
Photon(Gauge gauge, ZmScheme zmScheme);
|
||||||
virtual ~Photon(void) = default;
|
virtual ~Photon(void) = default;
|
||||||
void FreePropagator(const GaugeField &in, GaugeField &out);
|
void FreePropagator(const GaugeField &in, GaugeField &out);
|
||||||
@ -68,24 +68,24 @@ namespace QCD{
|
|||||||
void StochasticField(GaugeField &out, GridParallelRNG &rng);
|
void StochasticField(GaugeField &out, GridParallelRNG &rng);
|
||||||
void StochasticField(GaugeField &out, GridParallelRNG &rng,
|
void StochasticField(GaugeField &out, GridParallelRNG &rng,
|
||||||
const GaugeLinkField &weight);
|
const GaugeLinkField &weight);
|
||||||
private:
|
private:
|
||||||
void invKHatSquared(GaugeLinkField &out);
|
void invKHatSquared(GaugeLinkField &out);
|
||||||
void zmSub(GaugeLinkField &out);
|
void zmSub(GaugeLinkField &out);
|
||||||
private:
|
private:
|
||||||
Gauge gauge_;
|
Gauge gauge_;
|
||||||
ZmScheme zmScheme_;
|
ZmScheme zmScheme_;
|
||||||
};
|
};
|
||||||
|
|
||||||
typedef Photon<QedGimplR> PhotonR;
|
typedef Photon<QedGimplR> PhotonR;
|
||||||
|
|
||||||
template<class Gimpl>
|
template<class Gimpl>
|
||||||
Photon<Gimpl>::Photon(Gauge gauge, ZmScheme zmScheme)
|
Photon<Gimpl>::Photon(Gauge gauge, ZmScheme zmScheme)
|
||||||
: gauge_(gauge), zmScheme_(zmScheme)
|
: gauge_(gauge), zmScheme_(zmScheme)
|
||||||
{}
|
{}
|
||||||
|
|
||||||
template<class Gimpl>
|
template<class Gimpl>
|
||||||
void Photon<Gimpl>::FreePropagator (const GaugeField &in,GaugeField &out)
|
void Photon<Gimpl>::FreePropagator (const GaugeField &in,GaugeField &out)
|
||||||
{
|
{
|
||||||
FFT theFFT(in._grid);
|
FFT theFFT(in._grid);
|
||||||
|
|
||||||
GaugeField in_k(in._grid);
|
GaugeField in_k(in._grid);
|
||||||
@ -94,11 +94,11 @@ namespace QCD{
|
|||||||
theFFT.FFT_all_dim(in_k,in,FFT::forward);
|
theFFT.FFT_all_dim(in_k,in,FFT::forward);
|
||||||
MomentumSpacePropagator(prop_k,in_k);
|
MomentumSpacePropagator(prop_k,in_k);
|
||||||
theFFT.FFT_all_dim(out,prop_k,FFT::backward);
|
theFFT.FFT_all_dim(out,prop_k,FFT::backward);
|
||||||
}
|
}
|
||||||
|
|
||||||
template<class Gimpl>
|
template<class Gimpl>
|
||||||
void Photon<Gimpl>::invKHatSquared(GaugeLinkField &out)
|
void Photon<Gimpl>::invKHatSquared(GaugeLinkField &out)
|
||||||
{
|
{
|
||||||
GridBase *grid = out._grid;
|
GridBase *grid = out._grid;
|
||||||
GaugeLinkField kmu(grid), one(grid);
|
GaugeLinkField kmu(grid), one(grid);
|
||||||
const unsigned int nd = grid->_ndimension;
|
const unsigned int nd = grid->_ndimension;
|
||||||
@ -120,11 +120,11 @@ namespace QCD{
|
|||||||
pokeSite(Tone, out, zm);
|
pokeSite(Tone, out, zm);
|
||||||
out = one/out;
|
out = one/out;
|
||||||
pokeSite(Tzero, out, zm);
|
pokeSite(Tzero, out, zm);
|
||||||
}
|
}
|
||||||
|
|
||||||
template<class Gimpl>
|
template<class Gimpl>
|
||||||
void Photon<Gimpl>::zmSub(GaugeLinkField &out)
|
void Photon<Gimpl>::zmSub(GaugeLinkField &out)
|
||||||
{
|
{
|
||||||
GridBase *grid = out._grid;
|
GridBase *grid = out._grid;
|
||||||
const unsigned int nd = grid->_ndimension;
|
const unsigned int nd = grid->_ndimension;
|
||||||
|
|
||||||
@ -157,12 +157,12 @@ namespace QCD{
|
|||||||
default:
|
default:
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
template<class Gimpl>
|
template<class Gimpl>
|
||||||
void Photon<Gimpl>::MomentumSpacePropagator(const GaugeField &in,
|
void Photon<Gimpl>::MomentumSpacePropagator(const GaugeField &in,
|
||||||
GaugeField &out)
|
GaugeField &out)
|
||||||
{
|
{
|
||||||
GridBase *grid = out._grid;
|
GridBase *grid = out._grid;
|
||||||
LatticeComplex k2Inv(grid);
|
LatticeComplex k2Inv(grid);
|
||||||
|
|
||||||
@ -170,11 +170,11 @@ namespace QCD{
|
|||||||
zmSub(k2Inv);
|
zmSub(k2Inv);
|
||||||
|
|
||||||
out = in*k2Inv;
|
out = in*k2Inv;
|
||||||
}
|
}
|
||||||
|
|
||||||
template<class Gimpl>
|
template<class Gimpl>
|
||||||
void Photon<Gimpl>::StochasticWeight(GaugeLinkField &weight)
|
void Photon<Gimpl>::StochasticWeight(GaugeLinkField &weight)
|
||||||
{
|
{
|
||||||
auto *grid = dynamic_cast<GridCartesian *>(weight._grid);
|
auto *grid = dynamic_cast<GridCartesian *>(weight._grid);
|
||||||
const unsigned int nd = grid->_ndimension;
|
const unsigned int nd = grid->_ndimension;
|
||||||
std::vector<int> latt_size = grid->_fdimensions;
|
std::vector<int> latt_size = grid->_fdimensions;
|
||||||
@ -187,22 +187,22 @@ namespace QCD{
|
|||||||
invKHatSquared(weight);
|
invKHatSquared(weight);
|
||||||
weight = sqrt(vol*real(weight));
|
weight = sqrt(vol*real(weight));
|
||||||
zmSub(weight);
|
zmSub(weight);
|
||||||
}
|
}
|
||||||
|
|
||||||
template<class Gimpl>
|
template<class Gimpl>
|
||||||
void Photon<Gimpl>::StochasticField(GaugeField &out, GridParallelRNG &rng)
|
void Photon<Gimpl>::StochasticField(GaugeField &out, GridParallelRNG &rng)
|
||||||
{
|
{
|
||||||
auto *grid = dynamic_cast<GridCartesian *>(out._grid);
|
auto *grid = dynamic_cast<GridCartesian *>(out._grid);
|
||||||
GaugeLinkField weight(grid);
|
GaugeLinkField weight(grid);
|
||||||
|
|
||||||
StochasticWeight(weight);
|
StochasticWeight(weight);
|
||||||
StochasticField(out, rng, weight);
|
StochasticField(out, rng, weight);
|
||||||
}
|
}
|
||||||
|
|
||||||
template<class Gimpl>
|
template<class Gimpl>
|
||||||
void Photon<Gimpl>::StochasticField(GaugeField &out, GridParallelRNG &rng,
|
void Photon<Gimpl>::StochasticField(GaugeField &out, GridParallelRNG &rng,
|
||||||
const GaugeLinkField &weight)
|
const GaugeLinkField &weight)
|
||||||
{
|
{
|
||||||
auto *grid = dynamic_cast<GridCartesian *>(out._grid);
|
auto *grid = dynamic_cast<GridCartesian *>(out._grid);
|
||||||
const unsigned int nd = grid->_ndimension;
|
const unsigned int nd = grid->_ndimension;
|
||||||
GaugeLinkField r(grid);
|
GaugeLinkField r(grid);
|
||||||
@ -218,7 +218,7 @@ namespace QCD{
|
|||||||
fft.FFT_all_dim(out, aTilde, FFT::backward);
|
fft.FFT_all_dim(out, aTilde, FFT::backward);
|
||||||
|
|
||||||
out = real(out);
|
out = real(out);
|
||||||
}
|
}
|
||||||
// template<class Gimpl>
|
// template<class Gimpl>
|
||||||
// void Photon<Gimpl>::FeynmanGaugeMomentumSpacePropagator_L(GaugeField &out,
|
// void Photon<Gimpl>::FeynmanGaugeMomentumSpacePropagator_L(GaugeField &out,
|
||||||
// const GaugeField &in)
|
// const GaugeField &in)
|
||||||
@ -282,5 +282,5 @@ namespace QCD{
|
|||||||
// out = in*denom;
|
// out = in*denom;
|
||||||
// };
|
// };
|
||||||
|
|
||||||
}}
|
NAMESPACE_END(Grid);
|
||||||
#endif
|
#endif
|
||||||
|
Loading…
x
Reference in New Issue
Block a user