Code from one of our Erlang workshop