     ([array f start]
        (ci-reduce array f start))))
 
+(declare with-meta)
+
 (deftype RSeq [ci i meta]
   Object
   (toString [this]

  ICollection
  (-conj [coll o]
    (cons o coll))

  IHash
  (-hash [coll] (hash-coll coll)))

  ICollection
  (-conj [coll o] (cons o coll))

  IEmptyableCollection
  (-empty [coll] cljs.core.List/EMPTY)

  IReduce
  (-reduce [coll f]
    (if (counted? a)
