9                  "Fopr_Wilson_impl: implementation for SU(3).\n");
 
   13   inline double mult_uv_r(
const double *g, 
const double *w, 
const int Nc)
 
   15     return g[0] * w[0] - g[1] * w[1]
 
   16            + g[2] * w[2] - g[3] * w[3]
 
   17            + g[4] * w[4] - g[5] * w[5];
 
   21   inline double mult_uv_i(
const double *g, 
const double *w, 
const int Nc)
 
   23     return g[0] * w[1] + g[1] * w[0]
 
   24            + g[2] * w[3] + g[3] * w[2]
 
   25            + g[4] * w[5] + g[5] * w[4];
 
   29   inline double mult_udagv_r(
const double *g, 
const double *w, 
const int Nc)
 
   31     return g[0] * w[0] + g[1] * w[1]
 
   32            + g[6] * w[2] + g[7] * w[3]
 
   33            + g[12] * w[4] + g[13] * w[5];
 
   37   inline double mult_udagv_i(
const double *g, 
const double *w, 
const int Nc)
 
   39     return g[0] * w[1] - g[1] * w[0]
 
   40            + g[6] * w[3] - g[7] * w[2]
 
   41            + g[12] * w[5] - g[13] * w[4];
 
void general(const char *format,...)
 
static Bridge::VerboseLevel Vlevel()