user=> (defmacro mapp [part coll & colls] `(map (partial ~@part) ~coll ~@colls)) #'user/mapp user=> (mapp (* 2) [1 2 3]) (2 4 6)