Data structure Manipulation Examples

lazy_cons.clj

(defn some-lazy
  ([] (some-lazy 1))
  ([next]
   (cons next (lazy-seq
               (do (println "getting next")
                   (some-lazy (inc next)))))))
;; Instead of recur, use the name of the function (e.g. some-lazy) to recur
;; lazy-seq gets turned to a function and recur target would be hidden.

;; Don't hold on to seq returned by some-lazy, only subsets 
;; (def sl (take 5 (some-lazy))) ;;Holding on to subset of lazy list ok
;; (doall sl)
;; getting next
;; getting next
;; getting next
;; getting next
;; (1 2 3 4 5)
;;
;; user=> (doall sl) ;; Second time no re-eval
;; (1 2 3 4 5)

sorted_set.clj

;; Sorted Set
(def z-sorted-seq (sorted-set-by #(< (:z %1) (:z %2)))) 
(conj z-sorted-seq {:z 3} {:z 2} {:z -12} {:z 44})          ;> #{{:z -12} {:z 2} {:z 3} {:z 44}}