                                                (not (some #{href} template-links)))
                                              infos)]))
                                  xpaths-hrefs-text)
-           
+
            xpaths-anchors-chars (map
                                  (fn [[xpath nodes]]
                                    [xpath (map

                                               (+ acc (:num-chars an-info)))
                                             0
                                             info)
                                    
                                     :hrefs (reduce
                                             (fn [acc an-info]
                                               (cons (:href an-info) acc))
                                             '()
                                             info)})
                                  xpaths-anchors-chars))]
       
       {:total-nav-info page-wide-nav-chars
        :xpath-nav-info (sort-by :score xpath-nav-info)})))



(defn leaf?
  [src-num target-num]
  (and
   (-> src-num nil? not)
   (<= 0.5 (/ target-num src-num))))

(defn state-action
  "Args:
