ИИ
Size: a a a
DG
AR
AR
(defrecord s-list [data next])
(defn s-list-search [lst val]
(cond
(= val (:data lst)) (println (:data val))
(:next lst) (recur (:next lst) val)
:else (println "nil")))
(defn s-list-prepend [lst val]
(->s-list val lst))
AC
AC
AC
AC
AR
(defrecord s-list [data next])
(defn s-list-search [lst val]
(cond
(= val (:data lst)) (println (:data val))
(:next lst) (recur (:next lst) val)
:else (println "nil")))
(defn s-list-prepend [lst val]
(->s-list val lst))
AR
AR
AR
AR
D
(if (coll? (:k x))
(set (:k x))
(hash-set (:k x)))
ИС
(if (coll? (:k x))
(set (:k x))
(hash-set (:k x)))
(->> x :k vector flatten set)
D
AR