Как создать Clojure Zipper

Question

Как я мог создать следующий график, используя Clojure Zipper (vector-zip):

A 
/| \  
B C D 
    /\ 
    E F 

Я попытался

(vector-zip ["A" ["B" "C" "D"["E" "F"]] ]) 

возвращает

[["A" ["B" "C" "D" ["E" "F"]]] nil] 

Является ли это правильно?

Answer 1

Да, это правильно. Некоторые тесты вашего кода:

(require '[clojure.zip :as zip]) 

(def zv (zip/vector-zip ["A" ["B" "C" "D"["E" "F"]]])) 

(-> zv zip/next) ; => ["A" {:l [], :pnodes [["A" ["B" "C" "D" ["E" "F"]]]], :ppath nil, :r (["B" "C" "D" ["E" "F"]])}] 

(-> zv zip/next zip/node) ; => "A" 

(-> zv zip/next zip/next zip/next zip/node) ; => "B" 

(-> zv zip/next zip/next zip/children) ; => ("B" "C" "D" ["E" "F"])