18 lines
212 B
Nix
18 lines
212 B
Nix
with import ../lib;
|
|
|
|
let
|
|
input = fileContents ./input.txt;
|
|
in
|
|
|
|
pipe input [
|
|
(splitStr "\n\n")
|
|
(map (flip pipe [
|
|
(splitStr "\n")
|
|
(map toInt)
|
|
sum
|
|
]))
|
|
(sort (flip lessThan))
|
|
(take 3)
|
|
sum
|
|
]
|