2016-05-04 02:17:28 +01:00
|
|
|
/*******************************************************************************
|
|
|
|
Grid physics library, www.github.com/paboyle/Grid
|
|
|
|
|
2016-12-05 04:53:31 +00:00
|
|
|
Source file: programs/Hadrons/Z2.cc
|
2016-05-04 02:17:28 +01:00
|
|
|
|
|
|
|
Copyright (C) 2016
|
|
|
|
|
|
|
|
Author: Antonin Portelli <antonin.portelli@me.com>
|
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License along
|
|
|
|
with this program; if not, write to the Free Software Foundation, Inc.,
|
|
|
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
|
|
|
|
|
|
See the full license in the file "LICENSE" in the top level distribution
|
|
|
|
directory.
|
|
|
|
*******************************************************************************/
|
|
|
|
|
2016-12-05 04:53:31 +00:00
|
|
|
#include <Grid/Hadrons/Modules/MSource/Z2.hpp>
|
2016-05-04 02:17:28 +01:00
|
|
|
|
|
|
|
using namespace Grid;
|
|
|
|
using namespace Hadrons;
|
2016-12-05 04:53:31 +00:00
|
|
|
using namespace MSource;
|
2016-05-04 02:17:28 +01:00
|
|
|
|
|
|
|
/******************************************************************************
|
2016-12-05 04:53:31 +00:00
|
|
|
* Z2 implementation *
|
2016-05-04 02:17:28 +01:00
|
|
|
******************************************************************************/
|
|
|
|
// constructor /////////////////////////////////////////////////////////////////
|
2016-12-05 04:53:31 +00:00
|
|
|
Z2::Z2(const std::string name)
|
|
|
|
: Module<Z2Par>(name)
|
2016-05-04 02:17:28 +01:00
|
|
|
{}
|
|
|
|
|
|
|
|
// dependencies/products ///////////////////////////////////////////////////////
|
2016-12-05 04:53:31 +00:00
|
|
|
std::vector<std::string> Z2::getInput(void)
|
2016-05-04 02:17:28 +01:00
|
|
|
{
|
|
|
|
std::vector<std::string> in;
|
|
|
|
|
|
|
|
return in;
|
|
|
|
}
|
|
|
|
|
2016-12-05 04:53:31 +00:00
|
|
|
std::vector<std::string> Z2::getOutput(void)
|
2016-05-04 02:17:28 +01:00
|
|
|
{
|
|
|
|
std::vector<std::string> out = {getName()};
|
|
|
|
|
|
|
|
return out;
|
|
|
|
}
|
|
|
|
|
2016-05-07 21:19:38 +01:00
|
|
|
// setup ///////////////////////////////////////////////////////////////////////
|
2016-12-05 04:53:31 +00:00
|
|
|
void Z2::setup(void)
|
2016-05-04 02:17:28 +01:00
|
|
|
{
|
2016-11-28 05:02:10 +00:00
|
|
|
env().registerLattice<PropagatorField>(getName());
|
2016-05-04 02:17:28 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
// execution ///////////////////////////////////////////////////////////////////
|
2016-12-05 04:53:31 +00:00
|
|
|
void Z2::execute(void)
|
2016-05-04 02:17:28 +01:00
|
|
|
{
|
2016-05-05 03:11:03 +01:00
|
|
|
Lattice<iScalar<vInteger>> t(env().getGrid());
|
|
|
|
LatticeComplex eta(env().getGrid());
|
|
|
|
LatticeFermion phi(env().getGrid());
|
2016-05-04 02:17:28 +01:00
|
|
|
Complex shift(1., 1.);
|
|
|
|
|
2016-05-12 11:59:28 +01:00
|
|
|
if (par().tA == par().tB)
|
2016-05-04 02:17:28 +01:00
|
|
|
{
|
2016-05-12 11:59:28 +01:00
|
|
|
LOG(Message) << "Generating Z_2 wall source at t= " << par().tA
|
2016-05-04 02:17:28 +01:00
|
|
|
<< std::endl;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2016-05-12 11:59:28 +01:00
|
|
|
LOG(Message) << "Generating Z_2 band for " << par().tA << " <= t <= "
|
|
|
|
<< par().tB << std::endl;
|
2016-05-04 02:17:28 +01:00
|
|
|
}
|
2016-11-28 05:02:10 +00:00
|
|
|
PropagatorField &src = *env().createLattice<PropagatorField>(getName());
|
2016-05-04 02:17:28 +01:00
|
|
|
LatticeCoordinate(t, Tp);
|
2016-05-05 03:11:03 +01:00
|
|
|
bernoulli(*env().get4dRng(), eta);
|
2016-05-07 21:19:38 +01:00
|
|
|
eta = (2.*eta - shift)*(1./::sqrt(2.));
|
2016-05-12 11:59:28 +01:00
|
|
|
eta = where((t >= par().tA) and (t <= par().tB), eta, 0.*eta);
|
2016-05-07 21:19:38 +01:00
|
|
|
src = 1.;
|
|
|
|
src = src*eta;
|
2016-05-04 02:17:28 +01:00
|
|
|
}
|