diff options
Diffstat (limited to 'silx/resources/opencl/linalg.cl')
-rw-r--r-- | silx/resources/opencl/linalg.cl | 89 |
1 files changed, 89 insertions, 0 deletions
diff --git a/silx/resources/opencl/linalg.cl b/silx/resources/opencl/linalg.cl new file mode 100644 index 0000000..82a76eb --- /dev/null +++ b/silx/resources/opencl/linalg.cl @@ -0,0 +1,89 @@ +/* + * Copyright (C) 2017 European Synchrotron Radiation Facility + * Grenoble, France + * + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN + * THE SOFTWARE. + * + */ + +/** + * + * Compute the spatial gradient of an image. + * + * slice: input image + * slice_grad: output gradient + * sizeX: number of columns of the image + * sizeY: number of rows of the image + * + **/ +__kernel void kern_gradient2D( + __global float* slice, + __global float2* slice_grad, + int sizeX, + int sizeY) +{ + + uint gidx = get_global_id(0); + uint gidy = get_global_id(1); + float val_x = 0, val_y = 0; + + if (gidx < sizeX && gidy < sizeY) { + if (gidx == sizeX-1) val_y = 0; + else val_y = slice[(gidy)*sizeX+gidx+1] - slice[(gidy)*sizeX+gidx]; + if (gidy == sizeY-1) val_x = 0; + else val_x = slice[(gidy+1)*sizeX+gidx] - slice[(gidy)*sizeX+gidx]; + + slice_grad[(gidy)*sizeX+gidx].x = val_x; + slice_grad[(gidy)*sizeX+gidx].y = val_y; + } +} + +/** + * + * Compute the spatial divergence of an image gradient. + * + * slice_grad: input gradient-like image + * slice: output image + * sizeX: number of columns of the input + * sizeY: number of rows of the input + * + **/ +__kernel void kern_divergence2D( + __global float2* slice_grad, + __global float* slice, + int sizeX, + int sizeY) +{ + uint gidx = get_global_id(0); + uint gidy = get_global_id(1); + float val_x = 0, val_y = 0; + + if (gidx < sizeX && gidy < sizeY) { + if (gidx == 0) val_y = slice_grad[(gidy)*sizeX+gidx].y; + else val_y = slice_grad[(gidy)*sizeX+gidx].y - slice_grad[(gidy)*sizeX+gidx-1].y; + if (gidy == 0) val_x = slice_grad[(gidy)*sizeX+gidx].x; + else val_x = slice_grad[(gidy)*sizeX+gidx].x - slice_grad[(gidy-1)*sizeX+gidx].x; + slice[(gidy)*sizeX+gidx] = val_x + val_y; + } +} + + + + |