如何将记录列表的键值相加？

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