erlang day1

2023-08-14 09:36:36 +02:00 · 2023-08-14 09:36:36 +02:00 · f40104937d
commit f40104937d
parent fd69c6e68c
1 changed files with 13 additions and 0 deletions
--- a/erlang/day1.erl
+++ b/erlang/day1.erl
@ -0,0 +1,13 @@
+-module(day1).
+-export([charcount/1]).
+-export([counter/1]).
+-export([print/1]).
+
+charcount([])  -> 0;
+charcount([_ | Rest]) -> 1 + charcount(Rest).
+
+counter(10) -> 10;
+counter(N) -> counter(N + 1).
+
+print(success) -> io:write("success");
+print({error, Message}) -> io:write(unicode:characters_to_list(["error: ", Message], utf8)).