A simple 2D physics engine, written in Haskell