(seq-zip root)
Returns a zipper for nested sequences, given a root sequence
user=> (require '[clojure.zip :as zip])\r
nil\r
user=> (def zz (zip/seq-zip '(a b (c d e) (f (g h) i) j)))\r
#'user/zz\r
user=> zz\r
[(a b (c d e) (f (g h) i) j) nil]