Adding a basic implementation in Mathematica