20 LatticeColorMatrix aux1;
21 LatticeColorMatrix aux2;
22 LatticeColorMatrix aux3;
53 aa = -Real(0.5)*real(trace(aux1));
59 bb = -imag(trace(aux2))/Real(3);
82 ftmp2 = Real(479001600);
87 ftmp1 = Real(2.08767569878681E-09);
88 x0_real = te1 *
ftmp1;
109 ftmp2 = Real(332640);
114 ftmp2 = Real(6652800);
124 ftmp1 = Real(2.505210838544172E-08);
125 x0_imag = te3 *
ftmp1;
152 ftmp2 = Real(332640);
157 ftmp2 = Real(6652800);
162 ftmp2 = Real(39916800);
169 ftmp1 = Real(2.505210838544172E-08);
170 x1_real = x1_real *
ftmp1;
193 ftmp2 = Real(1330560);
198 ftmp2 = Real(19958400);
206 ftmp1 = Real(2.08767569878681E-09);
208 x1_imag = x1_imag *
ftmp1;
234 ftmp2 = Real(665280);
239 ftmp2 = Real(19958400);
244 ftmp2 = Real(239500800);
249 ftmp1 = Real(2.08767569878681E-09);
251 x2_real =
ftmp1 * x2_real;
266 ftmp2 = Real(332640);
274 ftmp1 = Real(2.505210838544172E-08);
276 x2_imag =
ftmp1 * x2_imag;
280 x0 = cmplx(x0_real,x0_imag);
281 x1 = cmplx(x1_real,x1_imag);
282 x2 = cmplx(x2_real,x2_imag);
Primary include file for CHROMA library code.
Asqtad Staggered-Dirac operator.
QDP_error_exit("too many BiCG iterations", n_count, rsd_sq, cp, c, re_rvr, im_rvr, re_a, im_a, re_b, im_b)
void expsu3(LatticeColorMatrix &a, Reunitarize cflag)
void reunit(LatticeColorMatrixF3 &xa)