my erlang example, and test