generic-library/opencv
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

used abs

Browse Source
This commit is contained in:
Ilya Lavrenov 2014-06-11 18:30:48 +04:00
parent b2c2aabd04
commit f1e24381d1
1 changed files with 14 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
modules/core/src/opencl/arithm.cl
View File

@ -163,9 +163,13 @@
#define PROCESS_ELEM storedst(convertToDT(srcelem2 - srcelem1)) #define PROCESS_ELEM storedst(convertToDT(srcelem2 - srcelem1))
#elif defined OP_ABSDIFF #elif defined OP_ABSDIFF
#if wdepth <= 4
#define PROCESS_ELEM \ #define PROCESS_ELEM \
workT v = srcelem1 - srcelem2; \ storedst(convertToDT(abs_diff(srcelem1, srcelem2)))
storedst(convertToDT(v >= (workT)(0) ? v : -v)) #else
#define PROCESS_ELEM \
storedst(convertToDT(fabs(srcelem1 - srcelem2)))
#endif
#elif defined OP_AND #elif defined OP_AND
#define PROCESS_ELEM storedst(srcelem1 & srcelem2) #define PROCESS_ELEM storedst(srcelem1 & srcelem2)
@ -249,17 +253,12 @@
#elif defined OP_MAG #elif defined OP_MAG
#define PROCESS_ELEM storedst(hypot(srcelem1, srcelem2)) #define PROCESS_ELEM storedst(hypot(srcelem1, srcelem2))
#elif defined OP_ABS_NOSAT
#define PROCESS_ELEM \
dstT v = convertToDT(srcelem1); \
storedst(v >= 0 ? v : -v)
#elif defined OP_PHASE_RADIANS #elif defined OP_PHASE_RADIANS
#define PROCESS_ELEM \ #define PROCESS_ELEM \
workT tmp = atan2(srcelem2, srcelem1); \ workT tmp = atan2(srcelem2, srcelem1); \
if (tmp < 0) \ if (tmp < 0) \
tmp += 6.283185307179586232f; \ tmp += 6.283185307179586232f; \
storedst(tmp) storedst(tmp)
#elif defined OP_PHASE_DEGREES #elif defined OP_PHASE_DEGREES
#define PROCESS_ELEM \ #define PROCESS_ELEM \
@ -288,8 +287,7 @@
#elif defined OP_LOG #elif defined OP_LOG
#define PROCESS_ELEM \ #define PROCESS_ELEM \
dstT v = (dstT)(srcelem1); \ storedst(log(fabs(srcelem1)))
storedst(v > (dstT)(0) ? log(v) : log(-v))
#elif defined OP_CMP #elif defined OP_CMP
#define srcT2 srcT1 #define srcT2 srcT1
@ -297,8 +295,7 @@
#define convertToWT1 #define convertToWT1
#endif #endif
#define PROCESS_ELEM \ #define PROCESS_ELEM \
workT s1 = srcelem1, s2 = srcelem2; \ storedst(srcelem1 CMP_OPERATOR srcelem2 ? (dstT)(255) : (dstT)(0)))
storedst(s1 CMP_OPERATOR s2 ? (dstT)(255) : (dstT)(0))
#elif defined OP_CONVERT_SCALE_ABS #elif defined OP_CONVERT_SCALE_ABS
#undef EXTRA_PARAMS #undef EXTRA_PARAMS
@ -306,11 +303,11 @@
#if wdepth <= 4 #if wdepth <= 4
#define PROCESS_ELEM \ #define PROCESS_ELEM \
workT value = mad24(srcelem1, (workT)(alpha), (workT)(beta)); \ workT value = mad24(srcelem1, (workT)(alpha), (workT)(beta)); \
storedst(convertToDT(value >= 0 ? value : -value)) storedst(convertToDT(abs(value)))
#else #else
#define PROCESS_ELEM \ #define PROCESS_ELEM \
workT value = fma(srcelem1, (workT)(alpha), (workT)(beta)); \ workT value = fma(srcelem1, (workT)(alpha), (workT)(beta)); \
storedst(convertToDT(value >= 0 ? value : -value)) storedst(convertToDT(fabs(value)))
#endif #endif
#elif defined OP_SCALE_ADD #elif defined OP_SCALE_ADD