(ns utils) (defn read-file "Reads a file for advent of code." ([day] (slurp (str "./input/" day ".txt"))) ([day test?] (slurp (str "./input" (if test? "_test/" "/") day ".txt")))) (defn find-first [f coll] (first (filter f coll)))