1 /*
2 * Function wrappers for ulp.
3 *
4 * Copyright (c) 2022, Arm Limited.
5 * SPDX-License-Identifier: MIT OR Apache-2.0 WITH LLVM-exception
6 */
7
8 /* Wrappers for sincos. */
sincosf_sinf(float x)9 static float sincosf_sinf(float x) {(void)cosf(x); return sinf(x);}
sincosf_cosf(float x)10 static float sincosf_cosf(float x) {(void)sinf(x); return cosf(x);}
sincos_sin(double x)11 static double sincos_sin(double x) {(void)cos(x); return sin(x);}
sincos_cos(double x)12 static double sincos_cos(double x) {(void)sin(x); return cos(x);}
13 #if USE_MPFR
sincos_mpfr_sin(mpfr_t y,const mpfr_t x,mpfr_rnd_t r)14 static int sincos_mpfr_sin(mpfr_t y, const mpfr_t x, mpfr_rnd_t r) { mpfr_cos(y,x,r); return mpfr_sin(y,x,r); }
sincos_mpfr_cos(mpfr_t y,const mpfr_t x,mpfr_rnd_t r)15 static int sincos_mpfr_cos(mpfr_t y, const mpfr_t x, mpfr_rnd_t r) { mpfr_sin(y,x,r); return mpfr_cos(y,x,r); }
16 #endif
17
18 /* Wrappers for vector functions. */
19 #if __aarch64__ && WANT_VMATH
v_sinf(float x)20 static float v_sinf(float x) { return __v_sinf(argf(x))[0]; }
v_cosf(float x)21 static float v_cosf(float x) { return __v_cosf(argf(x))[0]; }
v_expf_1u(float x)22 static float v_expf_1u(float x) { return __v_expf_1u(argf(x))[0]; }
v_expf(float x)23 static float v_expf(float x) { return __v_expf(argf(x))[0]; }
v_exp2f_1u(float x)24 static float v_exp2f_1u(float x) { return __v_exp2f_1u(argf(x))[0]; }
v_exp2f(float x)25 static float v_exp2f(float x) { return __v_exp2f(argf(x))[0]; }
v_logf(float x)26 static float v_logf(float x) { return __v_logf(argf(x))[0]; }
v_powf(float x,float y)27 static float v_powf(float x, float y) { return __v_powf(argf(x),argf(y))[0]; }
v_sin(double x)28 static double v_sin(double x) { return __v_sin(argd(x))[0]; }
v_cos(double x)29 static double v_cos(double x) { return __v_cos(argd(x))[0]; }
v_exp(double x)30 static double v_exp(double x) { return __v_exp(argd(x))[0]; }
v_log(double x)31 static double v_log(double x) { return __v_log(argd(x))[0]; }
v_pow(double x,double y)32 static double v_pow(double x, double y) { return __v_pow(argd(x),argd(y))[0]; }
33 #ifdef __vpcs
vn_sinf(float x)34 static float vn_sinf(float x) { return __vn_sinf(argf(x))[0]; }
vn_cosf(float x)35 static float vn_cosf(float x) { return __vn_cosf(argf(x))[0]; }
vn_expf_1u(float x)36 static float vn_expf_1u(float x) { return __vn_expf_1u(argf(x))[0]; }
vn_expf(float x)37 static float vn_expf(float x) { return __vn_expf(argf(x))[0]; }
vn_exp2f_1u(float x)38 static float vn_exp2f_1u(float x) { return __vn_exp2f_1u(argf(x))[0]; }
vn_exp2f(float x)39 static float vn_exp2f(float x) { return __vn_exp2f(argf(x))[0]; }
vn_logf(float x)40 static float vn_logf(float x) { return __vn_logf(argf(x))[0]; }
vn_powf(float x,float y)41 static float vn_powf(float x, float y) { return __vn_powf(argf(x),argf(y))[0]; }
vn_sin(double x)42 static double vn_sin(double x) { return __vn_sin(argd(x))[0]; }
vn_cos(double x)43 static double vn_cos(double x) { return __vn_cos(argd(x))[0]; }
vn_exp(double x)44 static double vn_exp(double x) { return __vn_exp(argd(x))[0]; }
vn_log(double x)45 static double vn_log(double x) { return __vn_log(argd(x))[0]; }
vn_pow(double x,double y)46 static double vn_pow(double x, double y) { return __vn_pow(argd(x),argd(y))[0]; }
Z_sinf(float x)47 static float Z_sinf(float x) { return _ZGVnN4v_sinf(argf(x))[0]; }
Z_cosf(float x)48 static float Z_cosf(float x) { return _ZGVnN4v_cosf(argf(x))[0]; }
Z_expf(float x)49 static float Z_expf(float x) { return _ZGVnN4v_expf(argf(x))[0]; }
Z_exp2f(float x)50 static float Z_exp2f(float x) { return _ZGVnN4v_exp2f(argf(x))[0]; }
Z_logf(float x)51 static float Z_logf(float x) { return _ZGVnN4v_logf(argf(x))[0]; }
Z_powf(float x,float y)52 static float Z_powf(float x, float y) { return _ZGVnN4vv_powf(argf(x),argf(y))[0]; }
Z_sin(double x)53 static double Z_sin(double x) { return _ZGVnN2v_sin(argd(x))[0]; }
Z_cos(double x)54 static double Z_cos(double x) { return _ZGVnN2v_cos(argd(x))[0]; }
Z_exp(double x)55 static double Z_exp(double x) { return _ZGVnN2v_exp(argd(x))[0]; }
Z_log(double x)56 static double Z_log(double x) { return _ZGVnN2v_log(argd(x))[0]; }
Z_pow(double x,double y)57 static double Z_pow(double x, double y) { return _ZGVnN2vv_pow(argd(x),argd(y))[0]; }
58 #endif
59 #endif
60