forked from mirrors/nixpkgs
Add the zipLists and zipListsWith functions.
svn path=/nixpkgs/trunk/; revision=17476
This commit is contained in:
parent
af88789507
commit
e6399964cb
|
@ -127,5 +127,13 @@ rec {
|
|||
else { right = t.right; wrong = [h] ++ t.wrong; }
|
||||
) { right = []; wrong = []; };
|
||||
|
||||
|
||||
|
||||
zipListsWith = f: fst: snd:
|
||||
if fst != [] && snd != [] then
|
||||
[ (f (head fst) (head snd)) ]
|
||||
++ zipLists (tail fst) (tail snd)
|
||||
else [];
|
||||
|
||||
zipLists = zipListsWith (fst: snd: { inherit fst snd; });
|
||||
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue