Working on haskell syntax