Name: Rolf Mertig Date: 07/01/05-05:12:20 PM Z
Hello Barry,
here is a workaround:
In[15]:=
FourDivergence[
Uncontract[
SP[p,w]*SpinorUBar[p2,m].GS[w].SpinorU[p1,m],
w], FV[w, a]
]//FCE//InputForm
Out[15]//InputForm=
Spinor[Momentum[p2], m, 1] . GS[w] .
Spinor[Momentum[p1], m, 1]*FV[p, a] +
Spinor[Momentum[p2], m, 1] . GA[a] .
Spinor[Momentum[p1], m, 1]*SP[p, w]
Sorry for the trouble.
Rolf Mertig
GluonVision GmbH
Berlin