EDSL for Stencil Computations in Haskell