clojure - 如何对记录列表的键值求和？

Question

例如：

{defrecord Item [cost value]}
{def items [(Item. 20 50)
            (Item. 30 40)
            (Item. 10 70)]

我将如何对物品的成本求和？（所以我会得到 60）

Answer 1

user=> (defrecord Item [cost value])
user.Item
user=> (def items [(Item. 20 50)
            (Item. 30 40)
            (Item. 10 70)])
#'user/items   
user=> (reduce + (map :cost items))
60