9 "Fopr_Wilson_impl: implementation for SU(2).\n");
13 inline double mult_uv_r(
const double *u,
const double *v,
const int Nc)
15 return u[0] * v[0] - u[1] * v[1]
16 + u[2] * v[2] - u[3] * v[3];
20 inline double mult_uv_i(
const double *u,
const double *v,
const int Nc)
22 return u[0] * v[1] + u[1] * v[0]
23 + u[2] * v[3] + u[3] * v[2];
27 inline double mult_udagv_r(
const double *u,
const double *v,
const int Nc)
29 return u[0] * v[0] + u[1] * v[1]
30 + u[4] * v[2] + u[5] * v[3];
34 inline double mult_udagv_i(
const double *u,
const double *v,
const int Nc)
36 return u[0] * v[1] - u[1] * v[0]
37 + u[4] * v[3] - u[5] * v[2];
void general(const char *format,...)
static Bridge::VerboseLevel Vlevel()