Orthogonal matching pursuit algorithm in Haskell and its applications