A ray tracer written in haskell