Bully algorithm implementation in Clojure