문서 보기역링크PDF로 내보내기맨 위로 이 문서는 읽기 전용입니다. 원본을 볼 수는 있지만 바꿀 수는 없습니다. 문제가 있다고 생각하면 관리자에게 문의하세요. # zip-next - https://clojuredocs.org/clojure.zip/next <code clojure> ;; zip-walk takes a transformation function f and a zipper z. ;; f takes a location and returns location. Applies f ;; to the nodes in the zipper maintaining the original nesting. (require '[clojure.zip :as zip]) (defn zip-walk [f z] (if (zip/end? z) (zip/root z) (recur f (zip/next (f z))))) (zip-walk (fn [loc] (if (zip/branch? loc) loc (zip/edit loc * 2))) (zip/vector-zip [1 2 [3 4]])) ;; [2 4 [6 8]] </code> open/zip-next.txt 마지막으로 수정됨: 2022/06/11 15:01저자 127.0.0.1