(defn partition-on-focused [focused-id node-a node-b]

(defn partition-on-focused [focused-id {"firstChild" node-a "secondChild" node-b}]

    {"firstChild" a "secondChild" b}
      (let [[focused not-focused] (partition-on-focused focused-id a b)]

    _ (let [[focused not-focused] (partition-on-focused focused-id node)]

      nil
        (print "Não há mais nós para esconder")

      nil (print "Não há mais nós para esconder")

      {"firstChild" :null "secondChild" :null}
        (toggle-hidden unhidden)

      {"firstChild" :null "secondChild" :null} (toggle-hidden unhidden)

      {"firstChild" node-a "secondChild" node-b}
        (let [[_ not-focused] (partition-on-focused focused-id node-a node-b)]

      _ (let [[_ not-focused] (partition-on-focused focused-id unhidden)]