;; Each node is a number or a seq, ;; so branch?==seq? and children==identity ;; ;; . ;; / \ ;; . . ;; /|\ | ;; 1 2 . 4 ;; | ;; 3 ;; user=> (tree-seq seq? identity '((1 2 (3)) (4))) (((1 2 (3)) (4)) (1 2 (3)) 1 2 (3) 3 (4) 4)
algal
on Sun, 20 Nov 2011
;; Each node is a number or a seq, ;; so branch?==seq? and children==identity ;; ;; . ;; / \ ;; . . ;; /|\ | ;; 1 2 . 4 ;; | ;; 3 ;; user=> (tree-seq seq? identity '((1 2 (3)) (4))) (((1 2 (3)) (4)) (1 2 (3)) 1 2 (3) 3 (4) 4)
algal
on Sun, 20 Nov 2011
;; Each node is a number or a seq, ;; so branch?==seq? and children==identity ;; ;; . ;; / \ ;; . . ;; /|\ | ;; 1 2 . 4 ;; | ;; 3 ;; user=> (tree-seq seq? identity '((1 2 (3)) (4))) (((1 2 (3)) (4)) (1 2 (3)) 1 2 (3) 3 (4) 4)
zkim
on Sun, 26 Sep 2010
user=> (tree-seq seq? seq '((1 2 (3)) (4))) (((1 2 (3)) (4)) (1 2 (3)) 1 2 (3) 3 (4) 4)
defn
on Mon, 02 Aug 2010
(tree-seq seq? seq '((1 2 (3)) (4))) ; => (((1 2 (3)) (4)) (1 2 (3)) 1 2 (3) 3 (4) 4)