A function with the following type:

partitionWith :: (a -> Either b c) -> [a] -> ([b], [c])

It is very useful occasionally.