Permalink
Fetching contributors…
Cannot retrieve contributors at this time
20 lines (17 sloc) 853 Bytes
;; Copyright (c) Dragan Djuric. All rights reserved.
;; The use and distribution terms for this software are covered by the
;; Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php) or later
;; which can be found in the file LICENSE at the root of this distribution.
;; By using this software in any fashion, you are agreeing to be bound by
;; the terms of this license.
;; You must not remove this notice, or any other, from this software.
(ns hello-world.cuda
(:require [uncomplicate.commons.core :refer [with-release]]
[uncomplicate.clojurecuda.core :refer [with-default]]
[uncomplicate.neanderthal
[core :refer [asum]]
[cuda :refer [cuv with-default-engine]]]))
(with-default
(with-default-engine
(with-release [gpu-x (cuv 1 -2 5)]
(asum gpu-x))))