75          foldl/3,
157     [Ord | Divs] = lists:foldl(fun(F,[D|_] = A) -> [F(0)*D | A] end, [1], L),
166     {Vs, []} = lists:foldl(fun(F, {A, [D|Ds]}) ->
201     [Ord | Os] = lists:foldl(fun(E, [N|_] = A) -> [N+E(0)|A] end, [0], Es),
308     foldl(fun(N,ok) -> Fun(N), ok end, ok, E).
317 foldl(Fun, Acc, E) ->  function
318     foldl(E(0), 1, Fun, Acc, E).
320 foldl(M, N, _, Acc, _)  function
323 foldl(M, N, Fun, Acc, E) ->  function
324     foldl(M, N+1, Fun, Fun(E(N), Acc), E).
327     foldl(Fun, Acc, reverse(E)).