MomentumExpand[expr]
expands Momentum[a+b+ ...]
in expr
into Momentum[a] + Momentum[b] + ...
.
Overview, ExpandScalarProduct, MomentumCombine.
[Momentum[p + q]] // StandardForm
MomentumExpand
(*Momentum[p] + Momentum[q]*)
[p + q, r] ScalarProduct
(\overline{p}+\overline{q})\cdot \overline{r}
[p + q, r] // StandardForm
ScalarProduct
(*Pair[Momentum[p + q], Momentum[r]]*)
= MomentumExpand[ScalarProduct[p + q, r]] ex
(\overline{p}+\overline{q})\cdot \overline{r}
// StandardForm
ex
(*Pair[Momentum[p] + Momentum[q], Momentum[r]]*)
= MomentumExpand[ScalarProduct[p + q, r - p]] ex
(\overline{p}+\overline{q})\cdot (\overline{r}-\overline{p})
// StandardForm
ex
(*Pair[Momentum[p] + Momentum[q], -Momentum[p] + Momentum[r]]*)