S@M, a mathematica implementation of the spinor-helicity formalism