Solve the ‘set intersection’ problem in 4clojure.