added example in Haskell language