29 assert(v1.
nex() == 1);
30 assert(v2.
nex() == 1);
35 for (
int site = 0; site < Nvol; ++site) {
36 for (
int c1 = 0; c1 < Nc; ++c1) {
37 for (
int c2 = 0; c2 < Nc; ++c2) {
40 for (
int s = 0; s < Nd; ++s) {
41 utr += v1.
cmp_r(c2, s, site) * v2.
cmp_r(c1, s, site)
42 + v1.
cmp_i(c2, s, site) * v2.
cmp_i(c1, s, site);
43 uti += v1.
cmp_r(c2, s, site) * v2.
cmp_i(c1, s, site)
44 - v1.
cmp_i(c2, s, site) * v2.
cmp_r(c1, s, site);
46 ut.set(c1, c2, utr, uti);
double cmp_i(const int cc, const int s, const int site, const int e=0) const
Wilson-type fermion field.
void tensorProd_Field_F(Field_G &u, const Field_F &v1, const Field_F &v2)
void set_mat(const int site, const int mn, const Mat_SU_N &U)
double cmp_r(const int cc, const int s, const int site, const int e=0) const