YK
Size: a a a
YK
((
AD
MG
((
G
(defn- contains-identical? [col obj]
(boolean (some (partial identical? obj) col)))
(contains-identical? (into '() obj-set) obj)
DL
DL
G
DL
G
G
G
DL
G
G
(defn copy [frag]
(if (instance? MetagraphFragment frag)
(make-fragment (:vertices frag) (:meta-vertices frag) (:edges frag))
(throw
(IllegalArgumentException.
(str "The " (get-class-name frag) " type component is not a metagraph fragment.")))))
G
(defn copy [frag]
(if (instance? MetagraphFragment frag)
(make-fragment (:vertices frag) (:meta-vertices frag) (:edges frag))
(throw
(IllegalArgumentException.
(str "The " (get-class-name frag) " type component is not a metagraph fragment.")))))
DL
(defn copy [frag]
(if (instance? MetagraphFragment frag)
(make-fragment (:vertices frag) (:meta-vertices frag) (:edges frag))
(throw
(IllegalArgumentException.
(str "The " (get-class-name frag) " type component is not a metagraph fragment.")))))
DL