Haskell raster images and raytracing