maps

[procedure] mappend fn seq ...

[procedure] maps fn seq ...

scheme:append-map.

Unlike map, it barfs if a string is in seq. I'm not sure if it's intended or just an implementation glitch.

I'm also not sure how mappend and maps behave differently.

(def mappend (f . args)
  (apply + nil (apply map f args)))

(def maps (fn . args)
  (apply join (apply map fn args)))