export const concatMap = (f, xs) => {
  const concatMap_ = (f, xs) => concat(map(f, xs));
  return partial(concatMap_, f, xs);
}