(require '[cachify.core :refer :all])

(def plus (cachify :plus (fn [a b]
                           (println a "+" b)
                           (+ a b))))

(defcachify minus
  [a b]
  (println a "-" b)
  (- a b))


(defn -main []
  (println (plus 1 2)) ; → 1 + 2
                       ;    3
  (println (plus 1 2)) ; → 3

  (println (minus 1 2)) ; → 1 - 2
                        ;    -1
  (println (minus 1 2)) ; → -1

  (perm) ; Write all caches to files
  )