double-array

functionsince v0.0-1211 clojure.core/double-arrayEdit
(double-array size-or-seq)
(double-array size init-val-or-seq)

Source docstring:
Creates an array of doubles. Does not coerce array, provided for compatibility
with Clojure.
Source code @ clojurescript:src/main/cljs/cljs/core.cljs
(defn double-array
  ([size-or-seq]
     (if (number? size-or-seq)
       (double-array size-or-seq nil)
       (into-array size-or-seq)))
  ([size init-val-or-seq]
     (let [a (make-array size)]
       (if (seq? init-val-or-seq)
         (let [s (seq init-val-or-seq)]
           (loop [i 0 s s]
             (if (and s (< i size))
               (do
                 (aset a i (first s))
                 (recur (inc i) (next s)))
               a)))
         (do
           (dotimes [i size]
             (aset a i init-val-or-seq))
           a)))))