Business card raytracer in Haskell