trying with haskell