clojure (pgraph-morphisms): reverted "optimization" of the distances function