35 const LatticeColorMatrix& source,
43 QDPIO::cerr <<
"su2Extract: return result invalid size" << std::endl;
54 while ( del_i < (Nc-1) && found == 0 )
57 for ( i1 = 0; i1 < (Nc-del_i); i1++ )
71 QDPIO::cerr << __func__ <<
": trouble with SU2 subgroup index" << std::endl;
76 r[0][
s] = real(peekColor(source,i1,i1)) + real(peekColor(source,i2,i2));
77 r[1][
s] = imag(peekColor(source,i1,i2)) + imag(peekColor(source,i2,i1));
78 r[2][
s] = real(peekColor(source,i1,i2)) - real(peekColor(source,i2,i1));
79 r[3][
s] = imag(peekColor(source,i1,i1)) - imag(peekColor(source,i2,i2));
87 const LatticeColorMatrix& source,
Primary include file for CHROMA library code.
void su2Extract_t(multi1d< LatticeReal > &r, const LatticeColorMatrix &source, int su2_index, const S &s)
Su2_extract: r_0,r_1,r_2,r_3 <- source(su2_index) [SU(N) field] under a subset.
void su2Extract(multi1d< LatticeReal > &r, const LatticeColorMatrix &source, int su2_index, const Subset &s)
Su2_extract: r_0,r_1,r_2,r_3 <- source(su2_index) [SU(N) field] under a subset.
Asqtad Staggered-Dirac operator.
multi1d< LatticeFermion > s(Ncb)