Sample sample code written whilst learning Erlang