alan/adventofcode
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Alan day2 erlang

Browse Source
This commit is contained in:
EC2 Default User
2021-12-02 08:35:58 +00:00
parent b436060962
commit 2ce4aa695b
3 changed files with 1047 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
day1/day1.erl
View File

@@ -6,6 +6,8 @@ solve(A) ->
solve(A, D). solve(A, D).
solve(['1'], D) ->
io:format("The solution to puzzle 1 is: ~p", [solve(1, D)]);
solve(1, D) -> solve(1, D) ->
lists:foldl(fun(X, {C, V}) -> lists:foldl(fun(X, {C, V}) ->
case X > V of case X > V of
@@ -15,6 +17,8 @@ solve(1, D) ->
end, end,
{-1, 0}, {-1, 0},
D); D);
solve(['2'], D) ->
io:format("The solution to puzzle 2 is: ~p", [solve(2, D)]);
solve(2, D) -> solve(2, D) ->
solve(2, D, []). solve(2, D, []).

2
day1/day1.hs
View File

File diff suppressed because one or more lines are too long

1039
day2/day2.erl Normal file
View File

File diff suppressed because it is too large Load Diff