trizip haskell implementation

1 trizip :: [a] -> [b] -> [c] -> [(a,b,c)] 2 trizip a b c 3 | null a = [] 4 | null b = [] 5 | null c = [] 6 trizip (x:xs) (y:ys) (z:zs) = (++) [(x,y,z)] (trizip xs ys

>>阅读原文<<