Basic haskell scripts