Added James' sparse noise code and a module to use it

Hadrons/Modules/MNoise/SparseSpinColorDiagonal.cc

@@ -0,0 +1,8 @@
+#include <Hadrons/Modules/MNoise/SparseSpinColorDiagonal.hpp>
+
+using namespace Grid;
+using namespace Hadrons;
+using namespace MNoise;
+
+template class Grid::Hadrons::MNoise::TSparseSpinColorDiagonal<FIMPL>;
+template class Grid::Hadrons::MNoise::TSparseSpinColorDiagonal<ZFIMPL>;

Hadrons/Modules/MNoise/SparseSpinColorDiagonal.hpp

@@ -0,0 +1,96 @@
+#ifndef Hadrons_MNoise_SparseSpinColorDiagonal_hpp_
+#define Hadrons_MNoise_SparseSpinColorDiagonal_hpp_
+
+#include <Hadrons/Global.hpp>
+#include <Hadrons/Module.hpp>
+#include <Hadrons/ModuleFactory.hpp>
+#include <Hadrons/DilutedNoise.hpp>
+
+BEGIN_HADRONS_NAMESPACE
+
+/******************************************************************************
+ *                         SparseSpinColorDiagonal                                 *
+ ******************************************************************************/
+BEGIN_MODULE_NAMESPACE(MNoise)
+
+class SparseSpinColorDiagonalPar: Serializable
+{
+public:
+    GRID_SERIALIZABLE_CLASS_MEMBERS(SparseSpinColorDiagonalPar,
+                                    unsigned int, nsrc,
+                                    unsigned int, nsparse);
+};
+
+template <typename FImpl>
+class TSparseSpinColorDiagonal: public Module<SparseSpinColorDiagonalPar>
+{
+public:
+    FERM_TYPE_ALIASES(FImpl,);
+public:
+    // constructor
+    TSparseSpinColorDiagonal(const std::string name);
+    // destructor
+    virtual ~TSparseSpinColorDiagonal(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);
+};
+
+MODULE_REGISTER_TMP(SparseSpinColorDiagonal, TSparseSpinColorDiagonal<FIMPL>, MNoise);
+MODULE_REGISTER_TMP(ZSparseSpinColorDiagonal, TSparseSpinColorDiagonal<ZFIMPL>, MNoise);
+
+/******************************************************************************
+ *                 TSparseSpinColorDiagonal implementation                             *
+ ******************************************************************************/
+// constructor /////////////////////////////////////////////////////////////////
+template <typename FImpl>
+TSparseSpinColorDiagonal<FImpl>::TSparseSpinColorDiagonal(const std::string name)
+: Module<SparseSpinColorDiagonalPar>(name)
+{}
+
+// dependencies/products ///////////////////////////////////////////////////////
+template <typename FImpl>
+std::vector<std::string> TSparseSpinColorDiagonal<FImpl>::getInput(void)
+{
+    std::vector<std::string> in;
+    
+    return in;
+}
+
+template <typename FImpl>
+std::vector<std::string> TSparseSpinColorDiagonal<FImpl>::getOutput(void)
+{
+    std::vector<std::string> out = {getName()};
+    
+    return out;
+}
+
+// setup ///////////////////////////////////////////////////////////////////////
+template <typename FImpl>
+void TSparseSpinColorDiagonal<FImpl>::setup(void)
+{
+    envCreateDerived(DilutedNoise<FImpl>, 
+                     SparseSpinColorDiagonalNoise<FImpl>,
+                     getName(), 1, envGetGrid(FermionField), par().nsrc, par().nsparse);
+    
+}
+
+// execution ///////////////////////////////////////////////////////////////////
+template <typename FImpl>
+void TSparseSpinColorDiagonal<FImpl>::execute(void)
+{
+    auto &noise = envGet(DilutedNoise<FImpl>, getName());
+    LOG(Message) << "Generating sparse, spin-color diagonal noise with nSparse = "
+                    << par().nsparse << std::endl;
+    noise.generateNoise(rng4d());
+}
+
+END_MODULE_NAMESPACE
+
+END_HADRONS_NAMESPACE
+
+#endif // Hadrons_MNoise_SparseSpinColorDiagonal_hpp_