alan day4

This commit is contained in:
EC2 Default User
2021-12-04 18:40:16 +00:00
parent a2be18ffd0
commit 5f9e4a1b88
5 changed files with 727 additions and 1 deletions

View File

@@ -11,7 +11,7 @@ solve() ->
init:stop().
solve(A) ->
solve(A, get_data()).
solve(A, get_test_data()).
solve(['1'], D) ->
io:format("The solution to ~p puzzle1 is: ~p~n", [?MODULE, solve(1, D)]);
@@ -60,6 +60,7 @@ get_count_list([H|_] = D) ->
get_count_list(D, init_acc(length(H), [])).
get_count_list([], Acc) ->
io:format("~p~n", [Acc]),
Acc;
get_count_list([H|T], Acc) ->
get_count_list(T, lists:zipwith(fun(X, {Ones, Zeros}) ->