clojure (pgraph-morphisms): more tweaks on Floyd-Warshall