Raytracer in Haskell