~neil-christensen-qft/hepcat/trunk

« back to all changes in this revision

Viewing changes to HEPCAT-Base.wl

  • Committer: Dr. Christensen
  • Date: 2020-07-30 16:53:45 UTC
  • Revision ID: nchris3@ilstu.edu-20200730165345-uy34jdd4mppquvfr
Added more momentum conservation identities.

Show diffs side-by-side

added added

removed removed

Lines of Context:
681
681
(*e.g. <2|p1p3|2> not <2|p1p4|2>*)
682
682
(*Very specific to 4-point amplitudes (p1+p2+p3+p4=0).*)
683
683
SpinorChainReduced[Spinor[sh4_,sq_,p4_],Mom[p5_],Mom[p6_],Spinor[sh4_,sq_,p4_]]/;(p6-p5>1&&(p6-p4>1||p6-p4<0)):>SpinorChainReduced[Spinor[sh4,sq,p4],Mom[p5],Mom[p6]-Sum[Mom[momenta[[ii]]],{ii,1,Length[momenta]}],Spinor[sh4,sq,p4]],
 
684
(*[12][3|p1|4(>^2) = -[12][3|p2|4>[3|p1|4>-[12][3|p3|4>[3|p1|4>-[12][3|p4|4>[3|p1|4>*)
 
685
(*<12>[3|p1|4(>^2)*)
 
686
SpinorChainReduced[Spinor[sh1_,sa_,p1_],Spinor[sh2_,sa_,p2_]]SpinorChainReduced[Spinor[sh3_,sq_,p3_],Mom[p5_],Spinor[sh4_,an_,p4_]]^2:>SpinorChainReduced[Spinor[sh1,sa,p1],Spinor[sh2,sa,p2]]SpinorChainReduced[Spinor[sh3,sq,p3],Mom[p5],Spinor[sh4,an,p4]]SpinorChainReduced[Spinor[sh3,sq,p3],Mom[p5]-Sum[Mom[momenta[[ii]]],{ii,1,Length[momenta]}],Spinor[sh4,an,p4]],
684
687
 
685
688
(*Massless <pN|...|pN]*)
686
689
SpinorChainReduced[Spinor["Helicity","Square",pN_],a___,Spinor["Helicity","Angle",pN_]]:>SpinorTraceReduced[Mom[pN],a],