1#ifdef __CLC_SCALAR 2#define __CLC_VECSIZE 3#endif 4 5#if __CLC_FPSIZE == 64 6#define __CLC_CONVERT_NATN __CLC_XCONCAT(convert_long, __CLC_VECSIZE) 7#elif __CLC_FPSIZE == 32 8#define __CLC_CONVERT_NATN __CLC_XCONCAT(convert_int, __CLC_VECSIZE) 9#elif __CLC_FPSIZE == 16 10#define __CLC_CONVERT_NATN __CLC_XCONCAT(convert_short, __CLC_VECSIZE) 11#endif 12 13_CLC_OVERLOAD _CLC_DEF __CLC_GENTYPE maxmag(__CLC_GENTYPE x, __CLC_GENTYPE y) { 14 const __CLC_GENTYPE res = select(y, x, __CLC_CONVERT_NATN(isgreater(fabs(x), fabs(y)))); 15 return select(res, fmax(x, y), __CLC_CONVERT_NATN(isnan(x) | isnan(y) | isequal(fabs(x), fabs(y)))); 16} 17 18#undef __CLC_CONVERT_NATN 19 20#ifdef __CLC_SCALAR 21#undef __CLC_VECSIZE 22#endif 23