haskell-fold-debounce