Sha256: d8ee6e3374061d77972eb5bc71c67804db0ea6f231806baf31af83329e8736bd
Contents?: true
Size: 480 Bytes
Versions: 84
Compression:
Stored size: 480 Bytes
Contents
-module(sum_of_multiples).
-export([sumOfMultiples/2]).
-import(lists, [foldl/3, seq/2, any/2]).
-spec sumOfMultiples([pos_integer()], pos_integer()) -> non_neg_integer().
sumOfMultiples(Multiples, A) ->
foldl(fun(X, Sum) -> case multiple(Multiples, X) of
true -> Sum + X;
false -> Sum
end
end,
0,
seq(1, A-1)).
multiple(List, X) ->
any(fun(E) -> (X rem E) =:= 0 end, List).
Version data entries
84 entries across 84 versions & 1 rubygems