diff options
Diffstat (limited to 'samples/aoc/2022/01/solve.bruijn')
| -rw-r--r-- | samples/aoc/2022/01/solve.bruijn | 6 |
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)] |