Some Haskell functions that I think is handy