Erlang implementation of Porter algorithm (an algorithm for suffix stripping)