Guest User

Untitled

a guest
Sep 26th, 2020
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. zip' :: [a] -> [b] -> [(a,b)]
  2. zip' (x:xs) (y:ys) = [(x,y)] ++ (zip' xs ys)
  3. zip' _ [] = []
  4. zip' [] _ = []
Advertisement
Add Comment
Please, Sign In to add comment