15 #ifndef FIELD_F_1sp_INCLUDED 
   16 #define FIELD_F_1sp_INCLUDED 
   38   int myindex(
const int c2, 
const int site, 
const int ex)
 const 
   65   double cmp_r(
const int cc, 
const int site, 
const int e = 0)
 const 
   67     return field[myindex(2 * cc, site, e)];
 
   70   double cmp_i(
const int cc, 
const int site, 
const int e = 0)
 const 
   72     return field[myindex(2 * cc + 1, site, e)];
 
   75   void set_r(
const int cc, 
const int site, 
const int e, 
const double re)
 
   77     field[myindex(2 * cc, site, e)] = re;
 
   80   void set_i(
const int cc, 
const int site, 
const int e, 
const double im)
 
   82     field[myindex(2 * cc + 1, site, e)] = im;
 
   85   void set_ri(
const int cc, 
const int site, 
const int e, 
const double re, 
const double im)
 
   87     field[myindex(2 * cc, site, e)]     = re;
 
   88     field[myindex(2 * cc + 1, site, e)] = im;
 
   95     for (
int cc = 0; cc < m_Nc; ++cc) {
 
   97               field[myindex(2 * cc, site, e)],
 
   98               field[myindex(2 * cc + 1, site, e)]);
 
  105     for (
int cc = 0; cc < m_Nc; ++cc) {
 
  106       field[myindex(2 * cc, site, e)]     = F.
r(cc);
 
  107       field[myindex(2 * cc + 1, site, e)] = F.
i(cc);
 
  113     for (
int cc = 0; cc < m_Nc; ++cc) {
 
  114       field[myindex(2 * cc, site, e)]     += F.
r(cc);
 
  115       field[myindex(2 * cc + 1, site, e)] += F.
i(cc);
 
  121     for (
int cc = 0; cc < m_Nc2; ++cc) {
 
  122       field[myindex(cc, site, e)] = 0.0;
 
void clear_vec(const int site, const int e)
 
double cmp_i(const int cc, const int site, const int e=0) const 
 
double r(const int c) const 
 
void set_ri(const int cc, const int site, const int e, const double re, const double im)
 
Container of Field-type object. 
 
int myindex(const int c2, const int site, const int ex) const 
 
Field_F_1spinor(const int Nvol=CommonParameters::Nvol(), const int Nex=1)
 
void set_r(const int cc, const int site, const int e, const double re)
 
Field_F_1spinor(const Field &x)
 
void set(const int c, const double re, const double im)
 
Staggered-type fermion field. 
 
double i(const int c) const 
 
Common parameter class: provides parameters as singleton. 
 
void add_vec(const int site, const int e, const Vec_SU_N &F)
 
double cmp_r(const int cc, const int site, const int e=0) const 
 
Field_F_1spinor & operator=(const double a)
 
Vec_SU_N vec(const int site, const int e=0) const 
 
void set_vec(const int site, const int e, const Vec_SU_N &F)
 
int myindex(const int jin, const int site, const int jex) const 
 
void set_i(const int cc, const int site, const int e, const double im)