adventofcode2022

My solutions for Advent of Code 2022
Log | Files | Refs

day14.lisp (409B)

      1 (in-package #:adventofcode2022/test)
      2 
      3 (define-constant +testdata-day14+ "498,4 -> 498,6 -> 496,6
      4 503,4 -> 502,4 -> 502,9 -> 494,9"
      5   :test 'equal)
      6 
      7 (def-test day14-task1 ()
      8   (is-true
      9    (= 24
     10       (run-task 14 1
     11                 (make-string-input-stream +testdata-day14+)))))
     12 
     13 (def-test day14-task2 ()
     14   (is-true
     15    (= 93
     16       (run-task 14 2
     17                 (make-string-input-stream +testdata-day14+)))))