Trivia: You can name fns:

  (map (fn first-or-last [x]
         (or (first x) (last x))
       my-seq)

(Of course the name has no semantic effects as you can't refer to it from code, but it's there in debugging / stack traces and serves as a comment for the reader).