"Programing Erlang" sample source code