basic erlang account system