blob: 554b25927e94ed790cbb205e9b2fc7ac8091cfa0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
(import (chezscheme))
; Where the magic happens
(import (lib))
; Read my personal puzzle input
(define input
(call-with-input-file "input.txt" get-line))
; Part 1 gives 6952 for me
(printf "Part 1 solution: ~a\n" (solve-part1 input))
; Part 2 gives "28e7c4360520718a5dc811d3942cf1fd" for me
(printf "Part 2 solution: ~a\n" (solve-part2 input))
|