Playing with Haskell and PostgreSQL