Added another Mathematica sample, improving accuracy.