From cc37d2ac103544eae5a8c05b87c941ed37b22650 Mon Sep 17 00:00:00 2001 From: Marvin Borner Date: Fri, 1 Dec 2023 14:37:29 +0100 Subject: Bruijn --- 2023/01/solve.bruijn | 7 +++++++ 1 file changed, 7 insertions(+) create mode 100644 2023/01/solve.bruijn diff --git a/2023/01/solve.bruijn b/2023/01/solve.bruijn new file mode 100644 index 0000000..5fdfa88 --- /dev/null +++ b/2023/01/solve.bruijn @@ -0,0 +1,7 @@ +:import std/Math . +:import std/String . +:import std/Char C + +part1 [[^0 ⋅ (+10) + _0] (filter (gre? (+9)) (C.number! <$> 0))] + +main [∑(part1 <$> (lines 0))] -- cgit v1.2.3