Various haskell scripts