clojure: the new morphism function seems to work