advent-of-code-2023

My solutions to AoC 2023
git clone git://git.entf.net/advent-of-code-2023
Log | Files | Refs

day-14.lisp (407B)

      1 (defpackage #:aoc-test/day-14
      2   (:use #:cl #:lisp-unit2 #:aoc/day-14))
      3 (in-package #:aoc-test/day-14)
      4 
      5 (define-test test-day-14
      6     ()
      7   (let ((*minimum-pattern-length* 5))
      8     (multiple-value-bind (task-1 task-2)
      9         (aoc:run-day 14 "O....#....
     10 O.OO#....#
     11 .....##...
     12 OO.#O....O
     13 .O.....O#.
     14 O.#..O.#.#
     15 ..O..#O..O
     16 .......O..
     17 #....###..
     18 #OO..#....")
     19       (assert= 136 task-1)
     20       (assert= 64 task-2))))