mirror of
				https://github.com/paboyle/Grid.git
				synced 2025-11-04 05:54:32 +00:00 
			
		
		
		
	Merge branch 'feature/distil' of github.com:mmphys/Grid into feature/distil
This commit is contained in:
		@@ -1,77 +1,79 @@
 | 
			
		||||
#include <Hadrons/Modules/MContraction/Baryon.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/A2AAslashField.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/A2AMesonField.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/Meson.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/WeakHamiltonian.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/WeakHamiltonianNonEye.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/DiscLoop.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/WeakNeutral4ptDisc.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/Gamma3pt.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/WardIdentity.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/WeakHamiltonianEye.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MFermion/FreeProp.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MFermion/GaugeProp.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/SeqGamma.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/Point.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/Wall.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/Z2.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/SeqConserved.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/Momentum.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSink/Smear.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSink/Point.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/MixedPrecisionRBPrecCG.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/LocalCoherenceLanczos.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/A2AAslashVectors.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/Guesser.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/RBPrecCG.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/A2AVectors.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/UnitEm.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/StoutSmearing.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/Unit.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/Random.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/GaugeFix.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/FundtoHirep.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/StochEm.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/Electrify.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MNoise/TimeDilutedSpinColorDiagonal.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MNoise/FullVolumeSpinColorDiagonal.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MUtilities/PrecisionCast.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MUtilities/RandomVectors.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MUtilities/TestSeqGamma.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MUtilities/PrecisionCast.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MUtilities/TestSeqConserved.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MLoop/NoiseLoop.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalar/FreeProp.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalar/VPCounterTerms.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalar/ScalarVP.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalar/Scalar.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalar/ChargedProp.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/MixedPrecisionRBPrecCG.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/A2AAslashVectors.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/Guesser.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/LocalCoherenceLanczos.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/RBPrecCG.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSolver/A2AVectors.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MDistil/LapEvec.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MDistil/Distil.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MDistil/DistilVectors.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MDistil/BContraction.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MDistil/PerambLight.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MNPR/Bilinear.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MNPR/Amputate.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MNPR/FourQuark.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MAction/DWF.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MAction/MobiusDWF.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/WeakHamiltonian.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/WeakNeutral4ptDisc.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/WeakHamiltonianEye.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/DiscLoop.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/Baryon.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/Gamma3pt.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/A2AMesonField.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/A2AAslashField.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/WeakHamiltonianNonEye.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/Meson.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MContraction/WardIdentity.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MAction/Wilson.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MAction/WilsonClover.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MAction/ZMobiusDWF.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MAction/DWF.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MAction/ScaledDWF.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/StochFreeField.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TwoPointNPR.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/ShiftProbe.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/Div.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TrMag.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/EMT.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TwoPoint.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TrPhi.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/Utils.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TransProj.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/Grad.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TrKinetic.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MIO/LoadEigenPack.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MAction/ZMobiusDWF.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MAction/MobiusDWF.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/Random.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/Unit.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/UnitEm.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/StoutSmearing.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/StochEm.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/Electrify.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/FundtoHirep.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MGauge/GaugeFix.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MNoise/TimeDilutedSpinColorDiagonal.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MNoise/FullVolumeSpinColorDiagonal.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MIO/LoadBinary.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MIO/LoadCosmHol.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MIO/LoadNersc.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MIO/LoadA2AVectors.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MIO/LoadCosmHol.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MIO/LoadCoarseEigenPack.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MIO/LoadBinary.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MIO/LoadEigenPack.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MNPR/Amputate.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MNPR/FourQuark.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MNPR/Bilinear.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MLoop/NoiseLoop.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TransProj.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TwoPoint.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TrMag.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TrKinetic.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/EMT.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/Grad.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/Utils.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/Div.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TrPhi.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/TwoPointNPR.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/StochFreeField.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalarSUN/ShiftProbe.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSink/Smear.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSink/Point.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MFermion/GaugeProp.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MFermion/FreeProp.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalar/Scalar.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalar/ScalarVP.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalar/FreeProp.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalar/ChargedProp.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MScalar/VPCounterTerms.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/Momentum.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/SeqGamma.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/Point.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/Z2.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/Wall.hpp>
 | 
			
		||||
#include <Hadrons/Modules/MSource/SeqConserved.hpp>
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										7
									
								
								Hadrons/Modules/MDistil/BContraction.cc
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										7
									
								
								Hadrons/Modules/MDistil/BContraction.cc
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,7 @@
 | 
			
		||||
#include <Hadrons/Modules/MDistil/BContraction.hpp>
 | 
			
		||||
 | 
			
		||||
using namespace Grid;
 | 
			
		||||
using namespace Hadrons;
 | 
			
		||||
using namespace MDistil;
 | 
			
		||||
 | 
			
		||||
template class Grid::Hadrons::MDistil::TBContraction<FIMPL>;
 | 
			
		||||
							
								
								
									
										189
									
								
								Hadrons/Modules/MDistil/BContraction.hpp
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										189
									
								
								Hadrons/Modules/MDistil/BContraction.hpp
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,189 @@
 | 
			
		||||
#ifndef Hadrons_MDistil_BContraction_hpp_
 | 
			
		||||
#define Hadrons_MDistil_BContraction_hpp_
 | 
			
		||||
 | 
			
		||||
#include <Hadrons/Global.hpp>
 | 
			
		||||
#include <Hadrons/Module.hpp>
 | 
			
		||||
#include <Hadrons/ModuleFactory.hpp>
 | 
			
		||||
#include <Hadrons/Solver.hpp>
 | 
			
		||||
#include <Hadrons/EigenPack.hpp>
 | 
			
		||||
#include <Hadrons/A2AVectors.hpp>
 | 
			
		||||
#include <Hadrons/DilutedNoise.hpp>
 | 
			
		||||
 | 
			
		||||
// These are members of Distillation
 | 
			
		||||
#include <Hadrons/Modules/MDistil/Distil.hpp>
 | 
			
		||||
BEGIN_HADRONS_NAMESPACE
 | 
			
		||||
 | 
			
		||||
/******************************************************************************
 | 
			
		||||
 *                         BContraction                                 *
 | 
			
		||||
 ******************************************************************************/
 | 
			
		||||
BEGIN_MODULE_NAMESPACE(MDistil)
 | 
			
		||||
 | 
			
		||||
class BContractionPar: Serializable
 | 
			
		||||
{
 | 
			
		||||
public:
 | 
			
		||||
    GRID_SERIALIZABLE_CLASS_MEMBERS(BContractionPar,
 | 
			
		||||
		                    std::string, one,
 | 
			
		||||
		                    std::string, two,
 | 
			
		||||
		                    std::string, three,
 | 
			
		||||
		                    std::string, output,
 | 
			
		||||
                                    std::vector<std::string>, mom);
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
template <typename FImpl>
 | 
			
		||||
class TBContraction: public Module<BContractionPar>
 | 
			
		||||
{
 | 
			
		||||
public:
 | 
			
		||||
    FERM_TYPE_ALIASES(FImpl,);
 | 
			
		||||
public:
 | 
			
		||||
    // constructor
 | 
			
		||||
    TBContraction(const std::string name);
 | 
			
		||||
    // destructor
 | 
			
		||||
    virtual ~TBContraction(void) {};
 | 
			
		||||
    // 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);
 | 
			
		||||
private:
 | 
			
		||||
    bool                               hasPhase_{false};
 | 
			
		||||
    std::string                        momphName_;
 | 
			
		||||
    std::vector<Gamma::Algebra>        gamma12_;
 | 
			
		||||
    std::vector<Gamma::Algebra>        gamma23_;
 | 
			
		||||
    std::vector<std::vector<Real>>     mom_;
 | 
			
		||||
protected:
 | 
			
		||||
    GridCartesian * grid4d;
 | 
			
		||||
    GridCartesian * grid3d;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
MODULE_REGISTER_TMP(BContraction, TBContraction<FIMPL>, MDistil);
 | 
			
		||||
 | 
			
		||||
/******************************************************************************
 | 
			
		||||
 *                 TBContraction implementation                             *
 | 
			
		||||
 ******************************************************************************/
 | 
			
		||||
// constructor /////////////////////////////////////////////////////////////////
 | 
			
		||||
template <typename FImpl>
 | 
			
		||||
TBContraction<FImpl>::TBContraction(const std::string name)
 | 
			
		||||
: Module<BContractionPar>(name)
 | 
			
		||||
{}
 | 
			
		||||
 | 
			
		||||
// dependencies/products ///////////////////////////////////////////////////////
 | 
			
		||||
template <typename FImpl>
 | 
			
		||||
std::vector<std::string> TBContraction<FImpl>::getInput(void)
 | 
			
		||||
{
 | 
			
		||||
    std::vector<std::string> in = {par().one, par().two, par().three};
 | 
			
		||||
    
 | 
			
		||||
    return in;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
template <typename FImpl>
 | 
			
		||||
std::vector<std::string> TBContraction<FImpl>::getOutput(void)
 | 
			
		||||
{
 | 
			
		||||
    std::vector<std::string> out = {};
 | 
			
		||||
    
 | 
			
		||||
    return out;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
// setup ///////////////////////////////////////////////////////////////////////
 | 
			
		||||
template <typename FImpl>
 | 
			
		||||
void TBContraction<FImpl>::setup(void)
 | 
			
		||||
{
 | 
			
		||||
    
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
// execution ///////////////////////////////////////////////////////////////////
 | 
			
		||||
template <typename FImpl>
 | 
			
		||||
void TBContraction<FImpl>::execute(void)
 | 
			
		||||
{
 | 
			
		||||
    auto &one   = envGet(std::vector<FermionField>, par().one);
 | 
			
		||||
    auto &two   = envGet(std::vector<FermionField>, par().two);
 | 
			
		||||
    auto &three = envGet(std::vector<FermionField>, par().three);
 | 
			
		||||
 | 
			
		||||
    int N_1     = one.size();
 | 
			
		||||
    int N_2     = two.size();
 | 
			
		||||
    int N_3     = three.size();
 | 
			
		||||
 | 
			
		||||
    LOG(Message) << "Computing distillation baryon fields" << std::endl;
 | 
			
		||||
    LOG(Message) << "One: '" << par().one << "' Two: '" << par().two  << "' Three: '" << par().three << "'" << std::endl;
 | 
			
		||||
    LOG(Message) << "Momenta:" << std::endl;
 | 
			
		||||
    for (auto &p: mom_)
 | 
			
		||||
    {
 | 
			
		||||
        LOG(Message) << "  " << p << std::endl;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    grid4d = env().getGrid();
 | 
			
		||||
    grid3d = MakeLowerDimGrid(grid4d);    
 | 
			
		||||
    int Nmom=1;
 | 
			
		||||
    int Nt=64;
 | 
			
		||||
    std::vector<Complex> BField(Nmom*Nt*N_1*N_2*N_3);    
 | 
			
		||||
    int Bindex;
 | 
			
		||||
    int Nc=3; //Num colours
 | 
			
		||||
 | 
			
		||||
    FermionField tmp1(grid3d);
 | 
			
		||||
    FermionField tmp2(grid3d);
 | 
			
		||||
    FermionField tmp3(grid3d);
 | 
			
		||||
    //std::complex<double> * tmp33 = reinterpret_cast<std::complex<double> *>(&(tmp3[0]()(0)(0)));
 | 
			
		||||
 | 
			
		||||
    SpinColourVector * tmp11 = reinterpret_cast<SpinColourVector *>(&(tmp1[0]()(0)(0)));
 | 
			
		||||
    SpinColourVector * tmp22 = reinterpret_cast<SpinColourVector *>(&(tmp2[0]()(0)(0)));
 | 
			
		||||
    SpinColourVector * tmp33 = reinterpret_cast<SpinColourVector *>(&(tmp3[0]()(0)(0)));
 | 
			
		||||
   
 | 
			
		||||
    SpinVector tmp33s; 
 | 
			
		||||
    SpinColourVector * tmp333;
 | 
			
		||||
    SpinColourVector * diquark;
 | 
			
		||||
    SpinColourVector * tmp222;
 | 
			
		||||
 | 
			
		||||
    std::vector<std::vector<int>> epsilon = {{0,1,2},{1,2,0},{2,0,1},{0,2,1},{2,1,0},{1,0,2}};
 | 
			
		||||
    std::vector<int> epsilon_sgn = {1,1,1,-1,-1,-1};
 | 
			
		||||
 | 
			
		||||
    gamma12_ = {
 | 
			
		||||
       Gamma::Algebra::Identity, // I
 | 
			
		||||
       Gamma::Algebra::Gamma5, // gamma_5
 | 
			
		||||
       Gamma::Algebra::Identity, // I
 | 
			
		||||
    };
 | 
			
		||||
    gamma23_ = { // C = i gamma_2 gamma_4
 | 
			
		||||
       Gamma::Algebra::SigmaXZ, // C gamma_5 = -i gamma_1 gamma_3
 | 
			
		||||
       Gamma::Algebra::SigmaYT, // C = i gamma_2 gamma_4
 | 
			
		||||
       Gamma::Algebra::GammaYGamma5, // i gamma_4 C gamma_5 = i gamma_2 gamma_5
 | 
			
		||||
    };
 | 
			
		||||
    std::vector<Complex> factor23 = {(0.,-1.),(0.,1.),(0.,1.)};
 | 
			
		||||
 | 
			
		||||
  //  SpinColourVector a;
 | 
			
		||||
  //  SpinVector b;
 | 
			
		||||
  //  b = peekColour(a,0);
 | 
			
		||||
    //b= a()(0)();
 | 
			
		||||
    //tmp33s = peekColour(a,0);
 | 
			
		||||
 | 
			
		||||
    for (int i1=0 ; i1 < N_1 ; i1++){
 | 
			
		||||
      for (int i2=0 ; i2 < N_2 ; i2++){
 | 
			
		||||
        for (int i3=0 ; i3 < N_3 ; i3++){
 | 
			
		||||
          for (int imom=0 ; imom < Nmom ; imom++){
 | 
			
		||||
            Bindex = i1 + N_1*(i2 + N_2*(i3 + N_3*imom));
 | 
			
		||||
            for (int t=0 ; t < Nt ; t++){
 | 
			
		||||
	      ExtractSliceLocal(tmp1,one[i1],0,t,3);
 | 
			
		||||
              parallel_for (unsigned int sU = 0; sU < grid3d->oSites(); ++sU)
 | 
			
		||||
              {
 | 
			
		||||
                for (int ie=0 ; ie < 6 ; ie++){
 | 
			
		||||
	          //tmp33s = peekColour(tmp33[sU],epsilon[ie][2]);
 | 
			
		||||
		  //tmp333 = Gamma(gamma23_[0])*tmp33s;
 | 
			
		||||
		  //tmp333 = Gamma(gamma23_[0])*tmp33[sU]()()(epsilon[ie][2]);
 | 
			
		||||
		  /*diquark = tmp22[sU]()()(epsilon[ie][1])*factor23[0]*tmp333;
 | 
			
		||||
		  tmp222 = Gamma(gamma12_[0])*diquark;
 | 
			
		||||
                  BField[Bindex]+=(double)epsilon_sgn[ie]*(tmp11[sU]()()(epsilon[ie][0])*tmp222);
 | 
			
		||||
                  */
 | 
			
		||||
  		  }
 | 
			
		||||
  	      }
 | 
			
		||||
            }
 | 
			
		||||
	  }
 | 
			
		||||
	}
 | 
			
		||||
      }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
END_MODULE_NAMESPACE
 | 
			
		||||
 | 
			
		||||
END_HADRONS_NAMESPACE
 | 
			
		||||
 | 
			
		||||
#endif // Hadrons_MDistil_BContraction_hpp_
 | 
			
		||||
@@ -310,6 +310,10 @@ void TPerambLight<FImpl>::execute(void)
 | 
			
		||||
    ConjugateGradient<LatticeFermion> CG(CGPrecision,MaxIterations);
 | 
			
		||||
    SchurRedBlackDiagMooeeSolve<LatticeFermion> SchurSolver(CG);
 | 
			
		||||
 | 
			
		||||
    LatticeSpinColourVector a(grid4d);
 | 
			
		||||
    LatticeColourVector b(grid4d);
 | 
			
		||||
    b= peekSpin(a,0);
 | 
			
		||||
 | 
			
		||||
    int t_inv;
 | 
			
		||||
    for (int inoise = 0; inoise < nnoise; inoise++) {
 | 
			
		||||
      for (int dk = 0; dk < LI; dk++) {
 | 
			
		||||
 
 | 
			
		||||
@@ -1,154 +1,157 @@
 | 
			
		||||
modules_cc =\
 | 
			
		||||
  Modules/MContraction/WeakHamiltonianEye.cc \
 | 
			
		||||
  Modules/MContraction/Baryon.cc \
 | 
			
		||||
  Modules/MContraction/Meson.cc \
 | 
			
		||||
  Modules/MContraction/WeakNeutral4ptDisc.cc \
 | 
			
		||||
  Modules/MContraction/WeakHamiltonianNonEye.cc \
 | 
			
		||||
  Modules/MContraction/A2AAslashField.cc \
 | 
			
		||||
  Modules/MContraction/WardIdentity.cc \
 | 
			
		||||
  Modules/MContraction/A2AMesonField.cc \
 | 
			
		||||
  Modules/MContraction/DiscLoop.cc \
 | 
			
		||||
  Modules/MContraction/Gamma3pt.cc \
 | 
			
		||||
  Modules/MFermion/FreeProp.cc \
 | 
			
		||||
  Modules/MFermion/GaugeProp.cc \
 | 
			
		||||
  Modules/MSource/Momentum.cc \
 | 
			
		||||
  Modules/MSource/Point.cc \
 | 
			
		||||
  Modules/MSource/Wall.cc \
 | 
			
		||||
  Modules/MSource/SeqConserved.cc \
 | 
			
		||||
  Modules/MSource/SeqGamma.cc \
 | 
			
		||||
  Modules/MSource/Z2.cc \
 | 
			
		||||
  Modules/MSink/Point.cc \
 | 
			
		||||
  Modules/MSink/Smear.cc \
 | 
			
		||||
  Modules/MSolver/A2AVectors.cc \
 | 
			
		||||
  Modules/MSolver/A2AAslashVectors.cc \
 | 
			
		||||
  Modules/MSolver/RBPrecCG.cc \
 | 
			
		||||
  Modules/MSolver/MixedPrecisionRBPrecCG.cc \
 | 
			
		||||
  Modules/MSolver/LocalCoherenceLanczos.cc \
 | 
			
		||||
  Modules/MGauge/StoutSmearing.cc \
 | 
			
		||||
  Modules/MGauge/Unit.cc \
 | 
			
		||||
  Modules/MGauge/UnitEm.cc \
 | 
			
		||||
  Modules/MGauge/StochEm.cc \
 | 
			
		||||
  Modules/MGauge/Random.cc \
 | 
			
		||||
  Modules/MGauge/Electrify.cc \
 | 
			
		||||
  Modules/MGauge/FundtoHirep.cc \
 | 
			
		||||
  Modules/MGauge/GaugeFix.cc \
 | 
			
		||||
  Modules/MNoise/FullVolumeSpinColorDiagonal.cc \
 | 
			
		||||
  Modules/MNoise/TimeDilutedSpinColorDiagonal.cc \
 | 
			
		||||
  Modules/MUtilities/TestSeqConserved.cc \
 | 
			
		||||
  Modules/MUtilities/RandomVectors.cc \
 | 
			
		||||
  Modules/MUtilities/TestSeqGamma.cc \
 | 
			
		||||
  Modules/MUtilities/PrecisionCast.cc \
 | 
			
		||||
  Modules/MUtilities/TestSeqConserved.cc \
 | 
			
		||||
  Modules/MLoop/NoiseLoop.cc \
 | 
			
		||||
  Modules/MScalar/FreeProp.cc \
 | 
			
		||||
  Modules/MScalar/VPCounterTerms.cc \
 | 
			
		||||
  Modules/MScalar/ChargedProp.cc \
 | 
			
		||||
  Modules/MScalar/ScalarVP.cc \
 | 
			
		||||
  Modules/MDistil/DistilVectors.cc \
 | 
			
		||||
  Modules/MSolver/MixedPrecisionRBPrecCG.cc \
 | 
			
		||||
  Modules/MSolver/A2AVectors.cc \
 | 
			
		||||
  Modules/MSolver/A2AAslashVectors.cc \
 | 
			
		||||
  Modules/MSolver/LocalCoherenceLanczos.cc \
 | 
			
		||||
  Modules/MSolver/RBPrecCG.cc \
 | 
			
		||||
  Modules/MDistil/BContraction.cc \
 | 
			
		||||
  Modules/MDistil/LapEvec.cc \
 | 
			
		||||
  Modules/MDistil/PerambLight.cc \
 | 
			
		||||
  Modules/MDistil/DistilVectors.cc \
 | 
			
		||||
  Modules/MContraction/WeakHamiltonianEye.cc \
 | 
			
		||||
  Modules/MContraction/Gamma3pt.cc \
 | 
			
		||||
  Modules/MContraction/DiscLoop.cc \
 | 
			
		||||
  Modules/MContraction/Meson.cc \
 | 
			
		||||
  Modules/MContraction/WeakNeutral4ptDisc.cc \
 | 
			
		||||
  Modules/MContraction/WardIdentity.cc \
 | 
			
		||||
  Modules/MContraction/A2AMesonField.cc \
 | 
			
		||||
  Modules/MContraction/WeakHamiltonianNonEye.cc \
 | 
			
		||||
  Modules/MContraction/Baryon.cc \
 | 
			
		||||
  Modules/MContraction/A2AAslashField.cc \
 | 
			
		||||
  Modules/MAction/ZMobiusDWF.cc \
 | 
			
		||||
  Modules/MAction/WilsonClover.cc \
 | 
			
		||||
  Modules/MAction/Wilson.cc \
 | 
			
		||||
  Modules/MAction/DWF.cc \
 | 
			
		||||
  Modules/MAction/MobiusDWF.cc \
 | 
			
		||||
  Modules/MAction/ScaledDWF.cc \
 | 
			
		||||
  Modules/MGauge/FundtoHirep.cc \
 | 
			
		||||
  Modules/MGauge/Random.cc \
 | 
			
		||||
  Modules/MGauge/UnitEm.cc \
 | 
			
		||||
  Modules/MGauge/StochEm.cc \
 | 
			
		||||
  Modules/MGauge/GaugeFix.cc \
 | 
			
		||||
  Modules/MGauge/Unit.cc \
 | 
			
		||||
  Modules/MGauge/StoutSmearing.cc \
 | 
			
		||||
  Modules/MGauge/Electrify.cc \
 | 
			
		||||
  Modules/MNoise/TimeDilutedSpinColorDiagonal.cc \
 | 
			
		||||
  Modules/MNoise/FullVolumeSpinColorDiagonal.cc \
 | 
			
		||||
  Modules/MIO/LoadNersc.cc \
 | 
			
		||||
  Modules/MIO/LoadA2AVectors.cc \
 | 
			
		||||
  Modules/MIO/LoadCoarseEigenPack.cc \
 | 
			
		||||
  Modules/MIO/LoadEigenPack.cc \
 | 
			
		||||
  Modules/MIO/LoadBinary.cc \
 | 
			
		||||
  Modules/MIO/LoadCosmHol.cc \
 | 
			
		||||
  Modules/MNPR/Amputate.cc \
 | 
			
		||||
  Modules/MNPR/Bilinear.cc \
 | 
			
		||||
  Modules/MNPR/FourQuark.cc \
 | 
			
		||||
  Modules/MAction/Wilson.cc \
 | 
			
		||||
  Modules/MAction/MobiusDWF.cc \
 | 
			
		||||
  Modules/MAction/ZMobiusDWF.cc \
 | 
			
		||||
  Modules/MAction/WilsonClover.cc \
 | 
			
		||||
  Modules/MAction/DWF.cc \
 | 
			
		||||
  Modules/MAction/ScaledDWF.cc \
 | 
			
		||||
  Modules/MScalarSUN/TrPhi.cc \
 | 
			
		||||
  Modules/MScalarSUN/Grad.cc \
 | 
			
		||||
  Modules/MScalarSUN/TrMag.cc \
 | 
			
		||||
  Modules/MScalarSUN/TrKinetic.cc \
 | 
			
		||||
  Modules/MScalarSUN/EMT.cc \
 | 
			
		||||
  Modules/MScalarSUN/ShiftProbe.cc \
 | 
			
		||||
  Modules/MScalarSUN/TransProj.cc \
 | 
			
		||||
  Modules/MScalarSUN/StochFreeField.cc \
 | 
			
		||||
  Modules/MLoop/NoiseLoop.cc \
 | 
			
		||||
  Modules/MScalarSUN/TwoPoint.cc \
 | 
			
		||||
  Modules/MScalarSUN/TwoPointNPR.cc \
 | 
			
		||||
  Modules/MScalarSUN/Div.cc \
 | 
			
		||||
  Modules/MIO/LoadEigenPack.cc \
 | 
			
		||||
  Modules/MIO/LoadBinary.cc \
 | 
			
		||||
  Modules/MIO/LoadNersc.cc \
 | 
			
		||||
  Modules/MIO/LoadCoarseEigenPack.cc \
 | 
			
		||||
  Modules/MIO/LoadCosmHol.cc \
 | 
			
		||||
  Modules/MIO/LoadA2AVectors.cc
 | 
			
		||||
  Modules/MScalarSUN/TwoPointNPR.cc \
 | 
			
		||||
  Modules/MScalarSUN/ShiftProbe.cc \
 | 
			
		||||
  Modules/MScalarSUN/TrPhi.cc \
 | 
			
		||||
  Modules/MScalarSUN/TrMag.cc \
 | 
			
		||||
  Modules/MScalarSUN/TransProj.cc \
 | 
			
		||||
  Modules/MScalarSUN/TrKinetic.cc \
 | 
			
		||||
  Modules/MScalarSUN/StochFreeField.cc \
 | 
			
		||||
  Modules/MScalarSUN/EMT.cc \
 | 
			
		||||
  Modules/MScalarSUN/Grad.cc \
 | 
			
		||||
  Modules/MSink/Smear.cc \
 | 
			
		||||
  Modules/MSink/Point.cc \
 | 
			
		||||
  Modules/MFermion/GaugeProp.cc \
 | 
			
		||||
  Modules/MFermion/FreeProp.cc \
 | 
			
		||||
  Modules/MScalar/FreeProp.cc \
 | 
			
		||||
  Modules/MScalar/ScalarVP.cc \
 | 
			
		||||
  Modules/MScalar/VPCounterTerms.cc \
 | 
			
		||||
  Modules/MScalar/ChargedProp.cc \
 | 
			
		||||
  Modules/MSource/SeqConserved.cc \
 | 
			
		||||
  Modules/MSource/SeqGamma.cc \
 | 
			
		||||
  Modules/MSource/Wall.cc \
 | 
			
		||||
  Modules/MSource/Z2.cc \
 | 
			
		||||
  Modules/MSource/Point.cc \
 | 
			
		||||
  Modules/MSource/Momentum.cc
 | 
			
		||||
 | 
			
		||||
modules_hpp =\
 | 
			
		||||
  Modules/MContraction/Baryon.hpp \
 | 
			
		||||
  Modules/MContraction/A2AAslashField.hpp \
 | 
			
		||||
  Modules/MContraction/A2AMesonField.hpp \
 | 
			
		||||
  Modules/MContraction/Meson.hpp \
 | 
			
		||||
  Modules/MContraction/WeakHamiltonian.hpp \
 | 
			
		||||
  Modules/MContraction/WeakHamiltonianNonEye.hpp \
 | 
			
		||||
  Modules/MContraction/DiscLoop.hpp \
 | 
			
		||||
  Modules/MContraction/WeakNeutral4ptDisc.hpp \
 | 
			
		||||
  Modules/MContraction/Gamma3pt.hpp \
 | 
			
		||||
  Modules/MContraction/WardIdentity.hpp \
 | 
			
		||||
  Modules/MContraction/WeakHamiltonianEye.hpp \
 | 
			
		||||
  Modules/MFermion/FreeProp.hpp \
 | 
			
		||||
  Modules/MFermion/GaugeProp.hpp \
 | 
			
		||||
  Modules/MSource/SeqGamma.hpp \
 | 
			
		||||
  Modules/MSource/Point.hpp \
 | 
			
		||||
  Modules/MSource/Wall.hpp \
 | 
			
		||||
  Modules/MSource/Z2.hpp \
 | 
			
		||||
  Modules/MSource/SeqConserved.hpp \
 | 
			
		||||
  Modules/MSource/Momentum.hpp \
 | 
			
		||||
  Modules/MSink/Smear.hpp \
 | 
			
		||||
  Modules/MSink/Point.hpp \
 | 
			
		||||
  Modules/MSolver/MixedPrecisionRBPrecCG.hpp \
 | 
			
		||||
  Modules/MSolver/LocalCoherenceLanczos.hpp \
 | 
			
		||||
  Modules/MSolver/A2AAslashVectors.hpp \
 | 
			
		||||
  Modules/MSolver/Guesser.hpp \
 | 
			
		||||
  Modules/MSolver/RBPrecCG.hpp \
 | 
			
		||||
  Modules/MSolver/A2AVectors.hpp \
 | 
			
		||||
  Modules/MGauge/UnitEm.hpp \
 | 
			
		||||
  Modules/MGauge/StoutSmearing.hpp \
 | 
			
		||||
  Modules/MGauge/Unit.hpp \
 | 
			
		||||
  Modules/MGauge/Random.hpp \
 | 
			
		||||
  Modules/MGauge/GaugeFix.hpp \
 | 
			
		||||
  Modules/MGauge/FundtoHirep.hpp \
 | 
			
		||||
  Modules/MGauge/StochEm.hpp \
 | 
			
		||||
  Modules/MGauge/Electrify.hpp \
 | 
			
		||||
  Modules/MNoise/TimeDilutedSpinColorDiagonal.hpp \
 | 
			
		||||
  Modules/MNoise/FullVolumeSpinColorDiagonal.hpp \
 | 
			
		||||
  Modules/MUtilities/PrecisionCast.hpp \
 | 
			
		||||
  Modules/MUtilities/RandomVectors.hpp \
 | 
			
		||||
  Modules/MUtilities/TestSeqGamma.hpp \
 | 
			
		||||
  Modules/MUtilities/PrecisionCast.hpp \
 | 
			
		||||
  Modules/MUtilities/TestSeqConserved.hpp \
 | 
			
		||||
  Modules/MLoop/NoiseLoop.hpp \
 | 
			
		||||
  Modules/MScalar/FreeProp.hpp \
 | 
			
		||||
  Modules/MScalar/VPCounterTerms.hpp \
 | 
			
		||||
  Modules/MScalar/ScalarVP.hpp \
 | 
			
		||||
  Modules/MScalar/Scalar.hpp \
 | 
			
		||||
  Modules/MScalar/ChargedProp.hpp \
 | 
			
		||||
  Modules/MSolver/MixedPrecisionRBPrecCG.hpp \
 | 
			
		||||
  Modules/MSolver/A2AAslashVectors.hpp \
 | 
			
		||||
  Modules/MSolver/Guesser.hpp \
 | 
			
		||||
  Modules/MSolver/LocalCoherenceLanczos.hpp \
 | 
			
		||||
  Modules/MSolver/RBPrecCG.hpp \
 | 
			
		||||
  Modules/MSolver/A2AVectors.hpp \
 | 
			
		||||
  Modules/MDistil/LapEvec.hpp \
 | 
			
		||||
  Modules/MDistil/Distil.hpp \
 | 
			
		||||
  Modules/MDistil/DistilVectors.hpp \
 | 
			
		||||
  Modules/MDistil/BContraction.hpp \
 | 
			
		||||
  Modules/MDistil/PerambLight.hpp \
 | 
			
		||||
  Modules/MNPR/Bilinear.hpp \
 | 
			
		||||
  Modules/MNPR/Amputate.hpp \
 | 
			
		||||
  Modules/MNPR/FourQuark.hpp \
 | 
			
		||||
  Modules/MAction/DWF.hpp \
 | 
			
		||||
  Modules/MAction/MobiusDWF.hpp \
 | 
			
		||||
  Modules/MContraction/WeakHamiltonian.hpp \
 | 
			
		||||
  Modules/MContraction/WeakNeutral4ptDisc.hpp \
 | 
			
		||||
  Modules/MContraction/WeakHamiltonianEye.hpp \
 | 
			
		||||
  Modules/MContraction/DiscLoop.hpp \
 | 
			
		||||
  Modules/MContraction/Baryon.hpp \
 | 
			
		||||
  Modules/MContraction/Gamma3pt.hpp \
 | 
			
		||||
  Modules/MContraction/A2AMesonField.hpp \
 | 
			
		||||
  Modules/MContraction/A2AAslashField.hpp \
 | 
			
		||||
  Modules/MContraction/WeakHamiltonianNonEye.hpp \
 | 
			
		||||
  Modules/MContraction/Meson.hpp \
 | 
			
		||||
  Modules/MContraction/WardIdentity.hpp \
 | 
			
		||||
  Modules/MAction/Wilson.hpp \
 | 
			
		||||
  Modules/MAction/WilsonClover.hpp \
 | 
			
		||||
  Modules/MAction/ZMobiusDWF.hpp \
 | 
			
		||||
  Modules/MAction/DWF.hpp \
 | 
			
		||||
  Modules/MAction/ScaledDWF.hpp \
 | 
			
		||||
  Modules/MScalarSUN/StochFreeField.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TwoPointNPR.hpp \
 | 
			
		||||
  Modules/MScalarSUN/ShiftProbe.hpp \
 | 
			
		||||
  Modules/MScalarSUN/Div.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TrMag.hpp \
 | 
			
		||||
  Modules/MScalarSUN/EMT.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TwoPoint.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TrPhi.hpp \
 | 
			
		||||
  Modules/MScalarSUN/Utils.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TransProj.hpp \
 | 
			
		||||
  Modules/MScalarSUN/Grad.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TrKinetic.hpp \
 | 
			
		||||
  Modules/MIO/LoadEigenPack.hpp \
 | 
			
		||||
  Modules/MAction/ZMobiusDWF.hpp \
 | 
			
		||||
  Modules/MAction/MobiusDWF.hpp \
 | 
			
		||||
  Modules/MGauge/Random.hpp \
 | 
			
		||||
  Modules/MGauge/Unit.hpp \
 | 
			
		||||
  Modules/MGauge/UnitEm.hpp \
 | 
			
		||||
  Modules/MGauge/StoutSmearing.hpp \
 | 
			
		||||
  Modules/MGauge/StochEm.hpp \
 | 
			
		||||
  Modules/MGauge/Electrify.hpp \
 | 
			
		||||
  Modules/MGauge/FundtoHirep.hpp \
 | 
			
		||||
  Modules/MGauge/GaugeFix.hpp \
 | 
			
		||||
  Modules/MNoise/TimeDilutedSpinColorDiagonal.hpp \
 | 
			
		||||
  Modules/MNoise/FullVolumeSpinColorDiagonal.hpp \
 | 
			
		||||
  Modules/MIO/LoadBinary.hpp \
 | 
			
		||||
  Modules/MIO/LoadCosmHol.hpp \
 | 
			
		||||
  Modules/MIO/LoadNersc.hpp \
 | 
			
		||||
  Modules/MIO/LoadA2AVectors.hpp \
 | 
			
		||||
  Modules/MIO/LoadCosmHol.hpp \
 | 
			
		||||
  Modules/MIO/LoadCoarseEigenPack.hpp \
 | 
			
		||||
  Modules/MIO/LoadBinary.hpp
 | 
			
		||||
  Modules/MIO/LoadEigenPack.hpp \
 | 
			
		||||
  Modules/MNPR/Amputate.hpp \
 | 
			
		||||
  Modules/MNPR/FourQuark.hpp \
 | 
			
		||||
  Modules/MNPR/Bilinear.hpp \
 | 
			
		||||
  Modules/MLoop/NoiseLoop.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TransProj.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TwoPoint.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TrMag.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TrKinetic.hpp \
 | 
			
		||||
  Modules/MScalarSUN/EMT.hpp \
 | 
			
		||||
  Modules/MScalarSUN/Grad.hpp \
 | 
			
		||||
  Modules/MScalarSUN/Utils.hpp \
 | 
			
		||||
  Modules/MScalarSUN/Div.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TrPhi.hpp \
 | 
			
		||||
  Modules/MScalarSUN/TwoPointNPR.hpp \
 | 
			
		||||
  Modules/MScalarSUN/StochFreeField.hpp \
 | 
			
		||||
  Modules/MScalarSUN/ShiftProbe.hpp \
 | 
			
		||||
  Modules/MSink/Smear.hpp \
 | 
			
		||||
  Modules/MSink/Point.hpp \
 | 
			
		||||
  Modules/MFermion/GaugeProp.hpp \
 | 
			
		||||
  Modules/MFermion/FreeProp.hpp \
 | 
			
		||||
  Modules/MScalar/Scalar.hpp \
 | 
			
		||||
  Modules/MScalar/ScalarVP.hpp \
 | 
			
		||||
  Modules/MScalar/FreeProp.hpp \
 | 
			
		||||
  Modules/MScalar/ChargedProp.hpp \
 | 
			
		||||
  Modules/MScalar/VPCounterTerms.hpp \
 | 
			
		||||
  Modules/MSource/Momentum.hpp \
 | 
			
		||||
  Modules/MSource/SeqGamma.hpp \
 | 
			
		||||
  Modules/MSource/Point.hpp \
 | 
			
		||||
  Modules/MSource/Z2.hpp \
 | 
			
		||||
  Modules/MSource/Wall.hpp \
 | 
			
		||||
  Modules/MSource/SeqConserved.hpp
 | 
			
		||||
 | 
			
		||||
 
 | 
			
		||||
@@ -224,6 +224,21 @@ void test_MesonField(Application &application)
 | 
			
		||||
  A2AMesonFieldPar.block=4;
 | 
			
		||||
  application.createModule<MContraction::A2AMesonField>("DistilMesonField",A2AMesonFieldPar);
 | 
			
		||||
}
 | 
			
		||||
/////////////////////////////////////////////////////////////
 | 
			
		||||
// BaryonFields
 | 
			
		||||
/////////////////////////////////////////////////////////////
 | 
			
		||||
 | 
			
		||||
void test_BaryonField(Application &application)
 | 
			
		||||
{
 | 
			
		||||
  // DistilVectors parameters
 | 
			
		||||
  MDistil::BContraction::Par BContractionPar;
 | 
			
		||||
  BContractionPar.one="DistilVecs_phi";
 | 
			
		||||
  BContractionPar.two="DistilVecs_phi";
 | 
			
		||||
  BContractionPar.three="DistilVecs_phi";
 | 
			
		||||
  BContractionPar.output="BaryonField";
 | 
			
		||||
  BContractionPar.mom={"0 0 0"};
 | 
			
		||||
  application.createModule<MDistil::BContraction>("BaryonField",BContractionPar);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
bool bNumber( int &ri, const char * & pstr, bool bGobbleWhiteSpace = true )
 | 
			
		||||
{
 | 
			
		||||
@@ -499,6 +514,13 @@ int main(int argc, char *argv[])
 | 
			
		||||
      test_Perambulators( application );
 | 
			
		||||
      test_MesonSink( application );
 | 
			
		||||
      break;
 | 
			
		||||
    case 7: // 3
 | 
			
		||||
      test_Global( application );
 | 
			
		||||
      test_LapEvec( application );
 | 
			
		||||
      test_Perambulators( application );
 | 
			
		||||
      test_DistilVectors( application );
 | 
			
		||||
      test_BaryonField( application );
 | 
			
		||||
      break;
 | 
			
		||||
  }
 | 
			
		||||
  LOG(Message) << "====== XML creation for test " << iTestNum << " complete ======" << std::endl;
 | 
			
		||||
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user