Как я могу разбить список на куски, используя span?

Question

Можно ли переписать это с помощью функций библиотеки?

chunks :: ([a] -> ([a], [a])) -> [a] -> [[a]] 
chunks f [] = [] 
chunks f xs = case c of 
    [] -> cs 
    ys -> ys : cs 
    where 
    (c, rest) = f xs 
    cs = chunks f rest 

Если я дам ему span -кака функции, которая всегда принимает, по меньшей мере, один элемент из списка, он будет потреблять список и возвращает список с подсписками элементов, которые были разорваны каждый раз, когда функция назывался.

Answer 1

Это выглядит очень похоже на Открываются:

http://hackage.haskell.org/package/base-4.8.0.0/docs/Data-List.html#v:unfoldr

Может быть что-то вроде (непроверенные):

chunks f xs = unfoldr f' xs 
    where f' [] = Nothing 
     f' xs' = Just $ f xs'