diff --git a/erlang/day1.erl b/erlang/day1.erl
new file mode 100644
index 0000000..daf8319
--- /dev/null
+++ 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)).