init haskell