A simple raytracer written in haskell accelerate EDSL