Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Catamorphism/Erlang/catamorphism.erl
+++ b/Task/Catamorphism/Erlang/catamorphism.erl
@ -0,0 +1,16 @@
+-module(catamorphism).
+
+-export([test/0]).
+
+test() ->
+	Nums = lists:seq(1,10),
+	Summation =
+		lists:foldl(fun(X, Acc) -> X + Acc end, 0, Nums),
+	Product =
+		lists:foldl(fun(X, Acc) -> X * Acc end, 1, Nums),
+	Concatenation =
+		lists:foldr(
+			fun(X, Acc) -> integer_to_list(X) ++ Acc end,
+			"",
+			Nums),
+	{Summation, Product, Concatenation}.