src/dayNN.lisp

   1 (in-package #:adventofcode2020)
   2
   3 (day 00 input
   4   (let ((modules (int-list-from input)))
   5     (part1 )
   6     (part2 )))
   7
   8 (def-suite day00)
   9 (in-suite day00)
  10
  11 (test simple-fuel
  12   (is (equal
  13         '(2 2 654 33583)
  14         (mapcar #'simple-fuel '(12 14 1969 100756)))))
  15
  16 (run! 'day00)