mirror of
https://github.com/paboyle/Grid.git
synced 2025-04-09 21:50:45 +01:00
First version of conserved current contraction for Wilson type quarks
This commit is contained in:
parent
605cf401e1
commit
0542eaf1da
@ -603,7 +603,37 @@ void WilsonFermion<Impl>::ContractConservedCurrent(PropagatorField &q_in_1,
|
|||||||
conformable(_grid, q_in_1.Grid());
|
conformable(_grid, q_in_1.Grid());
|
||||||
conformable(_grid, q_in_2.Grid());
|
conformable(_grid, q_in_2.Grid());
|
||||||
conformable(_grid, q_out.Grid());
|
conformable(_grid, q_out.Grid());
|
||||||
assert(0);
|
|
||||||
|
PropagatorField tmp_shifted(UGrid);
|
||||||
|
PropagatorField g5Lg5(UGrid);
|
||||||
|
PropagatorField R(UGrid);
|
||||||
|
PropagatorField gmuR(UGrid);
|
||||||
|
|
||||||
|
Gamma::Algebra Gmu [] = {
|
||||||
|
Gamma::Algebra::GammaX,
|
||||||
|
Gamma::Algebra::GammaY,
|
||||||
|
Gamma::Algebra::GammaZ,
|
||||||
|
Gamma::Algebra::GammaT,
|
||||||
|
};
|
||||||
|
Gamma gmu=Gamma(Gmu[mu]);
|
||||||
|
|
||||||
|
tmp_shifted=Cshift(q_in_1,mu,1);
|
||||||
|
g5Lg5=g5*tmp_shifted*g5;
|
||||||
|
R=q_in_2;
|
||||||
|
gmuR=gmu*R;
|
||||||
|
|
||||||
|
qout=adj(g5Lg5)*R;
|
||||||
|
qout+=adj(g5Lg5)*gmuR;
|
||||||
|
|
||||||
|
g5Lg5=g5*q_in_1*g5;
|
||||||
|
tmp_shifted=Cshift(q_in_2,mu,1);
|
||||||
|
Impl::multLinkField(R,this->Umu,tmp_shifted,mu);
|
||||||
|
gmuR=gmu*R;
|
||||||
|
|
||||||
|
qout-=adj(g5Lg5)*R;
|
||||||
|
qout+=adj(g5Lg5)*gmuR;
|
||||||
|
|
||||||
|
qout/=2;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user