advent-of-code

commit 70b3ce278c2aef508a8fe9fc2bb51d5e64aa7efd
parent 48d9e3bf767fe674bc14a4ba35e32a159a950da9
Author: aabacchus <bvnfuller@gmail.com>
Date:   Thu,  2 Dec 2021 19:07:34 +0000

2021 day 1 part 2 in scheme

Diffstat:
M
2021/01/1.scm
 | 
4
++++

1 file changed, 4 insertions(+), 0 deletions(-)
diff --git a/2021/01/1.scm b/2021/01/1.scm
@@ -14,4 +14,8 @@
   (+ (if (< (car array) (cadr array)) 1 0)
      (if (< (length array) 3) 0 (num-larger (cdr array)))))
 
+; part 1
 (print (num-larger lines))
+
+; part 2
+(print (num-larger (map + lines (cdr lines) (cddr lines))))