From Programming Erlang: first version of geometry module