aboutsummaryrefslogtreecommitdiffhomepage
path: root/samples/aoc/2022/01/solve.bruijn
diff options
context:
space:
mode:
authorMarvin Borner2023-03-03 17:20:59 +0100
committerMarvin Borner2023-03-03 17:33:48 +0100
commit737989f1492b400d59a22a5235555b51a23181fa (patch)
tree9218f982be140e03bf30c339fd253b5adc29bf9f /samples/aoc/2022/01/solve.bruijn
parent6948d5cf89508e9d91978c93c3d2b0d552f60720 (diff)
Added second part of aoc and needed functions
Also, I don't know how I got 30s for the first part previously. Cannot reproduce and probably was a mistake. idk
Diffstat (limited to 'samples/aoc/2022/01/solve.bruijn')
-rw-r--r--samples/aoc/2022/01/solve.bruijn6
1 files changed, 4 insertions, 2 deletions
diff --git a/samples/aoc/2022/01/solve.bruijn b/samples/aoc/2022/01/solve.bruijn
index 7764db8..94b4cf7 100644
--- a/samples/aoc/2022/01/solve.bruijn
+++ b/samples/aoc/2022/01/solve.bruijn
@@ -1,7 +1,9 @@
:import std/Math .
:import std/String .
-main [lmax sums]
+main [answer]
numbers number! <$> (lines 0)
- parts split-at =?‣ numbers
+ parts split-list-by =?‣ numbers
sums sum <$> parts
+ answer build (sort-desc sums)
+ build [^0 : ∑(take (+3) 0)]