**Next message:**Andi: "Re: Interest in FeynCalc for Mathematica 7 ?"**Previous message:**Masaru Watanabe: "Re: Interest in FeynCalc for Mathematica 7 ?"**Messages sorted by:**[ date ] [ thread ] [ subject ] [ author ]**Mail actions:**[ respond to this message ] [ mail a new topic ]

I am very badly in need of solvin the following problem.

I have combination of spinor chains in the amplitude with structures like e.g.

1)[(Spinor[P/2+-q,M].___. Spinor[P/2-+q],M)*(Spinor[k1,M].____.Spinor[k2,M])]

2) [(Spinor[P/2+-q,M].___. Spinor[anyk,M])*(Spinor[P/2-+q,M].____.Spinor[anyk,M])]

(Note that M is same in all)

I have a large number of diagrams. Now I want to read these chains like:

Spinor[anyk,M].___.Spinor[anyk,M]

Spinor[P/2+-q,M].___.Spinor[P/2-+q,M]

Spinor[P/2+-q,M].___.Spinor[anyk,M] or vice versa

I have successfully separated out the 1st chain (Spinor[anyk,M].___.Spinor[anyk,M]) but my if loop is not working for the rest of two.What I wrote is:

If[FreeQ[chain22[i1,i2,i5],Xor[Spinor[a_+b_,MC,___],Spinor[a_-b_,MC,___]]],

{condition1},{condition2}]

I mean Xor is true if the chain contains odd number of Spinor[P/2+-q,M].

Help out please..........

**Next message:**Andi: "Re: Interest in FeynCalc for Mathematica 7 ?"**Previous message:**Masaru Watanabe: "Re: Interest in FeynCalc for Mathematica 7 ?"**Messages sorted by:**[ date ] [ thread ] [ subject ] [ author ]**Mail actions:**[ respond to this message ] [ mail a new topic ]

*
This archive was generated by hypermail 2b29
: 01/24/18-09:00:02 AM Z CET
*