ajet/advent-of-code
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

rename

Browse Source
This commit is contained in:
Adam Jeniski 2025-12-12 12:21:02 -10:00
parent 50e6464eba
commit 9ea11f35c9
1 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
2025/src/day10.clj
View File

@ -50,7 +50,7 @@
(def Int z3/Int)
(def Optimize z3/Optimize)
(def Sum z3/Sum)
(defn apply-formulas! [opt [f & fs]]
(defn add-formulas! [opt [f & fs]]
(when f
(! "add" opt f)
(recur opt fs)))
@ -67,7 +67,7 @@
count
range
(map #(Int (str "j" %))))]
(apply-formulas! opt (for [idx (range (count joltages))]
(add-formulas! opt (for [idx (range (count joltages))]
(let [jn (nth js idx)
summation-args (->> buttons
(map set)
@ -76,10 +76,10 @@
(map first)
(map #(nth bs %)))]
(py= jn (apply Sum summation-args)))))
(apply-formulas! opt (for [[idx joltage] (map-indexed vector joltages)]
(add-formulas! opt (for [[idx joltage] (map-indexed vector joltages)]
(let [jn (nth js idx)]
(py= jn joltage))))
(apply-formulas! opt (for [b bs] (py>= b 0)))
(add-formulas! opt (for [b bs] (py>= b 0)))
(! "minimize" opt (apply Sum bs))
(! "check" opt)
(let [model (! "model" opt)]