mirror of
https://github.com/paboyle/Grid.git
synced 2024-11-10 07:55:35 +00:00
69 lines
1.6 KiB
C++
69 lines
1.6 KiB
C++
#include "Grid.h"
|
|
|
|
using namespace std;
|
|
using namespace Grid;
|
|
using namespace Grid::QCD;
|
|
|
|
namespace Grid {
|
|
namespace QCD {
|
|
|
|
|
|
class HmcRunner : public NerscHmcRunner {
|
|
public:
|
|
|
|
void BuildTheAction (int argc, char **argv)
|
|
|
|
{
|
|
typedef WilsonImplR ImplPolicy;
|
|
typedef DomainWallFermionR FermionAction;
|
|
typedef typename FermionAction::FermionField FermionField;
|
|
|
|
const int Ls = 8;
|
|
|
|
UGrid = SpaceTimeGrid::makeFourDimGrid(GridDefaultLatt(), GridDefaultSimd(Nd,vComplex::Nsimd()),GridDefaultMpi());
|
|
UrbGrid = SpaceTimeGrid::makeFourDimRedBlackGrid(UGrid);
|
|
|
|
FGrid = SpaceTimeGrid::makeFiveDimGrid(Ls,UGrid);
|
|
FrbGrid = SpaceTimeGrid::makeFiveDimRedBlackGrid(Ls,UGrid);
|
|
|
|
// temporarily need a gauge field
|
|
LatticeGaugeField U(UGrid);
|
|
|
|
// Gauge action
|
|
WilsonGaugeActionR Waction(5.6);
|
|
|
|
Real mass=0.04;
|
|
Real pv =1.0;
|
|
RealD M5=1.5;
|
|
FermionAction DenOp(U,*FGrid,*FrbGrid,*UGrid,*UrbGrid,mass,M5);
|
|
FermionAction NumOp(U,*FGrid,*FrbGrid,*UGrid,*UrbGrid,pv,M5);
|
|
|
|
ConjugateGradient<FermionField> CG(1.0e-8,10000);
|
|
TwoFlavourEvenOddRatioPseudoFermionAction<ImplPolicy> Nf2(NumOp, DenOp,CG,CG);
|
|
|
|
//Collect actions
|
|
ActionLevel<LatticeGaugeField> Level1;
|
|
Level1.push_back(&Nf2);
|
|
Level1.push_back(&Waction);
|
|
TheAction.push_back(Level1);
|
|
|
|
Run(argc,argv);
|
|
};
|
|
|
|
};
|
|
|
|
}}
|
|
|
|
int main (int argc, char ** argv)
|
|
{
|
|
Grid_init(&argc,&argv);
|
|
|
|
int threads = GridThread::GetThreads();
|
|
std::cout<<GridLogMessage << "Grid is setup to use "<<threads<<" threads"<<std::endl;
|
|
|
|
HmcRunner TheHMC;
|
|
|
|
TheHMC.BuildTheAction(argc,argv);
|
|
|
|
}
|