A simple implementation of the Fisher-Yates shuffle in Erlang