Mathematica solution

Mathematica uses square brackets `[]` instead of normal parenthesis for function invocation.

Hope you don't mind.
Make solution more general, not hardcoding "al"
Merge pull request #55 from Tyilo/patch-1

Mathematica solution