Optimized left folds for Haskell.