From 6c0175228e7cda310caea056001e2eddad380bcf Mon Sep 17 00:00:00 2001 From: Tyler Wardhaugh Date: Sun, 4 Jun 2023 13:02:06 -0700 Subject: fix bug; cost=0 when no days are processed --- challenge-219/tyler-wardhaugh/clojure/src/c219/t2.clj | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/challenge-219/tyler-wardhaugh/clojure/src/c219/t2.clj b/challenge-219/tyler-wardhaugh/clojure/src/c219/t2.clj index dfcababbe2..b726644926 100644 --- a/challenge-219/tyler-wardhaugh/clojure/src/c219/t2.clj +++ b/challenge-219/tyler-wardhaugh/clojure/src/c219/t2.clj @@ -11,7 +11,7 @@ xf (map (fn [[period cost]] (let [[d & ds] days candidates (drop-while #(< % (+ d period)) ds)] - (+ cost (f f costs candidates)))))] + (+ cost (or (f f costs candidates) 0)))))] (->> source (sequence xf) (apply min))))) (let [f (memoize travel-expenditure')] -- cgit