[Haskell-cafe] Fold that quits early?