Messing around with authorship triangle in clojure

Authorship.clj

(defmulti my-print class)

(defmethod my-print clojure.lang.IPersistentVector [c]
  (.write *out* "[")
  (.write *out* (str-join " " c))
  (.write *out* "]"))

(defmethod my-print java.util.Collection [c]
  (.write *out* "(")
  (.write *out* (str-join " " c))
  (.write *out* ")"))

(defmethod my-print java.lang.Iterable [c]
  (.write *out* "*")
  (.write *out* (str-join " " c))
  (.write *out* "*"))

(prefer-method my-print clojure.lang.IPersistentVector java.util.Collection)
(prefer-method my-print java.util.Collection java.lang.Iterable)
(prefer-method my-print java.lang.Iterable clojure.lang.IPersistentVector )