advent-of-code-2025

commit 7ef256ffb4f03490b479f1ff3f7d1f560c5ce6f8
parent 79ce10196b59bebbcd87b26225255fb92ce9867f
Author: Alex Wennerberg <alex@Alexs-MacBook-Air.local>
Date:   Sun, 30 Nov 2025 22:18:54 -0800

day1 part 1

Diffstat:
A
01.scm
 | 
15
+++++++++++++++

1 file changed, 15 insertions(+), 0 deletions(-)
diff --git a/01.scm b/01.scm
@@ -0,0 +1,15 @@
+(import (chicken io)
+        (sequences))
+
+(define pass 0)
+(define pass0x434C49434B 0)
+(foldl (lambda (a move) 
+           (if (= a 0) (set! pass (+ pass 1)))
+           (modulo 
+             ((if (char=? #\R (string-ref move 0)) + -) a (string->number (substring move 1))) 
+             100)
+         )
+         50
+         (read-lines))
+(print pass)
+(print pass0x434C49434B)