1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
|
/*========================== begin_copyright_notice ============================
Copyright (C) 2017-2021 Intel Corporation
SPDX-License-Identifier: MIT
============================= end_copyright_notice ===========================*/
#include "../include/BiF_Definitions.cl"
#include "../../Headers/spirv.h"
#include "../IMF/FP32/tan_s_la.cl"
#if defined(cl_khr_fp64)
#include "../IMF/FP64/tan_d_la.cl"
#endif // defined(cl_khr_fp64)
static INLINE float __intel_tan_f32( float x, bool doFast )
{
float result;
if(BIF_FLAG_CTRL_GET(FastRelaxedMath) && (!BIF_FLAG_CTRL_GET(APIRS)) && doFast)
{
result = SPIRV_OCL_BUILTIN(native_tan, _f32, )(x);
}
else
{
if(as_uint(x) == 0x45753168)
{
result = as_float(0xBF73F75D);
}
else if(as_uint(x) == 0xC5753168)
{
result = as_float(0x3F73F75D);
}
else
{
result = __ocl_svml_tanf(x);
}
}
return result;
}
INLINE float SPIRV_OVERLOADABLE SPIRV_OCL_BUILTIN(tan, _f32, )( float x )
{
return __intel_tan_f32(x, true);
}
GENERATE_SPIRV_OCL_VECTOR_FUNCTIONS_1ARG_LOOP( tan, float, float, f32 )
#if defined(cl_khr_fp64)
INLINE double SPIRV_OVERLOADABLE SPIRV_OCL_BUILTIN(tan, _f64, )( double x )
{
return __ocl_svml_tan(x);
}
GENERATE_SPIRV_OCL_VECTOR_FUNCTIONS_1ARG_LOOP( tan, double, double, f64 )
#endif // defined(cl_khr_fp64)
#if defined(cl_khr_fp16)
INLINE half SPIRV_OVERLOADABLE SPIRV_OCL_BUILTIN(tan, _f16, )( half x )
{
return SPIRV_OCL_BUILTIN(tan, _f32, )((float)x);
}
GENERATE_SPIRV_OCL_VECTOR_FUNCTIONS_1ARG_LOOP( tan, half, half, f16 )
#endif // defined(cl_khr_fp16)
|
