diff options
Diffstat (limited to 'pl/math/sv_powi.c')
-rw-r--r-- | pl/math/sv_powi.c | 48 |
1 files changed, 0 insertions, 48 deletions
diff --git a/pl/math/sv_powi.c b/pl/math/sv_powi.c deleted file mode 100644 index e53bf2195533..000000000000 --- a/pl/math/sv_powi.c +++ /dev/null @@ -1,48 +0,0 @@ -/* - * Double-precision SVE powi(x, n) function. - * - * Copyright (c) 2020-2023, Arm Limited. - * SPDX-License-Identifier: MIT OR Apache-2.0 WITH LLVM-exception - */ - -#include "sv_math.h" - -/* Optimized double-precision vector powi (double base, long integer power). - powi is developed for environments in which accuracy is of much less - importance than performance, hence we provide no estimate for worst-case - error. */ -svfloat64_t -_ZGVsMxvv_powk (svfloat64_t as, svint64_t ns, svbool_t p) -{ - /* Compute powi by successive squaring, right to left. */ - svfloat64_t acc = sv_f64 (1.0); - svbool_t want_recip = svcmplt (p, ns, 0); - svuint64_t ns_abs = svreinterpret_u64 (svabs_x (p, ns)); - - /* We use a max to avoid needing to check whether any lane != 0 on each - iteration. */ - uint64_t max_n = svmaxv (p, ns_abs); - - svfloat64_t c = as; - /* Successively square c, and use merging predication (_m) to determine - whether or not to perform the multiplication or keep the previous - iteration. */ - while (true) - { - svbool_t px = svcmpeq (p, svand_x (p, ns_abs, 1ull), 1ull); - acc = svmul_m (px, acc, c); - max_n >>= 1; - if (max_n == 0) - break; - - ns_abs = svlsr_x (p, ns_abs, 1); - c = svmul_x (p, c, c); - } - - /* Negative powers are handled by computing the abs(n) version and then - taking the reciprocal. */ - if (svptest_any (want_recip, want_recip)) - acc = svdivr_m (want_recip, acc, 1.0); - - return acc; -} |