example of haskell core