Count all coincidences in 2 lists. (Clojure and Common Lisp)