Clojure: build map from value and keys sequence

1 2	((fn [defval vect] (reduce (fn [m k] (conj m {k defval})) {} vect)) 0 [:a :b]) {:a 0, :b 0}

or

1 2	((fn [defval vect] (zipmap vect (repeat defval))) 0 [:a :b :c]) {:a 0, :b 0, :c 0}