33 LatticeColorVector colorvec =
zero;
35 for(
int spin_index= 0 ; spin_index < Ns ; ++spin_index)
36 for(
int color_index= 0 ; color_index < Nc ; ++color_index)
39 ar = where( rnd > 0.5 , LatticeReal(1) , LatticeReal(-1) );
41 ai = where( rnd > 0.5 , LatticeReal(1) , LatticeReal(-1) );
42 LatticeComplex
c = cmplx(ar,ai) ;
44 colorvec = peekSpin(
a,spin_index);
46 pokeSpin(
a,pokeColor(colorvec,
c,color_index),spin_index);
55 z2_src_t<LatticeFermion>(
a) ;
62 z2_src_t<LatticeStaggeredFermion>(
a) ;
93 a = where(Layout::latticeCoordinate(
mu) == slice,
tmp, LatticeFermion(
zero));
Primary include file for CHROMA library code.
void z2_src(LatticeFermion &a)
Z2-source.
void z2_src_t(T &a)
Volume source of complex Z2 noise.
Asqtad Staggered-Dirac operator.
LinOpSysSolverMGProtoClover::T T
Volume source of Z2 noise.