X-Git-Url: https://fbox.kageds.com/gitweb/adventofcode.git/blobdiff_plain/b436060962098838f4accbe7c59b2a713b3bddc4..2ce4aa695b5bd334f9ae04d7bc3c720df0d5c2bb:/day1/day1.erl?ds=inline diff --git a/day1/day1.erl b/day1/day1.erl index 6906787..cdb6d09 100644 --- a/day1/day1.erl +++ b/day1/day1.erl @@ -6,6 +6,8 @@ solve(A) -> solve(A, D). +solve(['1'], D) -> + io:format("The solution to puzzle 1 is: ~p", [solve(1, D)]); solve(1, D) -> lists:foldl(fun(X, {C, V}) -> case X > V of @@ -15,6 +17,8 @@ solve(1, D) -> end, {-1, 0}, D); +solve(['2'], D) -> + io:format("The solution to puzzle 2 is: ~p", [solve(2, D)]); solve(2, D) -> solve(2, D, []).