Reformat haskell