haskell simple indent sucks