A simple raytracer in Haskell