Added answer to Erlang accumulate