Erlang task 1 day 2 fixed