builtins redundant

This commit is contained in:
Emile Clark-Boman 2026-01-15 11:45:03 +10:00
parent 86711856c3
commit 1c53c2d749

View file

@ -16,11 +16,11 @@ in rec {
foldl' = n:
if n == -1
then nul
else op (foldl' (n - 1)) (builtins.elemAt list n);
else op (foldl' (n - 1)) (elemAt list n);
in
foldl' (builtins.length list - 1);
foldl' (length list - 1);
crossLists = f: foldl (fs: args: builtins.concatMap (f: map f args) fs) [f];
crossLists = f: foldl (fs: args: concatMap (f: map f args) fs) [f];
findFirstIndex = pred: default: list: let
# A naive recursive implementation would be much simpler, but
@ -36,7 +36,7 @@ in rec {
#
# We start with index -1 and the 0'th element of the list, which satisfies the invariant
resultIndex =
builtins.foldl' (
foldl' (
index: el:
if index < 0
then
@ -63,10 +63,10 @@ in rec {
in
if index == null
then default
else builtins.elemAt list index;
else elemAt list index;
zipListsWith = f: fst: snd:
builtins.genList (n: f (builtins.elemAt fst n) (builtins.elemAt snd n)) (min (builtins.length fst) (builtins.length snd));
genList (n: f (elemAt fst n) (elemAt snd n)) (min (length fst) (length snd));
# zipLists = zipListsWith (fst: snd: {inherit fst snd;});
}