src/2019/days/day-05.lisp @ 2078ac8647c6
2017 16, 17, 18p1
author |
Steve Losh <steve@stevelosh.com> |
date |
Fri, 06 Dec 2019 20:58:57 -0500 |
parents |
cd781337a694 |
children |
5f6c2d777533 |
(defpackage :advent/2019/05 #.cl-user::*advent-use*)
(in-package :advent/2019/05)
(define-problem (2019 5) (data read-numbers) (14522484 4)
(values
(car (last (gathering
(advent/intcode:run data :input (constantly 1) :output #'gather))))
(car (gathering
(advent/intcode:run data :input (constantly 5) :output #'gather)))))