Skip to content

Instantly share code, notes, and snippets.

@w01fe

w01fe/fill_string_pointwise_product.clj

Created July 10, 2013 06:59
Show Gist options
  • Save w01fe/5964025 to your computer and use it in GitHub Desktop.
Save w01fe/5964025 to your computer and use it in GitHub Desktop.
Download ZIP
fill_string_pointwise_product.clj
Raw
fill_string_pointwise_product.clj
(defn fill-string-pointwise-product
[^{:tag "[Ljava.lang.String;"} os ^doubles xs ^longs ys]
(array/afill! String [_ os x xs y ys] (str (* x y))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment