Simple raytracer in Haskell (port from raytracer-scala)