(defn sum [xs]
  (reduce + 0 xs))

(println (sum [1 2 3 4]))