X-Git-Url: https://fbox.kageds.com/gitweb/adventofcode.git/blobdiff_plain/3b060071f21e21bbb9dbc3a9dda90c7f6ab1945c..1517295a267908fd7e7141b59b99cc3a85a09f57:/day1/day1.erl 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, []).