Haskell - zip 2 个列表

Question

我想编写一个将两个列表压缩在一起的函数。我有以下代码:

zip' :: [a]->[b]->[(a,b)]
zip' _ [] = []
zip' [] _ = []
zip' (x:xs)(y:ys)=(x,y) zip'(xs ys)

问题是当我编译代码时出现很多错误

Couldn't match expected type [b]->t0 with actual type a

The function xs is applied to one argument

有什么想法我做错了什么吗？抱歉，如果这听起来像是愚蠢的问题。

Answer 1

您需要将 (x,y) 附加到返回值:

zip' (x:xs) (y:ys) = (x,y):zip' xs ys

否则，它在语法上没有任何意义，因为您没有 cons (:)ing 与返回值匹配的 x,y。

Fiddle