Enhanced Haskell Script