KennyMonster

(ns day1
  (:require [clojure.string :as str]))

(def numbers (->> (slurp "input/day-1-input")
                  (str/split-lines)
                  (map #(Integer/parseInt %))))

(defn part-1 [numbers]
  (->> (map compare (rest numbers) numbers)
       (filter pos?)