12 lines
244 B
Clojure
12 lines
244 B
Clojure
(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)))
|
|
|