Итерация по 2 спискам одновременно в haskell (без использования zip)

Question

У меня есть 2 списка:

[[1,2],[4,5]]

и

[0, 3]

и я бы хотел превратить его в

[[0,1,2],[3,4,5]]

Я создал функцию, которая делает именно это:

myFun xxs xs = map (\x -> (fst x):(snd x)) (zip xs xxs)

и это работает. Но я все еще задаюсь вопросом, может ли существовать лучший способ сделать это без использования почтового индекса. Есть ли?

По сути, я хочу выполнить итерацию по двум спискам одновременно, и я не могу придумать, как это сделать в Haskell, не прибегая к zip.

Спасибо

Answer 1

Используйте zipWith . Например:

zipWith (:) [0,3] [[1,2],[4,5]]

Дает:

[[0,1,2],[3,4,5]]

Answer 2

Почему почтовый индекс не вариант?

Или я должен сказать, zipWith.

zipWith (\x y -> x:y) xs xxs

Answer 3

Вы можете переместить почтовый индекс в тип с помощью ZipList из Control.Applicative:

myFun xxs xs = getZipList $ (:) <$> ZipList xs <*> ZipList xxs