Welcome to mirror list, hosted at ThFree Co, Russian Federation.

cygwin.com/git/newlib-cygwin.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'newlib/libm/machine/spu/headers/asinf4.h')
-rw-r--r--newlib/libm/machine/spu/headers/asinf4.h144
1 files changed, 0 insertions, 144 deletions
diff --git a/newlib/libm/machine/spu/headers/asinf4.h b/newlib/libm/machine/spu/headers/asinf4.h
deleted file mode 100644
index e9db1408b..000000000
--- a/newlib/libm/machine/spu/headers/asinf4.h
+++ /dev/null
@@ -1,144 +0,0 @@
-/* -------------------------------------------------------------- */
-/* (C)Copyright 2001,2008, */
-/* International Business Machines Corporation, */
-/* Sony Computer Entertainment, Incorporated, */
-/* Toshiba Corporation, */
-/* */
-/* All Rights Reserved. */
-/* */
-/* Redistribution and use in source and binary forms, with or */
-/* without modification, are permitted provided that the */
-/* following conditions are met: */
-/* */
-/* - Redistributions of source code must retain the above copyright*/
-/* notice, this list of conditions and the following disclaimer. */
-/* */
-/* - Redistributions in binary form must reproduce the above */
-/* copyright notice, this list of conditions and the following */
-/* disclaimer in the documentation and/or other materials */
-/* provided with the distribution. */
-/* */
-/* - Neither the name of IBM Corporation nor the names of its */
-/* contributors may be used to endorse or promote products */
-/* derived from this software without specific prior written */
-/* permission. */
-/* */
-/* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND */
-/* CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, */
-/* INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF */
-/* MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE */
-/* DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR */
-/* CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, */
-/* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT */
-/* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; */
-/* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) */
-/* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN */
-/* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR */
-/* OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, */
-/* EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
-/* -------------------------------------------------------------- */
-/* PROLOG END TAG zYx */
-#ifdef __SPU__
-
-#ifndef _ASINF4_H_
-#define _ASINF4_H_ 1
-
-#include <spu_intrinsics.h>
-
-#include "divf4.h"
-#include "sqrtf4.h"
-
-/*
- * FUNCTION
- * vector float _asinf4(vector float x)
- *
- * DESCRIPTION
- * The _asinf4 function computes the arc sine for a vector of values x;
- * that is the values whose sine is x. Results are undefined if x is
- * outside the range [-1, 1].
- *
- */
-static __inline vector float _asinf4(vector float x)
-{
- /* The arcsin is computed using two different algorithms, depending
- * upon the absolute value of the input. For inputs in the range
- * [0, PI/4], it is computed as the ratio of two polynomials.
- *
- * asin(x) = p/q;
- *
- * where p = P11*x^11 + P09*x^9 + P07*x^7 + P05*x^5 + P03*x3 + x
- * q = Q08*x^8 + Q06*x^6 + Q04*x^4 + Q02*x^2 + Q00
- *
- * For the range of value [PI/4, 1], the arcsin is computed using:
- *
- * asin = PI/2 - sqrt(1 - x) * r;
- *
- * where r = C07*x^7 + C06*x^6 + C05*x^5 + C04*x^4 + C03*x^3 + C02*x^2
- * C01*x + C00;
- */
- vector float r, r1, r2, r_hi, r_lo;
- vector float xabs, x2, x4, x6;
- vector float p, p_hi, p_lo;
- vector float q, q_hi, q_lo;
- vector float pi_over_2 = spu_splats(1.5707963267949f);
- vector float pi_over_4 = spu_splats(0.7853981633974f);
- vector unsigned int msb = spu_splats(0x80000000);
-
-
- x2 = spu_mul(x, x);
- x4 = spu_mul(x2, x2);
- x6 = spu_mul(x4, x2);
-
- xabs = spu_andc(x, (vector float)msb);
-
- /* Compute arc-sin for values in the range [0, PI/4]
- */
- p_hi = spu_madd(spu_splats(0.0000347933107596021167570f), x2,
- spu_splats(0.000791534994289814532176f));
- p_hi = spu_madd(p_hi, x2, spu_splats(-0.0400555345006794114027f));
-
- p_lo = spu_madd(spu_splats(0.201212532134862925881f), x2,
- spu_splats(-0.325565818622400915405f));
- p_lo = spu_madd(p_lo, x2, spu_splats(0.166666666666666657415f));
-
- p = spu_madd(p_hi, x6, p_lo);
-
- q_hi = spu_madd(spu_splats(0.0770381505559019352791f), x2,
- spu_splats(-0.688283971605453293030f));
- q_hi = spu_madd(q_hi, x2, spu_splats(2.02094576023350569471f));
-
- q_lo = spu_madd(spu_splats(-2.40339491173441421878f), x2,
- spu_splats(1.0f));
-
- q = spu_madd(q_hi, x4, q_lo);
-
- r1 = spu_madd(_divf4(p, q), spu_mul(xabs, x2), xabs);
-
- /* Compute arc-sin for values in the range [PI/4, 1]
- */
- r_hi = spu_madd(spu_splats(-0.0012624911f), xabs,
- spu_splats(0.0066700901f));
- r_hi = spu_madd(r_hi, xabs, spu_splats(-0.0170881256f));
- r_hi = spu_madd(r_hi, xabs, spu_splats(0.0308918810f));
-
- r_lo = spu_madd(spu_splats(-0.0501743046f), xabs,
- spu_splats(0.0889789874f));
- r_lo = spu_madd(r_lo, xabs, spu_splats(-0.2145988016f));
- r_lo = spu_madd(r_lo, xabs, pi_over_2);
-
- r = spu_madd(r_hi, x4, r_lo);
-
- r2 = spu_nmsub(r, _sqrtf4(spu_sub(spu_splats(1.0f), xabs)),
- pi_over_2);
-
- /* Select the result depending upon the input value. Correct the
- * sign of the result.
- */
- return (spu_sel(spu_sel(r1, r2, spu_cmpgt(xabs, pi_over_4)),
- x, msb));
-}
-
-#endif /* _ASINF4_H_ */
-#endif /* __SPU__ */
-
-