21 const string str_vlevel = params.
get_string(
"verbose_level");
77 const double ct_tilde)
116 std::vector<int> Nsize(Ndim);
128 assert(src.
nvol() == Nvol);
129 assert(src.
nex() == 1);
137 for (
int z = 0; z < Nsize[2]; ++z) {
138 for (
int y = 0; y < Nsize[1]; ++y) {
139 for (
int x = 0; x < Nsize[0]; ++x) {
145 for (
int ac = 0; ac < Nc; ++ac) {
146 src.
set_ri(ac,
id, site, 0, u0dag.r(ac, ic), u0dag.i(ac, ic));
177 std::vector<int> Nsize(Ndim);
188 assert(
id > Nd / 2 - 1);
190 assert(src.
nvol() == Nvol);
191 assert(src.
nex() == 1);
197 const int t = Nsize[3] - 1;
199 for (
int z = 0; z < Nsize[2]; ++z) {
200 for (
int y = 0; y < Nsize[1]; ++y) {
201 for (
int x = 0; x < Nsize[0]; ++x) {
205 for (
int ac = 0; ac < Nc; ++ac) {
206 src.
set_ri(ac,
id, site, 0, u0.r(ac, ic), u0.i(ac, ic));
void scal(Field &x, const double a)
scal(x, a): x = a * x
Bridge::VerboseLevel m_vl
static const std::string class_name
void set(const int jin, const int site, const int jex, double v)
int site(const int &x, const int &y, const int &z, const int &t) const
void general(const char *format,...)
int fetch_double(const string &key, double &value) const
static int ipe(const int dir)
logical coordinate of current proc.
Wilson-type fermion field.
void set_ri(const int cc, const int s, const int site, const int e, const double re, const double im)
void set_parameters(const Parameters ¶ms)
void set_t0(Field_F &src, const int ic, const int id)
Set the 3D wall source at t=1.
void set_config(Field *U)
set pointer to original thin link variable
int get_Nsmear()
get number of applied smearing operation
Field_G * m_U
Pointer to gauge field.
void crucial(const char *format,...)
void set_tT(Field_F &src, const int ic, const int id)
Set the 3D wall source at t=T-1.
Manager of smeared configurations.
Field * getptr_smearedConfig(const int i_smear)
get pointer to i-th smeared config (0th is original thin link)
Mat_SU_N mat_dag(const int site, const int mn=0) const
string get_string(const string &key) const
Mat_SU_N mat(const int site, const int mn=0) const
static VerboseLevel set_verbose_level(const std::string &str)
double m_ct_tilde
Boundary O(a) improvement factor for the Wilson (clover) fermion.