9 lines
187 B
Clojure
9 lines
187 B
Clojure
|
(defn all-best-by-value [ks]
|
||
|
|
(let [b (best-by-value ks)]
|
||
|
|
(filter #(= (:value b) (:value %)) ks)))
|
||
|
|
|
||
|
|
(defn print-knapsacks [ks]
|
||
|
|
(doseq [k ks]
|
||
|
|
(print-knapsack k)
|
||
|
|
(println)))
|