2012-08-30 21 views

Odpowiedz

11
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 
Powiązane problemy