diff options
| author | Cedric Nugteren <web@cedricnugteren.nl> | 2016-04-27 18:07:30 +0200 |
|---|---|---|
| committer | Cedric Nugteren <web@cedricnugteren.nl> | 2016-04-27 18:07:30 +0200 |
| commit | d7ddbdeb1f416f56bc469d16c051551207274703 (patch) | |
| tree | 2f5ba3abc5a97509b84ecdd1fdf5b449ab543eec /src/kernels/level1/xasum.opencl | |
| parent | 13eed1a0f973ff2090062a1ad4485896b22949b0 (diff) | |
Added non-absolute counter-parts xSUM and IxMAX of the BLAS routines xASUM and IxAMAX
Diffstat (limited to 'src/kernels/level1/xasum.opencl')
| -rw-r--r-- | src/kernels/level1/xasum.opencl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/kernels/level1/xasum.opencl b/src/kernels/level1/xasum.opencl index 037dc57e..58d0f11b 100644 --- a/src/kernels/level1/xasum.opencl +++ b/src/kernels/level1/xasum.opencl @@ -45,7 +45,10 @@ __kernel void Xasum(const int n, int id = wgid*WGS1 + lid; while (id < n) { real x = xgm[id*x_inc + x_offset]; - AbsoluteValue(x); + #if defined(ROUTINE_SUM) // non-absolute version + #else + AbsoluteValue(x); + #endif Add(acc, acc, x); id += WGS1*num_groups; } |