Haskell Ray Tracer