Merge branch 'master' of https://fbox.kageds.com/gitweb/advent2021

[adventofcode.git] / day1 / day1.erl

diff --git a/day1/day1.erl b/day1/day1.erl
index 6906787766f86bc77a38e738c5e1aa8e0581b1aa..cdb6d0912101c34dc3cd2f2bb230608c53a19241 100644 (file)
--- 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, []).