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