I use Graphics in Mathematica, or xypic package for LaTeX.