day 1

1/advanced.nix

@@ -0,0 +1,24 @@
+with import <nixpkgs/lib>;
+
+let
+  input = fileContents ./input.txt;
+  
+  splitStr = pattern: flip pipe [
+    (strings.split pattern)
+    (filter isString)
+  ];
+  
+  sum = foldl' add 0;
+in
+
+pipe input [
+  (splitStr "\n\n")
+  (map (flip pipe [
+    (splitStr "\n")
+    (map toInt)
+    sum
+  ]))
+  (sort (flip lessThan))
+  (take 3)
+  sum
+]

1/basic.nix

@@ -0,0 +1,20 @@
+with import <nixpkgs/lib>;
+
+let
+  input = fileContents ./input.txt;
+  
+  splitStr = pattern: flip pipe [
+    (strings.split pattern)
+    (filter isString)
+  ];
+in
+
+pipe input [
+  (splitStr "\n\n")
+  (map (flip pipe [
+    (splitStr "\n")
+    (map toInt)
+    (foldl' add 0)
+  ]))
+  (foldl' max 0)
+]