A simple graphics ray tracer coded in Haskell