28 lines
545 B
Plaintext
28 lines
545 B
Plaintext
#lang curly-fn racket
|
|
|
|
(require "scripts/aoc.rkt")
|
|
|
|
;; solution for day @day
|
|
|
|
(define (part1 input)
|
|
;; ...
|
|
(void))
|
|
|
|
@(if (equal? day "25") "" "(define (part2 input)
|
|
;; ...
|
|
(void))
|
|
")
|
|
(define (parse fname)
|
|
(define input (file->lines fname))
|
|
(void input))
|
|
|
|
(module+ test
|
|
(require rackunit)
|
|
(displayln "no tests :("))
|
|
|
|
(module+ main
|
|
(define input (parse "inputs/@day"))
|
|
(answer @day 1 (time (part1 input)))
|
|
@(if (equal? day "25") "(aoc-finish)" (string-append "(answer " day " 2 (time (part2 input)))"))
|
|
(displayln "meow"))
|