       
        (string? coll)
        (array-reduce coll f val)
-       
+
        (native-satisfies? IReduce coll)
        (-reduce coll f val)
 


       (string? coll)
       (array-reduce coll f)
       
       (native-satisfies? IReduce coll)
       (-reduce coll f)


      (string? coll)
      (alength coll)

      (implements? ISeqable coll)
      (accumulating-seq-count coll)

      :else (-count coll))
    0))

(defn- linear-traversal-nth
