segment.js

// Split an array every time the predicate returns true
// :: f => (array -> Boolean) -> f a -> f a
const segment = R.curry((fn, array) => {
  const chunks = [];
  let chunk = [];
  for (let value of array) {
    if (fn(value)) {
      chunks.push(chunk);
      chunk = [];
    }
    chunk.push(value);
  }
  chunks.push(chunk);
  return chunks;
});