Haskell implementation of Locally Scaled Diffusion Maps